security revision 1.56
11.1Scgd#!/bin/sh -
21.1Scgd#
31.56Slukem#	$NetBSD: security,v 1.56 2001/06/18 10:54:02 lukem Exp $
41.9Scgd#	from: @(#)security	8.1 (Berkeley) 6/9/93
51.1Scgd#
61.1Scgd
71.9ScgdPATH=/sbin:/usr/sbin:/bin:/usr/bin
81.1Scgd
91.31Slukemif [ -f /etc/rc.subr ]; then
101.31Slukem	. /etc/rc.subr
111.31Slukemelse
121.31Slukem	echo "Can't read /etc/rc.subr; aborting."
131.31Slukem	exit 1;
141.31Slukemfi
151.31Slukem
161.9Scgdumask 077
171.1Scgd
181.15Smrgif [ -s /etc/security.conf ]; then
191.15Smrg	. /etc/security.conf
201.15Smrgfi
211.15Smrg
221.56SlukemSECUREDIR=`mktemp -d /tmp/_securedir.XXXXXX` || exit 1
231.56Slukem
241.56Slukemtrap "/bin/rm -rf $SECUREDIR ; exit 0" EXIT INT QUIT
251.15Smrg
261.56Slukemif ! cd "$SECUREDIR"; then
271.56Slukem	echo "Can not cd to $SECUREDIR".
281.15Smrg	exit 1
291.15Smrgfi
301.15Smrg
311.34Sabsif [ -z "$max_loginlen" ];then
321.56Slukem	max_loginlen=8
331.34Sabsfi
341.34Sabs
351.49Sjdolecekif [ -z "$max_grouplen" ]; then
361.56Slukem	max_grouplen=8
371.49Sjdolecekfi
381.49Sjdolecek
391.15SmrgERR=secure1.$$
401.15SmrgTMP1=secure2.$$
411.15SmrgTMP2=secure3.$$
421.28SlukemMPBYUID=secure4.$$
431.29SlukemMPBYPATH=secure5.$$
441.27SlukemLIST=secure6.$$
451.27SlukemOUTPUT=secure7.$$
461.32SlukemLABELS=secure8.$$
471.15Smrg
481.48Sabs# Handle backup_dir not being set in .conf file
491.48Sabsbackup_dir=${backup_dir:-/var/backups}
501.48Sabs
511.15SmrgMP=/etc/master.passwd
521.9Scgd
531.27Slukem# these is used several times.
541.34Sabsawk -F: '!/^+/ { print $1 " " $3 }' $MP | sort -k2n > $MPBYUID
551.29Slukemawk -F: '{ print $1 " " $9 }' $MP | sort -k2 > $MPBYPATH
561.9Scgd
571.9Scgd# Check the master password file syntax.
581.32Slukem#
591.31Slukemif checkyesno check_passwd; then
601.34Sabs	awk -v "len=$max_loginlen" '
611.25Slukem	BEGIN {
621.25Slukem		while ( getline < "/etc/shells" > 0 ) {
631.39Shubertf			if ($0 ~ /^\#/ || $0 ~ /^$/ )
641.25Slukem				continue;
651.25Slukem			shells[$1]++;
661.25Slukem		}
671.25Slukem		FS=":";
681.25Slukem	}
691.25Slukem
701.25Slukem	{
711.15Smrg		if ($0 ~ /^[	 ]*$/) {
721.25Slukem			printf "Line %d is a blank line.\n", NR;
731.15Smrg			next;
741.15Smrg		}
751.34Sabs		if (NF != 10 && ($1 != "+" || NF != 1))
761.25Slukem			printf "Line %d has the wrong number of fields.\n", NR;
771.34Sabs		if ($1 == "+" )  {
781.34Sabs			if (NF != 1 && $3 == 0)
791.34Sabs			    printf "Line %d includes entries with uid 0.\n", NR;
801.34Sabs			next;
811.34Sabs		}
821.53Satatat		if ($1 !~ /^[A-Za-z0-9]([-A-Za-z0-9]*[A-Za-z0-9])*$/)
831.25Slukem			printf "Login %s has non-alphanumeric characters.\n",
841.25Slukem			    $1;
851.34Sabs		if (length($1) > len)
861.34Sabs			printf "Login %s has more than "len" characters.\n", $1;
871.15Smrg		if ($2 == "")
881.25Slukem			printf "Login %s has no password.\n", $1;
891.50Satatat		if (length($2) != 13 && length($2) != 20 && length($2) != 34 && $2 != "") {
901.25Slukem			if ($10 == "" || shells[$10])
911.27Slukem		    printf "Login %s is off but still has a valid shell (%s)\n",
921.25Slukem				    $1, $10;
931.25Slukem		} else if (! shells[$10])
941.25Slukem			printf "Login %s does not have a valid shell (%s)\n",
951.25Slukem			    $1, $10;
961.15Smrg		if ($3 == 0 && $1 != "root" && $1 != "toor")
971.25Slukem			printf "Login %s has a user id of 0.\n", $1;
981.15Smrg		if ($3 < 0)
991.25Slukem			printf "Login %s has a negative user id.\n", $1;
1001.15Smrg		if ($4 < 0)
1011.25Slukem			printf "Login %s has a negative group id.\n", $1;
1021.15Smrg	}' < $MP > $OUTPUT
1031.15Smrg	if [ -s $OUTPUT ] ; then
1041.15Smrg		printf "\nChecking the $MP file:\n"
1051.15Smrg		cat $OUTPUT
1061.15Smrg	fi
1071.15Smrg
1081.15Smrg	awk -F: '{ print $1 }' $MP | sort | uniq -d > $OUTPUT
1091.15Smrg	if [ -s $OUTPUT ] ; then
1101.15Smrg		printf "\n$MP has duplicate user names.\n"
1111.15Smrg		column $OUTPUT
1121.15Smrg	fi
1131.15Smrg
1141.37Swrstuden# To not exclude 'toor', a standard duplicate root account, from the duplicate
1151.37Swrstuden# account test, uncomment the line below (without egrep in it)and comment
1161.37Swrstuden# out the line (with egrep in it) below it.
1171.37Swrstuden#
1181.37Swrstuden#	< $MPBYUID uniq -d -f 1 | awk '{ print $2 }' > $TMP2
1191.36Swrstuden	< $MPBYUID egrep -v '^toor ' | uniq -d -f 1 | awk '{ print $2 }' > $TMP2
1201.15Smrg	if [ -s $TMP2 ] ; then
1211.15Smrg		printf "\n$MP has duplicate user id's.\n"
1221.15Smrg		while read uid; do
1231.28Slukem			grep -w $uid $MPBYUID
1241.15Smrg		done < $TMP2 | column
1251.15Smrg	fi
1261.9Scgdfi
1271.9Scgd
1281.9Scgd# Backup the master password file; a special case, the normal backup
1291.9Scgd# mechanisms also print out file differences and we don't want to do
1301.9Scgd# that because this file has encrypted passwords in it.
1311.32Slukem#
1321.48SabsCUR=$backup_dir/${MP##*/}.current
1331.48SabsBACK=$backup_dir/${MP##*/}.backup
1341.9Scgdif [ -s $CUR ] ; then
1351.9Scgd	if cmp -s $CUR $MP; then
1361.9Scgd		:
1371.9Scgd	else
1381.52Satatat		backup_file update $MP $CUR $BACK
1391.9Scgd	fi
1401.9Scgdelse
1411.52Satatat	backup_file add $MP $CUR $BACK
1421.9Scgdfi
1431.9Scgd
1441.9Scgd# Check the group file syntax.
1451.32Slukem#
1461.31Slukemif checkyesno check_group; then
1471.15Smrg	GRP=/etc/group
1481.49Sjdolecek	awk -F: -v "len=$max_grouplen" '{
1491.15Smrg		if ($0 ~ /^[	 ]*$/) {
1501.25Slukem			printf "Line %d is a blank line.\n", NR;
1511.15Smrg			next;
1521.15Smrg		}
1531.34Sabs		if (NF != 4 && ($1 != "+" || NF != 1))
1541.25Slukem			printf "Line %d has the wrong number of fields.\n", NR;
1551.34Sabs		if ($1 == "+" )  {
1561.34Sabs			next;
1571.34Sabs		}
1581.53Satatat		if ($1 !~ /^[A-Za-z0-9]([-A-Za-z0-9]*[A-Za-z0-9])*$/)
1591.25Slukem			printf "Group %s has non-alphanumeric characters.\n",
1601.25Slukem			    $1;
1611.49Sjdolecek		if (length($1) > len)
1621.49Sjdolecek			printf "Group %s has more than "len" characters.\n", $1;
1631.15Smrg		if ($3 !~ /[0-9]*/)
1641.25Slukem			printf "Login %s has a negative group id.\n", $1;
1651.15Smrg	}' < $GRP > $OUTPUT
1661.15Smrg	if [ -s $OUTPUT ] ; then
1671.15Smrg		printf "\nChecking the $GRP file:\n"
1681.15Smrg		cat $OUTPUT
1691.15Smrg	fi
1701.15Smrg
1711.15Smrg	awk -F: '{ print $1 }' $GRP | sort | uniq -d > $OUTPUT
1721.15Smrg	if [ -s $OUTPUT ] ; then
1731.15Smrg		printf "\n$GRP has duplicate group names.\n"
1741.15Smrg		column $OUTPUT
1751.15Smrg	fi
1761.9Scgdfi
1771.9Scgd
1781.9Scgd# Check for root paths, umask values in startup files.
1791.9Scgd# The check for the root paths is problematical -- it's likely to fail
1801.9Scgd# in other environments.  Once the shells have been modified to warn
1811.9Scgd# of '.' in the path, the path tests should go away.
1821.32Slukem#
1831.31Slukemif checkyesno check_rootdotfiles; then
1841.28Slukem	> $OUTPUT
1851.15Smrg	rhome=`csh -fc "echo ~root"`
1861.15Smrg	umaskset=no
1871.15Smrg	list="/etc/csh.cshrc /etc/csh.login ${rhome}/.cshrc ${rhome}/.login"
1881.15Smrg	for i in $list ; do
1891.15Smrg		if [ -f $i ] ; then
1901.45Ssommerfe			if egrep '^[ \t]*umask[ \t]+[0-7]+' $i > /dev/null ; then
1911.15Smrg				umaskset=yes
1921.15Smrg			fi
1931.45Ssommerfe			# double check the umask value itself; ensure that both the
1941.45Ssommerfe			# 020 and 002 bits are set.
1951.45Ssommerfe			# we handle this in decimal initially to extract the digits,
1961.45Ssommerfe			# and then extract the `2' bit of each digit.
1971.45Ssommerfe			# this is made especially painful because 
1981.45Ssommerfe			# bitwise operations were left out of awk.
1991.45Ssommerfe			egrep '^[ \t]*umask[ \t]+[0-7]+' $i |
2001.45Ssommerfe			awk '{ g= ($2 % 100) - ($2 % 10);
2011.45Ssommerfe			       g /= 10;
2021.45Ssommerfe			       g = g % 4;
2031.45Ssommerfe			       g -= g % 2;
2041.45Ssommerfe			       if (g != 2) { print "\tRoot umask is group writeable" }
2051.45Ssommerfe			       o = ($2 % 10);
2061.45Ssommerfe			       o = o % 4;
2071.45Ssommerfe			       o -= o % 2;
2081.45Ssommerfe			       if (o != 2) { print "\tRoot umask is other writeable" } }' |
2091.45Ssommerfe			    sort -u >> $OUTPUT
2101.26Slukem			SAVE_PATH=$PATH
2111.26Slukem			unset PATH
2121.15Smrg			/bin/csh -f -s << end-of-csh > /dev/null 2>&1
2131.15Smrg				source $i
2141.15Smrg				/bin/ls -ldgT \$path > $TMP1
2151.9Scgdend-of-csh
2161.26Slukem			PATH=$SAVE_PATH
2171.15Smrg			awk '{
2181.15Smrg				if ($10 ~ /^\.$/) {
2191.27Slukem					print "\tThe root path includes .";
2201.15Smrg					next;
2211.15Smrg				}
2221.15Smrg			     }
2231.15Smrg			     $1 ~ /^d....w/ \
2241.27Slukem		{ print "\tRoot path directory " $10 " is group writeable." } \
2251.15Smrg			     $1 ~ /^d.......w/ \
2261.27Slukem		{ print "\tRoot path directory " $10 " is other writeable." }' \
2271.15Smrg			< $TMP1 >> $OUTPUT
2281.15Smrg		fi
2291.15Smrg	done
2301.15Smrg	if [ $umaskset = "no" -o -s $OUTPUT ] ; then
2311.27Slukem		printf "\nChecking root csh paths, umask values:\n$list\n\n"
2321.15Smrg		if [ -s $OUTPUT ]; then
2331.15Smrg			cat $OUTPUT
2341.15Smrg		fi
2351.15Smrg		if [ $umaskset = "no" ] ; then
2361.27Slukem		    printf "\tRoot csh startup files do not set the umask.\n"
2371.15Smrg		fi
2381.9Scgd	fi
2391.9Scgd
2401.28Slukem	> $OUTPUT
2411.15Smrg	rhome=/root
2421.15Smrg	umaskset=no
2431.23Slukem	list="/etc/profile ${rhome}/.profile"
2441.15Smrg	for i in $list; do
2451.15Smrg		if [ -f $i ] ; then
2461.15Smrg			if egrep umask $i > /dev/null ; then
2471.15Smrg				umaskset=yes
2481.15Smrg			fi
2491.15Smrg			egrep umask $i |
2501.15Smrg			awk '$2 % 100 < 20 \
2511.27Slukem				{ print "\tRoot umask is group writeable" } \
2521.15Smrg			     $2 % 10 < 2 \
2531.27Slukem				{ print "\tRoot umask is other writeable" }' \
2541.27Slukem			    >> $OUTPUT
2551.26Slukem			SAVE_PATH=$PATH
2561.26Slukem			unset PATH
2571.15Smrg			/bin/sh << end-of-sh > /dev/null 2>&1
2581.15Smrg				. $i
2591.26Slukem				list=\`echo \$PATH | /usr/bin/sed -e \
2601.26Slukem				    's/^:/.:/;s/:$/:./;s/::/:.:/g;s/:/ /g'\`
2611.15Smrg				/bin/ls -ldgT \$list > $TMP1
2621.9Scgdend-of-sh
2631.26Slukem			PATH=$SAVE_PATH
2641.15Smrg			awk '{
2651.15Smrg				if ($10 ~ /^\.$/) {
2661.27Slukem					print "\tThe root path includes .";
2671.15Smrg					next;
2681.15Smrg				}
2691.15Smrg			     }
2701.15Smrg			     $1 ~ /^d....w/ \
2711.27Slukem		{ print "\tRoot path directory " $10 " is group writeable." } \
2721.15Smrg			     $1 ~ /^d.......w/ \
2731.27Slukem		{ print "\tRoot path directory " $10 " is other writeable." }' \
2741.15Smrg			< $TMP1 >> $OUTPUT
2751.9Scgd
2761.15Smrg		fi
2771.15Smrg	done
2781.15Smrg	if [ $umaskset = "no" -o -s $OUTPUT ] ; then
2791.15Smrg		printf "\nChecking root sh paths, umask values:\n$list\n"
2801.15Smrg		if [ -s $OUTPUT ]; then
2811.15Smrg			cat $OUTPUT
2821.15Smrg		fi
2831.15Smrg		if [ $umaskset = "no" ] ; then
2841.27Slukem			printf "\tRoot sh startup files do not set the umask.\n"
2851.15Smrg		fi
2861.9Scgd	fi
2871.9Scgdfi
2881.9Scgd
2891.9Scgd# Root and uucp should both be in /etc/ftpusers.
2901.32Slukem#
2911.31Slukemif checkyesno check_ftpusers; then
2921.28Slukem	> $OUTPUT
2931.28Slukem	list="uucp "`awk '$2 == 0 { print $1 }' $MPBYUID`
2941.27Slukem	for i in $list; do
2951.29Slukem		if /usr/libexec/ftpd -C $i ; then
2961.29Slukem			printf "\t$i is not denied\n" >> $OUTPUT
2971.27Slukem		fi
2981.27Slukem	done
2991.28Slukem	if [ -s $OUTPUT ]; then
3001.28Slukem		printf "\nChecking the /etc/ftpusers configuration:\n"
3011.28Slukem		cat $OUTPUT
3021.28Slukem	fi
3031.9Scgdfi
3041.9Scgd
3051.43Sitojun# Uudecode should not be in the /etc/mail/aliases file.
3061.32Slukem#
3071.31Slukemif checkyesno check_aliases; then
3081.43Sitojun	for f in /etc/mail/aliases /etc/aliases; do
3091.43Sitojun		if [ -f $f ] && egrep '^[^#]*(uudecode|decode).*\|' $f; then
3101.43Sitojun			printf "\nEntry for uudecode in $f file.\n"
3111.43Sitojun		fi
3121.43Sitojun	done
3131.9Scgdfi
3141.9Scgd
3151.9Scgd# Files that should not have + signs.
3161.32Slukem#
3171.31Slukemif checkyesno check_rhosts; then
3181.15Smrg	list="/etc/hosts.equiv /etc/hosts.lpd"
3191.15Smrg	for f in $list ; do
3201.15Smrg		if [ -f $f ] && egrep '\+' $f > /dev/null ; then
3211.15Smrg			printf "\nPlus sign in $f file.\n"
3221.15Smrg		fi
3231.15Smrg	done
3241.15Smrg
3251.15Smrg	# Check for special users with .rhosts files.  Only root and toor should
3261.16Smikel	# have .rhosts files.  Also, .rhosts files should not have plus signs.
3271.15Smrg	awk -F: '$1 != "root" && $1 != "toor" && \
3281.15Smrg		($3 < 100 || $1 == "ftp" || $1 == "uucp") \
3291.20Smycroft			{ print $1 " " $9 }' $MP |
3301.19Smycroft	sort -k2 |
3311.15Smrg	while read uid homedir; do
3321.15Smrg		if [ -f ${homedir}/.rhosts ] ; then
3331.15Smrg			rhost=`ls -ldgT ${homedir}/.rhosts`
3341.46Schristos			printf -- "$uid: $rhost\n"
3351.15Smrg		fi
3361.15Smrg	done > $OUTPUT
3371.15Smrg	if [ -s $OUTPUT ] ; then
3381.15Smrg		printf "\nChecking for special users with .rhosts files.\n"
3391.15Smrg		cat $OUTPUT
3401.15Smrg	fi
3411.15Smrg
3421.15Smrg	while read uid homedir; do
3431.35Sfair		if [ -f ${homedir}/.rhosts -a -r ${homedir}/.rhosts ] && \
3441.41Schristos		    cat -f ${homedir}/.rhosts | egrep '\+' > /dev/null ; then
3451.46Schristos			printf -- "$uid: + in .rhosts file.\n"
3461.15Smrg		fi
3471.29Slukem	done < $MPBYPATH > $OUTPUT
3481.15Smrg	if [ -s $OUTPUT ] ; then
3491.15Smrg		printf "\nChecking .rhosts files syntax.\n"
3501.15Smrg		cat $OUTPUT
3511.15Smrg	fi
3521.9Scgdfi
3531.9Scgd
3541.9Scgd# Check home directories.  Directories should not be owned by someone else
3551.9Scgd# or writeable.
3561.32Slukem#
3571.31Slukemif checkyesno check_homes; then
3581.15Smrg	while read uid homedir; do
3591.15Smrg		if [ -d ${homedir}/ ] ; then
3601.15Smrg			file=`ls -ldgT ${homedir}`
3611.46Schristos			printf -- "$uid $file\n"
3621.9Scgd		fi
3631.29Slukem	done < $MPBYPATH |
3641.15Smrg	awk '$1 != $4 && $4 != "root" \
3651.15Smrg		{ print "user " $1 " home directory is owned by " $4 }
3661.15Smrg	     $2 ~ /^-....w/ \
3671.15Smrg		{ print "user " $1 " home directory is group writeable" }
3681.15Smrg	     $2 ~ /^-.......w/ \
3691.27Slukem		{ print "user " $1 " home directory is other writeable" }' \
3701.27Slukem	    > $OUTPUT
3711.15Smrg	if [ -s $OUTPUT ] ; then
3721.15Smrg		printf "\nChecking home directories.\n"
3731.15Smrg		cat $OUTPUT
3741.15Smrg	fi
3751.15Smrg
3761.15Smrg	# Files that should not be owned by someone else or readable.
3771.27Slukem	list=".Xauthority .netrc"
3781.15Smrg	while read uid homedir; do
3791.15Smrg		for f in $list ; do
3801.15Smrg			file=${homedir}/${f}
3811.15Smrg			if [ -f $file ] ; then
3821.46Schristos				printf -- "$uid $f `ls -ldgT $file`\n"
3831.15Smrg			fi
3841.15Smrg		done
3851.29Slukem	done < $MPBYPATH |
3861.15Smrg	awk '$1 != $5 && $5 != "root" \
3871.15Smrg		{ print "user " $1 " " $2 " file is owned by " $5 }
3881.15Smrg	     $3 ~ /^-...r/ \
3891.15Smrg		{ print "user " $1 " " $2 " file is group readable" }
3901.15Smrg	     $3 ~ /^-......r/ \
3911.15Smrg		{ print "user " $1 " " $2 " file is other readable" }
3921.15Smrg	     $3 ~ /^-....w/ \
3931.15Smrg		{ print "user " $1 " " $2 " file is group writeable" }
3941.15Smrg	     $3 ~ /^-.......w/ \
3951.27Slukem		{ print "user " $1 " " $2 " file is other writeable" }' \
3961.27Slukem	    > $OUTPUT
3971.15Smrg
3981.15Smrg	# Files that should not be owned by someone else or writeable.
3991.19Smycroft	list=".bash_history .bash_login .bash_logout .bash_profile .bashrc \
4001.19Smycroft	      .cshrc .emacs .exrc .forward .history .klogin .login .logout \
4011.27Slukem	      .profile .qmail .rc_history .rhosts .tcshrc .twmrc .xinitrc \
4021.27Slukem	      .xsession"
4031.15Smrg	while read uid homedir; do
4041.15Smrg		for f in $list ; do
4051.15Smrg			file=${homedir}/${f}
4061.15Smrg			if [ -f $file ] ; then
4071.46Schristos				printf -- "$uid $f `ls -ldgT $file`\n"
4081.15Smrg			fi
4091.15Smrg		done
4101.29Slukem	done < $MPBYPATH |
4111.15Smrg	awk '$1 != $5 && $5 != "root" \
4121.15Smrg		{ print "user " $1 " " $2 " file is owned by " $5 }
4131.15Smrg	     $3 ~ /^-....w/ \
4141.15Smrg		{ print "user " $1 " " $2 " file is group writeable" }
4151.15Smrg	     $3 ~ /^-.......w/ \
4161.27Slukem		{ print "user " $1 " " $2 " file is other writeable" }' \
4171.27Slukem	    >> $OUTPUT
4181.15Smrg	if [ -s $OUTPUT ] ; then
4191.15Smrg		printf "\nChecking dot files.\n"
4201.15Smrg		cat $OUTPUT
4211.15Smrg	fi
4221.9Scgdfi
4231.9Scgd
4241.9Scgd# Mailboxes should be owned by user and unreadable.
4251.32Slukem#
4261.31Slukemif checkyesno check_varmail; then
4271.15Smrg	ls -l /var/mail | sed 1d | \
4281.15Smrg	awk '$3 != $9 \
4291.15Smrg		{ print "user " $9 " mailbox is owned by " $3 }
4301.15Smrg	     $1 != "-rw-------" \
4311.15Smrg		{ print "user " $9 " mailbox is " $1 ", group " $4 }' > $OUTPUT
4321.15Smrg	if [ -s $OUTPUT ] ; then
4331.15Smrg		printf "\nChecking mailbox ownership.\n"
4341.15Smrg		cat $OUTPUT
4351.15Smrg	fi
4361.15Smrgfi
4371.15Smrg
4381.32Slukem# NFS exports shouldn't be globally exported
4391.32Slukem#
4401.32Slukemif checkyesno check_nfs && [ -f /etc/exports ]; then
4411.32Slukem	awk '{
4421.22Slukem		# ignore comments and blank lines
4431.39Shubertf		if ($0 ~ /^\#/ || $0 ~ /^$/ )
4441.22Slukem			next;
4451.22Slukem
4461.15Smrg		readonly = 0;
4471.15Smrg		for (i = 2; i <= NF; ++i) {
4481.15Smrg			if ($i ~ /-ro/)
4491.15Smrg				readonly = 1;
4501.15Smrg			else if ($i !~ /^-/)
4511.15Smrg				next;
4521.15Smrg		}
4531.15Smrg		if (readonly)
4541.15Smrg			print "File system " $1 " globally exported, read-only."
4551.15Smrg		else
4561.15Smrg			print "File system " $1 " globally exported, read-write."
4571.32Slukem	}' < /etc/exports > $OUTPUT
4581.32Slukem	if [ -s $OUTPUT ] ; then
4591.15Smrg		printf "\nChecking for globally exported file systems.\n"
4601.15Smrg		cat $OUTPUT
4611.15Smrg	fi
4621.9Scgdfi
4631.9Scgd
4641.9Scgd# Display any changes in setuid files and devices.
4651.32Slukem#
4661.31Slukemif checkyesno check_devices; then
4671.28Slukem	> $ERR
4681.15Smrg	(find / \( ! -fstype local -o -fstype fdesc -o -fstype kernfs \
4691.15Smrg			-o -fstype procfs \) -a -prune -o \
4701.21Smycroft	    \( \( -perm -u+s -a ! -type d \) -o \
4711.21Smycroft	       \( -perm -g+s -a ! -type d \) -o \
4721.24Slukem	       -type b -o -type c \) -print0 | \
4731.24Slukem	xargs -0 ls -ldgTq | sort +9 > $LIST) 2> $OUTPUT
4741.15Smrg
4751.15Smrg	# Display any errors that occurred during system file walk.
4761.15Smrg	if [ -s $OUTPUT ] ; then
4771.28Slukem		printf "Setuid/device find errors:\n" >> $ERR
4781.28Slukem		cat $OUTPUT >> $ERR
4791.28Slukem		printf "\n" >> $ERR
4801.15Smrg	fi
4811.15Smrg
4821.15Smrg	# Display any changes in the setuid file list.
4831.15Smrg	egrep -v '^[bc]' $LIST > $TMP1
4841.15Smrg	if [ -s $TMP1 ] ; then
4851.15Smrg		# Check to make sure uudecode isn't setuid.
4861.15Smrg		if grep -w uudecode $TMP1 > /dev/null ; then
4871.28Slukem			printf "\nUudecode is setuid.\n" >> $ERR
4881.15Smrg		fi
4891.15Smrg
4901.48Sabs		CUR=$backup_dir/setuid.current
4911.48Sabs		BACK=$backup_dir/setuid.backup
4921.9Scgd
4931.15Smrg		if [ -s $CUR ] ; then
4941.15Smrg			if cmp -s $CUR $TMP1 ; then
4951.15Smrg				:
4961.15Smrg			else
4971.15Smrg				> $TMP2
4981.15Smrg				join -110 -210 -v2 $CUR $TMP1 > $OUTPUT
4991.15Smrg				if [ -s $OUTPUT ] ; then
5001.28Slukem					printf "Setuid additions:\n" >> $ERR
5011.28Slukem					tee -a $TMP2 < $OUTPUT >> $ERR
5021.28Slukem					printf "\n" >> $ERR
5031.15Smrg				fi
5041.15Smrg
5051.15Smrg				join -110 -210 -v1 $CUR $TMP1 > $OUTPUT
5061.15Smrg				if [ -s $OUTPUT ] ; then
5071.28Slukem					printf "Setuid deletions:\n" >> $ERR
5081.28Slukem					tee -a $TMP2 < $OUTPUT >> $ERR
5091.28Slukem					printf "\n" >> $ERR
5101.15Smrg				fi
5111.15Smrg
5121.20Smycroft				sort -k10 $TMP2 $CUR $TMP1 | \
5131.27Slukem				    sed -e 's/[	 ][	 ]*/ /g' | \
5141.27Slukem				    uniq -u > $OUTPUT
5151.15Smrg				if [ -s $OUTPUT ] ; then
5161.28Slukem					printf "Setuid changes:\n" >> $ERR
5171.28Slukem					column -t $OUTPUT >> $ERR
5181.28Slukem					printf "\n" >> $ERR
5191.15Smrg				fi
5201.9Scgd
5211.52Satatat				backup_file update $TMP1 $CUR $BACK
5221.9Scgd			fi
5231.15Smrg		else
5241.28Slukem			printf "Setuid additions:\n" >> $ERR
5251.28Slukem			column -t $TMP1 >> $ERR
5261.28Slukem			printf "\n" >> $ERR
5271.52Satatat			backup_file add $TMP1 $CUR $BACK
5281.9Scgd		fi
5291.15Smrg	fi
5301.15Smrg
5311.27Slukem	# Check for block and character disk devices that are readable or
5321.27Slukem	# writeable or not owned by root.operator.
5331.15Smrg	>$TMP1
5341.27Slukem	DISKLIST="acd ccd cd ch fd hk hp mcd md ra rb rd rl rx rz \
5351.27Slukem	    sd se ss tz uk up vnd wd xd xy"
5361.27Slukem#	DISKLIST="$DISKLIST ct mt st wt"
5371.15Smrg	for i in $DISKLIST; do
5381.15Smrg		egrep "^b.*/${i}[0-9][0-9]*[a-p]$"  $LIST >> $TMP1
5391.15Smrg		egrep "^c.*/r${i}[0-9][0-9]*[a-p]$"  $LIST >> $TMP1
5401.15Smrg	done
5411.15Smrg
5421.15Smrg	awk '$3 != "root" || $4 != "operator" || $1 !~ /.rw-r-----/ \
5431.25Slukem		{ printf "Disk %s is user %s, group %s, permissions %s.\n", \
5441.25Slukem		    $11, $3, $4, $1; }' < $TMP1 > $OUTPUT
5451.15Smrg	if [ -s $OUTPUT ] ; then
5461.28Slukem		printf "\nChecking disk ownership and permissions.\n" >> $ERR
5471.28Slukem		cat $OUTPUT >> $ERR
5481.28Slukem		printf "\n" >> $ERR
5491.9Scgd	fi
5501.9Scgd
5511.15Smrg	# Display any changes in the device file list.
5521.20Smycroft	egrep '^[bc]' $LIST | sort -k11 > $TMP1
5531.15Smrg	if [ -s $TMP1 ] ; then
5541.48Sabs		CUR=$backup_dir/device.current
5551.48Sabs		BACK=$backup_dir/device.backup
5561.15Smrg
5571.15Smrg		if [ -s $CUR ] ; then
5581.15Smrg			if cmp -s $CUR $TMP1 ; then
5591.15Smrg				:
5601.15Smrg			else
5611.15Smrg				> $TMP2
5621.15Smrg				join -111 -211 -v2 $CUR $TMP1 > $OUTPUT
5631.15Smrg				if [ -s $OUTPUT ] ; then
5641.28Slukem					printf "Device additions:\n" >> $ERR
5651.28Slukem					tee -a $TMP2 < $OUTPUT >> $ERR
5661.28Slukem					printf "\n" >> $ERR
5671.15Smrg				fi
5681.15Smrg
5691.15Smrg				join -111 -211 -v1 $CUR $TMP1 > $OUTPUT
5701.15Smrg				if [ -s $OUTPUT ] ; then
5711.28Slukem					printf "Device deletions:\n" >> $ERR
5721.28Slukem					tee -a $TMP2 < $OUTPUT >> $ERR
5731.28Slukem					printf "\n" >> $ERR
5741.15Smrg				fi
5751.15Smrg
5761.27Slukem				# Report any block device change. Ignore
5771.27Slukem				# character devices, only the name is
5781.27Slukem				# significant.
5791.15Smrg				cat $TMP2 $CUR $TMP1 | \
5801.27Slukem				    sed -e '/^c/d' | \
5811.27Slukem				    sort -k11 | \
5821.27Slukem				    sed -e 's/[	 ][	 ]*/ /g' | \
5831.27Slukem				    uniq -u > $OUTPUT
5841.15Smrg				if [ -s $OUTPUT ] ; then
5851.28Slukem					printf "Block device changes:\n" >> $ERR
5861.28Slukem					column -t $OUTPUT >> $ERR
5871.28Slukem					printf "\n" >> $ERR
5881.15Smrg				fi
5891.9Scgd
5901.52Satatat				backup_file update $TMP1 $CUR $BACK
5911.9Scgd			fi
5921.15Smrg		else
5931.28Slukem			printf "Device additions:\n" >> $ERR
5941.28Slukem			column -t $TMP1 >> $ERR
5951.28Slukem			printf "\n" >> $ERR
5961.52Satatat			backup_file add $TMP1 $CUR $BACK >> $ERR
5971.9Scgd		fi
5981.28Slukem	fi
5991.28Slukem	if [ -s $ERR ] ; then
6001.28Slukem		printf "\nChecking setuid files and devices:\n"
6011.28Slukem		cat $ERR
6021.28Slukem		printf "\n"
6031.9Scgd	fi
6041.9Scgdfi
6051.9Scgd
6061.9Scgd# Check special files.
6071.9Scgd# Check system binaries.
6081.9Scgd#
6091.9Scgd# Create the mtree tree specifications using:
6101.9Scgd#
6111.9Scgd#	mtree -cx -pDIR -kcksum,gid,mode,nlink,size,link,time,uid > DIR.secure
6121.38Skleink#	chown root:wheel DIR.secure
6131.16Smikel#	chmod 600 DIR.secure
6141.9Scgd#
6151.9Scgd# Note, this is not complete protection against Trojan horsed binaries, as
6161.9Scgd# the hacker can modify the tree specification to match the replaced binary.
6171.9Scgd# For details on really protecting yourself against modified binaries, see
6181.9Scgd# the mtree(8) manual page.
6191.32Slukem#
6201.31Slukemif checkyesno check_mtree; then
6211.9Scgd	mtree -e -p / -f /etc/mtree/special > $OUTPUT
6221.15Smrg	if [ -s $OUTPUT ]; then
6231.9Scgd		printf "\nChecking special files and directories.\n"
6241.9Scgd		cat $OUTPUT
6251.9Scgd	fi
6261.9Scgd
6271.9Scgd	> $OUTPUT
6281.16Smikel	for file in /etc/mtree/*.secure; do
6291.16Smikel		[ $file = '/etc/mtree/*.secure' ] && continue
6301.9Scgd		tree=`sed -n -e '3s/.* //p' -e 3q $file`
6311.9Scgd		mtree -f $file -p $tree > $TMP1
6321.9Scgd		if [ -s $TMP1 ]; then
6331.9Scgd			printf "\nChecking $tree:\n" >> $OUTPUT
6341.9Scgd			cat $TMP1 >> $OUTPUT
6351.9Scgd		fi
6361.9Scgd	done
6371.15Smrg	if [ -s $OUTPUT ]; then
6381.9Scgd		printf "\nChecking system binaries:\n"
6391.9Scgd		cat $OUTPUT
6401.9Scgd	fi
6411.9Scgdfi
6421.9Scgd
6431.32SlukemCHANGELIST=""
6441.32Slukem
6451.32Slukem# Backup disklabels of available disks
6461.32Slukem#
6471.32Slukemif checkyesno check_disklabels; then
6481.32Slukem		# generate list of old disklabels and remove them
6491.48Sabs	ls -1d $backup_dir/disklabel.* 2>/dev/null |
6501.52Satatat	    egrep -v '\.(backup|current)(,v)?$' > $LABELS
6511.32Slukem	xargs rm < $LABELS
6521.32Slukem
6531.40Sperry	disks=`iostat -x | sed 1d | awk '$1 !~ /^[cfm]d/ { print $1; }'`
6541.32Slukem	for i in $disks; do
6551.48Sabs		dlf="$backup_dir/disklabel.$i"
6561.32Slukem		disklabel $i > $dlf 2>/dev/null
6571.32Slukem	done
6581.32Slukem
6591.32Slukem		# append list of new disklabels, sort list
6601.48Sabs	ls -1d $backup_dir/disklabel.* 2>/dev/null |
6611.52Satatat	    egrep -v '\.(backup|current)(,v)?$' >> $LABELS
6621.32Slukem	sort -u -o $LABELS $LABELS
6631.32Slukem	CHANGELIST=$LABELS
6641.32Slukemfi
6651.32Slukem
6661.9Scgd# List of files that get backed up and checked for any modifications.  Each
6671.48Sabs# file is expected to have two backups, $backup_dir/file.{current,backup}.
6681.9Scgd# Any changes cause the files to rotate.
6691.32Slukem#
6701.31Slukemif checkyesno check_changelist && [ -s /etc/changelist ] ; then
6711.32Slukem	CHANGELIST="/etc/changelist $CHANGELIST"
6721.32Slukemfi
6731.32Slukem
6741.32Slukemif [ -n "$CHANGELIST" ]; then
6751.32Slukem	for file in `egrep -hv "^#|$MP" $CHANGELIST`; do
6761.54Satatat		# old changelist backup names
6771.54Satatat		OCUR=$backup_dir/${file##*/}.current
6781.54Satatat		OBACK=$backup_dir/${file##*/}.backup
6791.54Satatat		# new changelist backup names
6801.54Satatat		CUR=$backup_dir$file.current
6811.54Satatat		BACK=$backup_dir$file.backup
6821.54Satatat		# roll over old backups
6831.54Satatat		if [ ! -d ${CUR%/*} ]; then
6841.54Satatat			mkdir -p ${CUR%/*}
6851.54Satatat		fi
6861.54Satatat		if [ -f $OCUR -a ! -f $CUR ]; then
6871.54Satatat			mv $OCUR $CUR
6881.54Satatat		fi
6891.54Satatat		if [ -f $OCUR,v -a ! -f $CUR,v ]; then
6901.54Satatat			mv $OCUR,v $CUR,v
6911.54Satatat		fi
6921.54Satatat		if [ -f $OBACK -a ! -f $BACK ]; then
6931.54Satatat			mv $OBACK $BACK
6941.54Satatat		fi
6951.54Satatat		# and down to work
6961.30Smycroft		if [ -f $file ]; then
6971.30Smycroft			if [ -f $CUR ] ; then
6981.9Scgd				diff $CUR $file > $OUTPUT
6991.9Scgd				if [ -s $OUTPUT ] ; then
7001.9Scgd		printf "\n======\n%s diffs (OLD < > NEW)\n======\n" $file
7011.9Scgd					cat $OUTPUT
7021.52Satatat					backup_file update $file $CUR $BACK
7031.9Scgd				fi
7041.9Scgd			else
7051.30Smycroft		printf "\n======\n%s added\n======\n" $file
7061.30Smycroft				diff /dev/null $file
7071.52Satatat				backup_file add $file $CUR $BACK
7081.30Smycroft			fi
7091.30Smycroft		else
7101.30Smycroft			if [ -f $CUR ]; then
7111.30Smycroft		printf "\n======\n%s removed\n======\n" $file
7121.30Smycroft				diff $CUR /dev/null
7131.52Satatat				backup_file remove $file $CUR $BACK
7141.9Scgd			fi
7151.9Scgd		fi
7161.9Scgd	done
7171.44Sadfi
7181.44Sad
7191.44Sadif [ -f /etc/security.local ]; then
7201.44Sad	echo ""
7211.44Sad	echo "Running /etc/security.local:"
7221.44Sad	. /etc/security.local
7231.9Scgdfi
724