security revision 1.52
11.1Scgd#!/bin/sh -
21.1Scgd#
31.52Satatat#	$NetBSD: security,v 1.52 2001/04/04 03:17:19 atatat 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.15SmrgSECUREDIR=/tmp/_securedir.$$
231.15Smrgif ! mkdir $SECUREDIR; then
241.15Smrg	echo can not create $SECUREDIR.
251.15Smrg	exit 1
261.15Smrgfi
271.15Smrg
281.15Smrgif ! cd $SECUREDIR; then
291.15Smrg	echo can not chdir to $SECUREDIR.
301.15Smrg	exit 1
311.15Smrgfi
321.15Smrg
331.34Sabsif [ -z "$max_loginlen" ];then
341.34Sabs    max_loginlen=8
351.34Sabsfi
361.34Sabs
371.49Sjdolecekif [ -z "$max_grouplen" ]; then
381.49Sjdolecek    max_grouplen=8
391.49Sjdolecekfi
401.49Sjdolecek
411.15SmrgERR=secure1.$$
421.15SmrgTMP1=secure2.$$
431.15SmrgTMP2=secure3.$$
441.28SlukemMPBYUID=secure4.$$
451.29SlukemMPBYPATH=secure5.$$
461.27SlukemLIST=secure6.$$
471.27SlukemOUTPUT=secure7.$$
481.32SlukemLABELS=secure8.$$
491.15Smrg
501.27Slukemtrap '/bin/rm -rf $SECUREDIR ; exit 0' 0 2 3
511.15Smrg
521.48Sabs# Handle backup_dir not being set in .conf file
531.48Sabsbackup_dir=${backup_dir:-/var/backups}
541.48Sabs
551.15SmrgMP=/etc/master.passwd
561.9Scgd
571.27Slukem# these is used several times.
581.34Sabsawk -F: '!/^+/ { print $1 " " $3 }' $MP | sort -k2n > $MPBYUID
591.29Slukemawk -F: '{ print $1 " " $9 }' $MP | sort -k2 > $MPBYPATH
601.9Scgd
611.9Scgd# Check the master password file syntax.
621.32Slukem#
631.31Slukemif checkyesno check_passwd; then
641.34Sabs	awk -v "len=$max_loginlen" '
651.25Slukem	BEGIN {
661.25Slukem		while ( getline < "/etc/shells" > 0 ) {
671.39Shubertf			if ($0 ~ /^\#/ || $0 ~ /^$/ )
681.25Slukem				continue;
691.25Slukem			shells[$1]++;
701.25Slukem		}
711.25Slukem		FS=":";
721.25Slukem	}
731.25Slukem
741.25Slukem	{
751.15Smrg		if ($0 ~ /^[	 ]*$/) {
761.25Slukem			printf "Line %d is a blank line.\n", NR;
771.15Smrg			next;
781.15Smrg		}
791.34Sabs		if (NF != 10 && ($1 != "+" || NF != 1))
801.25Slukem			printf "Line %d has the wrong number of fields.\n", NR;
811.34Sabs		if ($1 == "+" )  {
821.34Sabs			if (NF != 1 && $3 == 0)
831.34Sabs			    printf "Line %d includes entries with uid 0.\n", NR;
841.34Sabs			next;
851.34Sabs		}
861.15Smrg		if ($1 !~ /^[A-Za-z0-9]*$/)
871.25Slukem			printf "Login %s has non-alphanumeric characters.\n",
881.25Slukem			    $1;
891.34Sabs		if (length($1) > len)
901.34Sabs			printf "Login %s has more than "len" characters.\n", $1;
911.15Smrg		if ($2 == "")
921.25Slukem			printf "Login %s has no password.\n", $1;
931.50Satatat		if (length($2) != 13 && length($2) != 20 && length($2) != 34 && $2 != "") {
941.25Slukem			if ($10 == "" || shells[$10])
951.27Slukem		    printf "Login %s is off but still has a valid shell (%s)\n",
961.25Slukem				    $1, $10;
971.25Slukem		} else if (! shells[$10])
981.25Slukem			printf "Login %s does not have a valid shell (%s)\n",
991.25Slukem			    $1, $10;
1001.15Smrg		if ($3 == 0 && $1 != "root" && $1 != "toor")
1011.25Slukem			printf "Login %s has a user id of 0.\n", $1;
1021.15Smrg		if ($3 < 0)
1031.25Slukem			printf "Login %s has a negative user id.\n", $1;
1041.15Smrg		if ($4 < 0)
1051.25Slukem			printf "Login %s has a negative group id.\n", $1;
1061.15Smrg	}' < $MP > $OUTPUT
1071.15Smrg	if [ -s $OUTPUT ] ; then
1081.15Smrg		printf "\nChecking the $MP file:\n"
1091.15Smrg		cat $OUTPUT
1101.15Smrg	fi
1111.15Smrg
1121.15Smrg	awk -F: '{ print $1 }' $MP | sort | uniq -d > $OUTPUT
1131.15Smrg	if [ -s $OUTPUT ] ; then
1141.15Smrg		printf "\n$MP has duplicate user names.\n"
1151.15Smrg		column $OUTPUT
1161.15Smrg	fi
1171.15Smrg
1181.37Swrstuden# To not exclude 'toor', a standard duplicate root account, from the duplicate
1191.37Swrstuden# account test, uncomment the line below (without egrep in it)and comment
1201.37Swrstuden# out the line (with egrep in it) below it.
1211.37Swrstuden#
1221.37Swrstuden#	< $MPBYUID uniq -d -f 1 | awk '{ print $2 }' > $TMP2
1231.36Swrstuden	< $MPBYUID egrep -v '^toor ' | uniq -d -f 1 | awk '{ print $2 }' > $TMP2
1241.15Smrg	if [ -s $TMP2 ] ; then
1251.15Smrg		printf "\n$MP has duplicate user id's.\n"
1261.15Smrg		while read uid; do
1271.28Slukem			grep -w $uid $MPBYUID
1281.15Smrg		done < $TMP2 | column
1291.15Smrg	fi
1301.9Scgdfi
1311.9Scgd
1321.9Scgd# Backup the master password file; a special case, the normal backup
1331.9Scgd# mechanisms also print out file differences and we don't want to do
1341.9Scgd# that because this file has encrypted passwords in it.
1351.32Slukem#
1361.48SabsCUR=$backup_dir/${MP##*/}.current
1371.48SabsBACK=$backup_dir/${MP##*/}.backup
1381.9Scgdif [ -s $CUR ] ; then
1391.9Scgd	if cmp -s $CUR $MP; then
1401.9Scgd		:
1411.9Scgd	else
1421.52Satatat		backup_file update $MP $CUR $BACK
1431.9Scgd	fi
1441.9Scgdelse
1451.52Satatat	backup_file add $MP $CUR $BACK
1461.9Scgdfi
1471.9Scgd
1481.9Scgd# Check the group file syntax.
1491.32Slukem#
1501.31Slukemif checkyesno check_group; then
1511.15Smrg	GRP=/etc/group
1521.49Sjdolecek	awk -F: -v "len=$max_grouplen" '{
1531.15Smrg		if ($0 ~ /^[	 ]*$/) {
1541.25Slukem			printf "Line %d is a blank line.\n", NR;
1551.15Smrg			next;
1561.15Smrg		}
1571.34Sabs		if (NF != 4 && ($1 != "+" || NF != 1))
1581.25Slukem			printf "Line %d has the wrong number of fields.\n", NR;
1591.34Sabs		if ($1 == "+" )  {
1601.34Sabs			next;
1611.34Sabs		}
1621.15Smrg		if ($1 !~ /^[A-za-z0-9]*$/)
1631.25Slukem			printf "Group %s has non-alphanumeric characters.\n",
1641.25Slukem			    $1;
1651.49Sjdolecek		if (length($1) > len)
1661.49Sjdolecek			printf "Group %s has more than "len" characters.\n", $1;
1671.15Smrg		if ($3 !~ /[0-9]*/)
1681.25Slukem			printf "Login %s has a negative group id.\n", $1;
1691.15Smrg	}' < $GRP > $OUTPUT
1701.15Smrg	if [ -s $OUTPUT ] ; then
1711.15Smrg		printf "\nChecking the $GRP file:\n"
1721.15Smrg		cat $OUTPUT
1731.15Smrg	fi
1741.15Smrg
1751.15Smrg	awk -F: '{ print $1 }' $GRP | sort | uniq -d > $OUTPUT
1761.15Smrg	if [ -s $OUTPUT ] ; then
1771.15Smrg		printf "\n$GRP has duplicate group names.\n"
1781.15Smrg		column $OUTPUT
1791.15Smrg	fi
1801.9Scgdfi
1811.9Scgd
1821.9Scgd# Check for root paths, umask values in startup files.
1831.9Scgd# The check for the root paths is problematical -- it's likely to fail
1841.9Scgd# in other environments.  Once the shells have been modified to warn
1851.9Scgd# of '.' in the path, the path tests should go away.
1861.32Slukem#
1871.31Slukemif checkyesno check_rootdotfiles; then
1881.28Slukem	> $OUTPUT
1891.15Smrg	rhome=`csh -fc "echo ~root"`
1901.15Smrg	umaskset=no
1911.15Smrg	list="/etc/csh.cshrc /etc/csh.login ${rhome}/.cshrc ${rhome}/.login"
1921.15Smrg	for i in $list ; do
1931.15Smrg		if [ -f $i ] ; then
1941.45Ssommerfe			if egrep '^[ \t]*umask[ \t]+[0-7]+' $i > /dev/null ; then
1951.15Smrg				umaskset=yes
1961.15Smrg			fi
1971.45Ssommerfe			# double check the umask value itself; ensure that both the
1981.45Ssommerfe			# 020 and 002 bits are set.
1991.45Ssommerfe			# we handle this in decimal initially to extract the digits,
2001.45Ssommerfe			# and then extract the `2' bit of each digit.
2011.45Ssommerfe			# this is made especially painful because 
2021.45Ssommerfe			# bitwise operations were left out of awk.
2031.45Ssommerfe			egrep '^[ \t]*umask[ \t]+[0-7]+' $i |
2041.45Ssommerfe			awk '{ g= ($2 % 100) - ($2 % 10);
2051.45Ssommerfe			       g /= 10;
2061.45Ssommerfe			       g = g % 4;
2071.45Ssommerfe			       g -= g % 2;
2081.45Ssommerfe			       if (g != 2) { print "\tRoot umask is group writeable" }
2091.45Ssommerfe			       o = ($2 % 10);
2101.45Ssommerfe			       o = o % 4;
2111.45Ssommerfe			       o -= o % 2;
2121.45Ssommerfe			       if (o != 2) { print "\tRoot umask is other writeable" } }' |
2131.45Ssommerfe			    sort -u >> $OUTPUT
2141.26Slukem			SAVE_PATH=$PATH
2151.26Slukem			unset PATH
2161.15Smrg			/bin/csh -f -s << end-of-csh > /dev/null 2>&1
2171.15Smrg				source $i
2181.15Smrg				/bin/ls -ldgT \$path > $TMP1
2191.9Scgdend-of-csh
2201.26Slukem			PATH=$SAVE_PATH
2211.15Smrg			awk '{
2221.15Smrg				if ($10 ~ /^\.$/) {
2231.27Slukem					print "\tThe root path includes .";
2241.15Smrg					next;
2251.15Smrg				}
2261.15Smrg			     }
2271.15Smrg			     $1 ~ /^d....w/ \
2281.27Slukem		{ print "\tRoot path directory " $10 " is group writeable." } \
2291.15Smrg			     $1 ~ /^d.......w/ \
2301.27Slukem		{ print "\tRoot path directory " $10 " is other writeable." }' \
2311.15Smrg			< $TMP1 >> $OUTPUT
2321.15Smrg		fi
2331.15Smrg	done
2341.15Smrg	if [ $umaskset = "no" -o -s $OUTPUT ] ; then
2351.27Slukem		printf "\nChecking root csh paths, umask values:\n$list\n\n"
2361.15Smrg		if [ -s $OUTPUT ]; then
2371.15Smrg			cat $OUTPUT
2381.15Smrg		fi
2391.15Smrg		if [ $umaskset = "no" ] ; then
2401.27Slukem		    printf "\tRoot csh startup files do not set the umask.\n"
2411.15Smrg		fi
2421.9Scgd	fi
2431.9Scgd
2441.28Slukem	> $OUTPUT
2451.15Smrg	rhome=/root
2461.15Smrg	umaskset=no
2471.23Slukem	list="/etc/profile ${rhome}/.profile"
2481.15Smrg	for i in $list; do
2491.15Smrg		if [ -f $i ] ; then
2501.15Smrg			if egrep umask $i > /dev/null ; then
2511.15Smrg				umaskset=yes
2521.15Smrg			fi
2531.15Smrg			egrep umask $i |
2541.15Smrg			awk '$2 % 100 < 20 \
2551.27Slukem				{ print "\tRoot umask is group writeable" } \
2561.15Smrg			     $2 % 10 < 2 \
2571.27Slukem				{ print "\tRoot umask is other writeable" }' \
2581.27Slukem			    >> $OUTPUT
2591.26Slukem			SAVE_PATH=$PATH
2601.26Slukem			unset PATH
2611.15Smrg			/bin/sh << end-of-sh > /dev/null 2>&1
2621.15Smrg				. $i
2631.26Slukem				list=\`echo \$PATH | /usr/bin/sed -e \
2641.26Slukem				    's/^:/.:/;s/:$/:./;s/::/:.:/g;s/:/ /g'\`
2651.15Smrg				/bin/ls -ldgT \$list > $TMP1
2661.9Scgdend-of-sh
2671.26Slukem			PATH=$SAVE_PATH
2681.15Smrg			awk '{
2691.15Smrg				if ($10 ~ /^\.$/) {
2701.27Slukem					print "\tThe root path includes .";
2711.15Smrg					next;
2721.15Smrg				}
2731.15Smrg			     }
2741.15Smrg			     $1 ~ /^d....w/ \
2751.27Slukem		{ print "\tRoot path directory " $10 " is group writeable." } \
2761.15Smrg			     $1 ~ /^d.......w/ \
2771.27Slukem		{ print "\tRoot path directory " $10 " is other writeable." }' \
2781.15Smrg			< $TMP1 >> $OUTPUT
2791.9Scgd
2801.15Smrg		fi
2811.15Smrg	done
2821.15Smrg	if [ $umaskset = "no" -o -s $OUTPUT ] ; then
2831.15Smrg		printf "\nChecking root sh paths, umask values:\n$list\n"
2841.15Smrg		if [ -s $OUTPUT ]; then
2851.15Smrg			cat $OUTPUT
2861.15Smrg		fi
2871.15Smrg		if [ $umaskset = "no" ] ; then
2881.27Slukem			printf "\tRoot sh startup files do not set the umask.\n"
2891.15Smrg		fi
2901.9Scgd	fi
2911.9Scgdfi
2921.9Scgd
2931.9Scgd# Root and uucp should both be in /etc/ftpusers.
2941.32Slukem#
2951.31Slukemif checkyesno check_ftpusers; then
2961.28Slukem	> $OUTPUT
2971.28Slukem	list="uucp "`awk '$2 == 0 { print $1 }' $MPBYUID`
2981.27Slukem	for i in $list; do
2991.29Slukem		if /usr/libexec/ftpd -C $i ; then
3001.29Slukem			printf "\t$i is not denied\n" >> $OUTPUT
3011.27Slukem		fi
3021.27Slukem	done
3031.28Slukem	if [ -s $OUTPUT ]; then
3041.28Slukem		printf "\nChecking the /etc/ftpusers configuration:\n"
3051.28Slukem		cat $OUTPUT
3061.28Slukem	fi
3071.9Scgdfi
3081.9Scgd
3091.43Sitojun# Uudecode should not be in the /etc/mail/aliases file.
3101.32Slukem#
3111.31Slukemif checkyesno check_aliases; then
3121.43Sitojun	for f in /etc/mail/aliases /etc/aliases; do
3131.43Sitojun		if [ -f $f ] && egrep '^[^#]*(uudecode|decode).*\|' $f; then
3141.43Sitojun			printf "\nEntry for uudecode in $f file.\n"
3151.43Sitojun		fi
3161.43Sitojun	done
3171.9Scgdfi
3181.9Scgd
3191.9Scgd# Files that should not have + signs.
3201.32Slukem#
3211.31Slukemif checkyesno check_rhosts; then
3221.15Smrg	list="/etc/hosts.equiv /etc/hosts.lpd"
3231.15Smrg	for f in $list ; do
3241.15Smrg		if [ -f $f ] && egrep '\+' $f > /dev/null ; then
3251.15Smrg			printf "\nPlus sign in $f file.\n"
3261.15Smrg		fi
3271.15Smrg	done
3281.15Smrg
3291.15Smrg	# Check for special users with .rhosts files.  Only root and toor should
3301.16Smikel	# have .rhosts files.  Also, .rhosts files should not have plus signs.
3311.15Smrg	awk -F: '$1 != "root" && $1 != "toor" && \
3321.15Smrg		($3 < 100 || $1 == "ftp" || $1 == "uucp") \
3331.20Smycroft			{ print $1 " " $9 }' $MP |
3341.19Smycroft	sort -k2 |
3351.15Smrg	while read uid homedir; do
3361.15Smrg		if [ -f ${homedir}/.rhosts ] ; then
3371.15Smrg			rhost=`ls -ldgT ${homedir}/.rhosts`
3381.46Schristos			printf -- "$uid: $rhost\n"
3391.15Smrg		fi
3401.15Smrg	done > $OUTPUT
3411.15Smrg	if [ -s $OUTPUT ] ; then
3421.15Smrg		printf "\nChecking for special users with .rhosts files.\n"
3431.15Smrg		cat $OUTPUT
3441.15Smrg	fi
3451.15Smrg
3461.15Smrg	while read uid homedir; do
3471.35Sfair		if [ -f ${homedir}/.rhosts -a -r ${homedir}/.rhosts ] && \
3481.41Schristos		    cat -f ${homedir}/.rhosts | egrep '\+' > /dev/null ; then
3491.46Schristos			printf -- "$uid: + in .rhosts file.\n"
3501.15Smrg		fi
3511.29Slukem	done < $MPBYPATH > $OUTPUT
3521.15Smrg	if [ -s $OUTPUT ] ; then
3531.15Smrg		printf "\nChecking .rhosts files syntax.\n"
3541.15Smrg		cat $OUTPUT
3551.15Smrg	fi
3561.9Scgdfi
3571.9Scgd
3581.9Scgd# Check home directories.  Directories should not be owned by someone else
3591.9Scgd# or writeable.
3601.32Slukem#
3611.31Slukemif checkyesno check_homes; then
3621.15Smrg	while read uid homedir; do
3631.15Smrg		if [ -d ${homedir}/ ] ; then
3641.15Smrg			file=`ls -ldgT ${homedir}`
3651.46Schristos			printf -- "$uid $file\n"
3661.9Scgd		fi
3671.29Slukem	done < $MPBYPATH |
3681.15Smrg	awk '$1 != $4 && $4 != "root" \
3691.15Smrg		{ print "user " $1 " home directory is owned by " $4 }
3701.15Smrg	     $2 ~ /^-....w/ \
3711.15Smrg		{ print "user " $1 " home directory is group writeable" }
3721.15Smrg	     $2 ~ /^-.......w/ \
3731.27Slukem		{ print "user " $1 " home directory is other writeable" }' \
3741.27Slukem	    > $OUTPUT
3751.15Smrg	if [ -s $OUTPUT ] ; then
3761.15Smrg		printf "\nChecking home directories.\n"
3771.15Smrg		cat $OUTPUT
3781.15Smrg	fi
3791.15Smrg
3801.15Smrg	# Files that should not be owned by someone else or readable.
3811.27Slukem	list=".Xauthority .netrc"
3821.15Smrg	while read uid homedir; do
3831.15Smrg		for f in $list ; do
3841.15Smrg			file=${homedir}/${f}
3851.15Smrg			if [ -f $file ] ; then
3861.46Schristos				printf -- "$uid $f `ls -ldgT $file`\n"
3871.15Smrg			fi
3881.15Smrg		done
3891.29Slukem	done < $MPBYPATH |
3901.15Smrg	awk '$1 != $5 && $5 != "root" \
3911.15Smrg		{ print "user " $1 " " $2 " file is owned by " $5 }
3921.15Smrg	     $3 ~ /^-...r/ \
3931.15Smrg		{ print "user " $1 " " $2 " file is group readable" }
3941.15Smrg	     $3 ~ /^-......r/ \
3951.15Smrg		{ print "user " $1 " " $2 " file is other readable" }
3961.15Smrg	     $3 ~ /^-....w/ \
3971.15Smrg		{ print "user " $1 " " $2 " file is group writeable" }
3981.15Smrg	     $3 ~ /^-.......w/ \
3991.27Slukem		{ print "user " $1 " " $2 " file is other writeable" }' \
4001.27Slukem	    > $OUTPUT
4011.15Smrg
4021.15Smrg	# Files that should not be owned by someone else or writeable.
4031.19Smycroft	list=".bash_history .bash_login .bash_logout .bash_profile .bashrc \
4041.19Smycroft	      .cshrc .emacs .exrc .forward .history .klogin .login .logout \
4051.27Slukem	      .profile .qmail .rc_history .rhosts .tcshrc .twmrc .xinitrc \
4061.27Slukem	      .xsession"
4071.15Smrg	while read uid homedir; do
4081.15Smrg		for f in $list ; do
4091.15Smrg			file=${homedir}/${f}
4101.15Smrg			if [ -f $file ] ; then
4111.46Schristos				printf -- "$uid $f `ls -ldgT $file`\n"
4121.15Smrg			fi
4131.15Smrg		done
4141.29Slukem	done < $MPBYPATH |
4151.15Smrg	awk '$1 != $5 && $5 != "root" \
4161.15Smrg		{ print "user " $1 " " $2 " file is owned by " $5 }
4171.15Smrg	     $3 ~ /^-....w/ \
4181.15Smrg		{ print "user " $1 " " $2 " file is group writeable" }
4191.15Smrg	     $3 ~ /^-.......w/ \
4201.27Slukem		{ print "user " $1 " " $2 " file is other writeable" }' \
4211.27Slukem	    >> $OUTPUT
4221.15Smrg	if [ -s $OUTPUT ] ; then
4231.15Smrg		printf "\nChecking dot files.\n"
4241.15Smrg		cat $OUTPUT
4251.15Smrg	fi
4261.9Scgdfi
4271.9Scgd
4281.9Scgd# Mailboxes should be owned by user and unreadable.
4291.32Slukem#
4301.31Slukemif checkyesno check_varmail; then
4311.15Smrg	ls -l /var/mail | sed 1d | \
4321.15Smrg	awk '$3 != $9 \
4331.15Smrg		{ print "user " $9 " mailbox is owned by " $3 }
4341.15Smrg	     $1 != "-rw-------" \
4351.15Smrg		{ print "user " $9 " mailbox is " $1 ", group " $4 }' > $OUTPUT
4361.15Smrg	if [ -s $OUTPUT ] ; then
4371.15Smrg		printf "\nChecking mailbox ownership.\n"
4381.15Smrg		cat $OUTPUT
4391.15Smrg	fi
4401.15Smrgfi
4411.15Smrg
4421.32Slukem# NFS exports shouldn't be globally exported
4431.32Slukem#
4441.32Slukemif checkyesno check_nfs && [ -f /etc/exports ]; then
4451.32Slukem	awk '{
4461.22Slukem		# ignore comments and blank lines
4471.39Shubertf		if ($0 ~ /^\#/ || $0 ~ /^$/ )
4481.22Slukem			next;
4491.22Slukem
4501.15Smrg		readonly = 0;
4511.15Smrg		for (i = 2; i <= NF; ++i) {
4521.15Smrg			if ($i ~ /-ro/)
4531.15Smrg				readonly = 1;
4541.15Smrg			else if ($i !~ /^-/)
4551.15Smrg				next;
4561.15Smrg		}
4571.15Smrg		if (readonly)
4581.15Smrg			print "File system " $1 " globally exported, read-only."
4591.15Smrg		else
4601.15Smrg			print "File system " $1 " globally exported, read-write."
4611.32Slukem	}' < /etc/exports > $OUTPUT
4621.32Slukem	if [ -s $OUTPUT ] ; then
4631.15Smrg		printf "\nChecking for globally exported file systems.\n"
4641.15Smrg		cat $OUTPUT
4651.15Smrg	fi
4661.9Scgdfi
4671.9Scgd
4681.9Scgd# Display any changes in setuid files and devices.
4691.32Slukem#
4701.31Slukemif checkyesno check_devices; then
4711.28Slukem	> $ERR
4721.15Smrg	(find / \( ! -fstype local -o -fstype fdesc -o -fstype kernfs \
4731.15Smrg			-o -fstype procfs \) -a -prune -o \
4741.21Smycroft	    \( \( -perm -u+s -a ! -type d \) -o \
4751.21Smycroft	       \( -perm -g+s -a ! -type d \) -o \
4761.24Slukem	       -type b -o -type c \) -print0 | \
4771.24Slukem	xargs -0 ls -ldgTq | sort +9 > $LIST) 2> $OUTPUT
4781.15Smrg
4791.15Smrg	# Display any errors that occurred during system file walk.
4801.15Smrg	if [ -s $OUTPUT ] ; then
4811.28Slukem		printf "Setuid/device find errors:\n" >> $ERR
4821.28Slukem		cat $OUTPUT >> $ERR
4831.28Slukem		printf "\n" >> $ERR
4841.15Smrg	fi
4851.15Smrg
4861.15Smrg	# Display any changes in the setuid file list.
4871.15Smrg	egrep -v '^[bc]' $LIST > $TMP1
4881.15Smrg	if [ -s $TMP1 ] ; then
4891.15Smrg		# Check to make sure uudecode isn't setuid.
4901.15Smrg		if grep -w uudecode $TMP1 > /dev/null ; then
4911.28Slukem			printf "\nUudecode is setuid.\n" >> $ERR
4921.15Smrg		fi
4931.15Smrg
4941.48Sabs		CUR=$backup_dir/setuid.current
4951.48Sabs		BACK=$backup_dir/setuid.backup
4961.9Scgd
4971.15Smrg		if [ -s $CUR ] ; then
4981.15Smrg			if cmp -s $CUR $TMP1 ; then
4991.15Smrg				:
5001.15Smrg			else
5011.15Smrg				> $TMP2
5021.15Smrg				join -110 -210 -v2 $CUR $TMP1 > $OUTPUT
5031.15Smrg				if [ -s $OUTPUT ] ; then
5041.28Slukem					printf "Setuid additions:\n" >> $ERR
5051.28Slukem					tee -a $TMP2 < $OUTPUT >> $ERR
5061.28Slukem					printf "\n" >> $ERR
5071.15Smrg				fi
5081.15Smrg
5091.15Smrg				join -110 -210 -v1 $CUR $TMP1 > $OUTPUT
5101.15Smrg				if [ -s $OUTPUT ] ; then
5111.28Slukem					printf "Setuid deletions:\n" >> $ERR
5121.28Slukem					tee -a $TMP2 < $OUTPUT >> $ERR
5131.28Slukem					printf "\n" >> $ERR
5141.15Smrg				fi
5151.15Smrg
5161.20Smycroft				sort -k10 $TMP2 $CUR $TMP1 | \
5171.27Slukem				    sed -e 's/[	 ][	 ]*/ /g' | \
5181.27Slukem				    uniq -u > $OUTPUT
5191.15Smrg				if [ -s $OUTPUT ] ; then
5201.28Slukem					printf "Setuid changes:\n" >> $ERR
5211.28Slukem					column -t $OUTPUT >> $ERR
5221.28Slukem					printf "\n" >> $ERR
5231.15Smrg				fi
5241.9Scgd
5251.52Satatat				backup_file update $TMP1 $CUR $BACK
5261.9Scgd			fi
5271.15Smrg		else
5281.28Slukem			printf "Setuid additions:\n" >> $ERR
5291.28Slukem			column -t $TMP1 >> $ERR
5301.28Slukem			printf "\n" >> $ERR
5311.52Satatat			backup_file add $TMP1 $CUR $BACK
5321.9Scgd		fi
5331.15Smrg	fi
5341.15Smrg
5351.27Slukem	# Check for block and character disk devices that are readable or
5361.27Slukem	# writeable or not owned by root.operator.
5371.15Smrg	>$TMP1
5381.27Slukem	DISKLIST="acd ccd cd ch fd hk hp mcd md ra rb rd rl rx rz \
5391.27Slukem	    sd se ss tz uk up vnd wd xd xy"
5401.27Slukem#	DISKLIST="$DISKLIST ct mt st wt"
5411.15Smrg	for i in $DISKLIST; do
5421.15Smrg		egrep "^b.*/${i}[0-9][0-9]*[a-p]$"  $LIST >> $TMP1
5431.15Smrg		egrep "^c.*/r${i}[0-9][0-9]*[a-p]$"  $LIST >> $TMP1
5441.15Smrg	done
5451.15Smrg
5461.15Smrg	awk '$3 != "root" || $4 != "operator" || $1 !~ /.rw-r-----/ \
5471.25Slukem		{ printf "Disk %s is user %s, group %s, permissions %s.\n", \
5481.25Slukem		    $11, $3, $4, $1; }' < $TMP1 > $OUTPUT
5491.15Smrg	if [ -s $OUTPUT ] ; then
5501.28Slukem		printf "\nChecking disk ownership and permissions.\n" >> $ERR
5511.28Slukem		cat $OUTPUT >> $ERR
5521.28Slukem		printf "\n" >> $ERR
5531.9Scgd	fi
5541.9Scgd
5551.15Smrg	# Display any changes in the device file list.
5561.20Smycroft	egrep '^[bc]' $LIST | sort -k11 > $TMP1
5571.15Smrg	if [ -s $TMP1 ] ; then
5581.48Sabs		CUR=$backup_dir/device.current
5591.48Sabs		BACK=$backup_dir/device.backup
5601.15Smrg
5611.15Smrg		if [ -s $CUR ] ; then
5621.15Smrg			if cmp -s $CUR $TMP1 ; then
5631.15Smrg				:
5641.15Smrg			else
5651.15Smrg				> $TMP2
5661.15Smrg				join -111 -211 -v2 $CUR $TMP1 > $OUTPUT
5671.15Smrg				if [ -s $OUTPUT ] ; then
5681.28Slukem					printf "Device additions:\n" >> $ERR
5691.28Slukem					tee -a $TMP2 < $OUTPUT >> $ERR
5701.28Slukem					printf "\n" >> $ERR
5711.15Smrg				fi
5721.15Smrg
5731.15Smrg				join -111 -211 -v1 $CUR $TMP1 > $OUTPUT
5741.15Smrg				if [ -s $OUTPUT ] ; then
5751.28Slukem					printf "Device deletions:\n" >> $ERR
5761.28Slukem					tee -a $TMP2 < $OUTPUT >> $ERR
5771.28Slukem					printf "\n" >> $ERR
5781.15Smrg				fi
5791.15Smrg
5801.27Slukem				# Report any block device change. Ignore
5811.27Slukem				# character devices, only the name is
5821.27Slukem				# significant.
5831.15Smrg				cat $TMP2 $CUR $TMP1 | \
5841.27Slukem				    sed -e '/^c/d' | \
5851.27Slukem				    sort -k11 | \
5861.27Slukem				    sed -e 's/[	 ][	 ]*/ /g' | \
5871.27Slukem				    uniq -u > $OUTPUT
5881.15Smrg				if [ -s $OUTPUT ] ; then
5891.28Slukem					printf "Block device changes:\n" >> $ERR
5901.28Slukem					column -t $OUTPUT >> $ERR
5911.28Slukem					printf "\n" >> $ERR
5921.15Smrg				fi
5931.9Scgd
5941.52Satatat				backup_file update $TMP1 $CUR $BACK
5951.9Scgd			fi
5961.15Smrg		else
5971.28Slukem			printf "Device additions:\n" >> $ERR
5981.28Slukem			column -t $TMP1 >> $ERR
5991.28Slukem			printf "\n" >> $ERR
6001.52Satatat			backup_file add $TMP1 $CUR $BACK >> $ERR
6011.9Scgd		fi
6021.28Slukem	fi
6031.28Slukem	if [ -s $ERR ] ; then
6041.28Slukem		printf "\nChecking setuid files and devices:\n"
6051.28Slukem		cat $ERR
6061.28Slukem		printf "\n"
6071.9Scgd	fi
6081.9Scgdfi
6091.9Scgd
6101.9Scgd# Check special files.
6111.9Scgd# Check system binaries.
6121.9Scgd#
6131.9Scgd# Create the mtree tree specifications using:
6141.9Scgd#
6151.9Scgd#	mtree -cx -pDIR -kcksum,gid,mode,nlink,size,link,time,uid > DIR.secure
6161.38Skleink#	chown root:wheel DIR.secure
6171.16Smikel#	chmod 600 DIR.secure
6181.9Scgd#
6191.9Scgd# Note, this is not complete protection against Trojan horsed binaries, as
6201.9Scgd# the hacker can modify the tree specification to match the replaced binary.
6211.9Scgd# For details on really protecting yourself against modified binaries, see
6221.9Scgd# the mtree(8) manual page.
6231.32Slukem#
6241.31Slukemif checkyesno check_mtree; then
6251.9Scgd	mtree -e -p / -f /etc/mtree/special > $OUTPUT
6261.15Smrg	if [ -s $OUTPUT ]; then
6271.9Scgd		printf "\nChecking special files and directories.\n"
6281.9Scgd		cat $OUTPUT
6291.9Scgd	fi
6301.9Scgd
6311.9Scgd	> $OUTPUT
6321.16Smikel	for file in /etc/mtree/*.secure; do
6331.16Smikel		[ $file = '/etc/mtree/*.secure' ] && continue
6341.9Scgd		tree=`sed -n -e '3s/.* //p' -e 3q $file`
6351.9Scgd		mtree -f $file -p $tree > $TMP1
6361.9Scgd		if [ -s $TMP1 ]; then
6371.9Scgd			printf "\nChecking $tree:\n" >> $OUTPUT
6381.9Scgd			cat $TMP1 >> $OUTPUT
6391.9Scgd		fi
6401.9Scgd	done
6411.15Smrg	if [ -s $OUTPUT ]; then
6421.9Scgd		printf "\nChecking system binaries:\n"
6431.9Scgd		cat $OUTPUT
6441.9Scgd	fi
6451.9Scgdfi
6461.9Scgd
6471.32SlukemCHANGELIST=""
6481.32Slukem
6491.32Slukem# Backup disklabels of available disks
6501.32Slukem#
6511.32Slukemif checkyesno check_disklabels; then
6521.32Slukem		# generate list of old disklabels and remove them
6531.48Sabs	ls -1d $backup_dir/disklabel.* 2>/dev/null |
6541.52Satatat	    egrep -v '\.(backup|current)(,v)?$' > $LABELS
6551.32Slukem	xargs rm < $LABELS
6561.32Slukem
6571.40Sperry	disks=`iostat -x | sed 1d | awk '$1 !~ /^[cfm]d/ { print $1; }'`
6581.32Slukem	for i in $disks; do
6591.48Sabs		dlf="$backup_dir/disklabel.$i"
6601.32Slukem		disklabel $i > $dlf 2>/dev/null
6611.32Slukem	done
6621.32Slukem
6631.32Slukem		# append list of new disklabels, sort list
6641.48Sabs	ls -1d $backup_dir/disklabel.* 2>/dev/null |
6651.52Satatat	    egrep -v '\.(backup|current)(,v)?$' >> $LABELS
6661.32Slukem	sort -u -o $LABELS $LABELS
6671.32Slukem	CHANGELIST=$LABELS
6681.32Slukemfi
6691.32Slukem
6701.9Scgd# List of files that get backed up and checked for any modifications.  Each
6711.48Sabs# file is expected to have two backups, $backup_dir/file.{current,backup}.
6721.9Scgd# Any changes cause the files to rotate.
6731.32Slukem#
6741.31Slukemif checkyesno check_changelist && [ -s /etc/changelist ] ; then
6751.32Slukem	CHANGELIST="/etc/changelist $CHANGELIST"
6761.32Slukemfi
6771.32Slukem
6781.32Slukemif [ -n "$CHANGELIST" ]; then
6791.32Slukem	for file in `egrep -hv "^#|$MP" $CHANGELIST`; do
6801.48Sabs		CUR=$backup_dir/${file##*/}.current
6811.48Sabs		BACK=$backup_dir/${file##*/}.backup
6821.30Smycroft		if [ -f $file ]; then
6831.30Smycroft			if [ -f $CUR ] ; then
6841.9Scgd				diff $CUR $file > $OUTPUT
6851.9Scgd				if [ -s $OUTPUT ] ; then
6861.9Scgd		printf "\n======\n%s diffs (OLD < > NEW)\n======\n" $file
6871.9Scgd					cat $OUTPUT
6881.52Satatat					backup_file update $file $CUR $BACK
6891.9Scgd				fi
6901.9Scgd			else
6911.30Smycroft		printf "\n======\n%s added\n======\n" $file
6921.30Smycroft				diff /dev/null $file
6931.52Satatat				backup_file add $file $CUR $BACK
6941.30Smycroft			fi
6951.30Smycroft		else
6961.30Smycroft			if [ -f $CUR ]; then
6971.30Smycroft		printf "\n======\n%s removed\n======\n" $file
6981.30Smycroft				diff $CUR /dev/null
6991.52Satatat				backup_file remove $file $CUR $BACK
7001.9Scgd			fi
7011.9Scgd		fi
7021.9Scgd	done
7031.44Sadfi
7041.44Sad
7051.44Sadif [ -f /etc/security.local ]; then
7061.44Sad	echo ""
7071.44Sad	echo "Running /etc/security.local:"
7081.44Sad	. /etc/security.local
7091.9Scgdfi
710