File: cleanlinks

package info (click to toggle)
xutils-dev 1%3A7.7%2B7
  • links: PTS, VCS
  • area: main
  • in suites: sid, trixie
  • size: 8,576 kB
  • sloc: sh: 11,469; ansic: 6,059; cpp: 393; makefile: 376; perl: 74
file content (26 lines) | stat: -rw-r--r-- 535 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
#!/bin/sh
#
# Copyright © 2000, 2003 by The XFree86 Project, Inc
#
# Remove dangling symlinks and empty directories from a shadow link tree
# (created with lndir).
#
# Author: David Dawes <dawes@xfree86.org>
#

find . -type l -print |
(
	read i
	while [ X"$i" != X ]; do
		if [ ! -f "$i" ]; then
			echo $i is a dangling symlink, removing
			rm -f "$i"
		fi
		read i
	done
)

echo Removing empty directories ...
#find . -type d -depth -print | xargs rmdir > /dev/null 2>&1
find . -depth -type d -empty -print -exec rmdir {} \;
exit 0