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
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
|
#!/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.
#
# NeXT/check - 06/17/93
#
#-----------------------------------------------------------------------------
#
TigerInstallDir='.'
#
# Set default base directory.
# Order or preference:
# -B option
# TIGERHOMEDIR environment variable
# TigerInstallDir installed location
#
basedir=${TIGERHOMEDIR:=$TigerInstallDir}
for parm
do
case $parm in
-B) basedir=$2; break;;
esac
done
#
# Verify that a config file exists there, and if it does
# source it.
#
[ ! -r $basedir/config ] && {
echo "--ERROR-- [init002e] No 'config' file in \`$basedir'."
exit 1
}
. $basedir/config
. $BASEDIR/initdefs
#
# If run in test mode (-t) this will verify that all required
# elements are set.
#
[ "$Tiger_TESTMODE" = 'Y' ] && {
haveallcmds AWK CAT FMT GEN_PASSWD_SETS JOIN LS RM || exit 1
haveallfiles BASEDIR WORKDIR || exit 1
haveallvars TESTLINK HOSTNAME
echo "--CONFIG-- [init003c] $0: Configuration ok..."
exit 0
}
#------------------------------------------------------------------------
check_domain()
{
domain="$1"
what="$2"
/usr/bin/niutil -read "$domain" "$what" 2> /dev/null |
/usr/bin/bm -s _writers && {
echo "--WARN-- [ca9302a] _writers property enabled for $what in NetInfo($domain)"
}
/usr/bin/niutil -list "$domain" /machines serves 2>/dev/null |
$AWK '{
for(i=2;i<=NF;i++){
len = index($i, "/") - 1;
if(len == 0)
printf("%s ", $i);
else
printf("%s ", substr($i, 1, len));
}
}' |
while read subdom
do
[ "$subdom" != '.' -a "$subdom" != '..' ] && {
check_domain "$subdom" "$what"
}
done
}
check_domain '/' '/printers'
check_domain '/' '/fax_modems'
|
