File: check_links

package info (click to toggle)
tiger 2.2.4-22
  • links: PTS
  • area: main
  • in suites: woody
  • size: 2,188 kB
  • ctags: 240
  • sloc: sh: 8,388; ansic: 2,109; makefile: 141; perl: 106
file content (58 lines) | stat: -rwxr-xr-x 1,410 bytes parent folder | download
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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
#!/bin/sh
#
#     tiger - A UN*X security checking system
#     Copyright (C) 1993 Douglas Lee Schales, David K. Hess, David R. Safford
#
#     Please see the file `COPYING' for the complete copyright notice.
#
# sub/check_links - 06/14/93
#
#-----------------------------------------------------------------------------
# This script is not runnable directly.
# 
file="$1"

[ "$CONFIGURED_ALREADY" != "YES" ] && {
  echo "--ERROR-- [init008e] This script can not be run directly."
  exit 1
}

. $BASEDIR/initdefs

#
# If run in test mode (-t) this will verify that all required
# elements are set.
#
[ "$Tiger_TESTMODE" = 'Y' ] && {
  haveallcmds SORT GREP JOIN LS CAT CC RM || exit 1
  haveallfiles BASEDIR WORKDIR || exit 1
  
  echo "--CONFIG-- [init003c] $0: Configuration ok..."
  exit 0
}

#------------------------------------------------------------------------
echo
echo "# Checking symbolic links..."

haveallcmds SORT GREP JOIN LS REALPATH || exit 1
haveallfiles WORKDIR || exit 1

$REALPATH < $file |
$SORT +1 > $WORKDIR/link.tmp.$$

$GREP -v '^#' $FILE_ACL |
$SORT |
$JOIN -j2 2 -o 2.1 2.2 1.1 - $WORKDIR/link.tmp.$$ |
while read file realfile facl
do
  $LS -ld $LSGROUP "$file" | {
    read p l owner group s a b c f
    [ "$owner" != 'root' -a "$owner" != 'bin' ] && {
      echo "--INFO-- [fsys007i] Symbolic link \`$file' points to \`$realfile'."
    }
  }
done

delete $WORKDIR/link.tmp.$$