rc.subr revision 1.22
11.22Slukem# $NetBSD: rc.subr,v 1.22 2000/08/17 11:07:10 lukem Exp $
21.11Slukem#
31.11Slukem# Copyright (c) 1997-2000 The NetBSD Foundation, Inc.
41.11Slukem# All rights reserved.
51.11Slukem#
61.11Slukem# This code is derived from software contributed to The NetBSD Foundation
71.11Slukem# by Luke Mewburn.
81.11Slukem#
91.11Slukem# Redistribution and use in source and binary forms, with or without
101.11Slukem# modification, are permitted provided that the following conditions
111.11Slukem# are met:
121.11Slukem# 1. Redistributions of source code must retain the above copyright
131.11Slukem#    notice, this list of conditions and the following disclaimer.
141.11Slukem# 2. Redistributions in binary form must reproduce the above copyright
151.11Slukem#    notice, this list of conditions and the following disclaimer in the
161.11Slukem#    documentation and/or other materials provided with the distribution.
171.11Slukem# 3. All advertising materials mentioning features or use of this software
181.11Slukem#    must display the following acknowledgement:
191.11Slukem#        This product includes software developed by the NetBSD
201.11Slukem#        Foundation, Inc. and its contributors.
211.11Slukem# 4. Neither the name of The NetBSD Foundation nor the names of its
221.11Slukem#    contributors may be used to endorse or promote products derived
231.11Slukem#    from this software without specific prior written permission.
241.11Slukem#
251.11Slukem# THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
261.11Slukem# ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
271.11Slukem# TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
281.11Slukem# PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
291.11Slukem# BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
301.11Slukem# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
311.11Slukem# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
321.11Slukem# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
331.11Slukem# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
341.11Slukem# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
351.11Slukem# POSSIBILITY OF SUCH DAMAGE.
361.11Slukem#
371.11Slukem# rc.subr
381.11Slukem#	functions used by various rc scripts
391.11Slukem#
401.11Slukem
411.11Slukem#
421.11Slukem#	functions
431.11Slukem#	---------
441.1Scjs
451.5Slukem#
461.11Slukem# checkyesno var
471.5Slukem#	Test $1 variable, and warn if not set to YES or NO.
481.11Slukem#	Return 0 if it's "yes" (et al), nonzero otherwise.
491.5Slukem#
501.11Slukemcheckyesno()
511.11Slukem{
521.11Slukem	eval _value=\$${1}
531.11Slukem	case $_value in
541.4Slukem
551.4Slukem		#	"yes", "true", "on", or "1"
561.4Slukem	[Yy][Ee][Ss]|[Tt][Rr][Uu][Ee]|[Oo][Nn]|1)
571.4Slukem		return 0
581.3Slukem		;;
591.4Slukem
601.4Slukem		#	"no", "false", "off", or "0"
611.4Slukem	[Nn][Oo]|[Ff][Aa][Ll][Ss][Ee]|[Oo][Ff][Ff]|0)
621.4Slukem		return 1
631.3Slukem		;;
641.3Slukem	*)
651.11Slukem		warn "\$${1} is not set properly."
661.4Slukem		return 1
671.3Slukem		;;
681.3Slukem	esac
691.6Smellon}
701.6Smellon
711.6Smellon#
721.6Smellon# mount_critical_filesystems
731.6Smellon#	Go through the list of critical filesystems, checking each one
741.6Smellon#	to see if it is mounted, and if it is not, mounting it.
751.6Smellon#
761.11Slukemmount_critical_filesystems()
771.11Slukem{
781.10Sdrochner	if [ $1 = local ]; then
791.10Sdrochner		_fslist=$critical_filesystems_beforenet
801.10Sdrochner	else
811.10Sdrochner		_fslist=$critical_filesystems
821.10Sdrochner	fi
831.17Slukem	for _fs in $_fslist; do
841.6Smellon		mount | (
851.17Slukem			_ismounted=no
861.6Smellon			while read what _on on _type type; do
871.17Slukem				if [ $on = $_fs ]; then
881.17Slukem					_ismounted=yes
891.6Smellon				fi
901.6Smellon			done
911.17Slukem			if [ $_ismounted = no ]; then 
921.17Slukem				mount $_fs >/dev/null 2>&1
931.6Smellon			fi
941.6Smellon		)  
951.6Smellon	done
961.7Scjs}
971.7Scjs
981.11Slukem#
991.11Slukem# check_pidfile pidfile procname
1001.11Slukem#	Parses the first line of pidfile for a pid, and ensures
1011.11Slukem#	that the process is running and matches procname.
1021.11Slukem#	Prints the matching pid upon success, nothing otherwise.
1031.11Slukem#
1041.11Slukemcheck_pidfile()
1051.11Slukem{
1061.11Slukem	_pidfile=$1
1071.11Slukem	_procname=$2
1081.11Slukem	if [ -z "$_pidfile" -o -z "$_procname" ]; then
1091.11Slukem		err 3 'USAGE: check_pidfile pidfile procname'
1101.11Slukem	fi
1111.11Slukem	if [ ! -f $_pidfile ]; then
1121.11Slukem		return
1131.11Slukem	fi
1141.11Slukem	read _pid _junk < $_pidfile
1151.11Slukem	if [ -z "$_pid" ]; then
1161.11Slukem		return
1171.11Slukem	fi
1181.11Slukem	_procnamebn=`basename $_procname`
1191.11Slukem	ps -p $_pid -o 'pid,command' | while read _npid _arg0 _argv; do
1201.11Slukem		if [ "$_npid" = "PID" ]; then
1211.11Slukem			continue
1221.11Slukem		fi
1231.15Slukem		if [   "$_arg0" = "$_procname" \
1241.15Slukem		    -o "$_arg0" = "$_procnamebn" \
1251.15Slukem		    -o "$_arg0" = "${_procnamebn}:" \
1261.15Slukem		    -o "$_arg0" = "(${_procnamebn})" ]; then
1271.11Slukem			echo $_npid
1281.11Slukem			return
1291.11Slukem		fi
1301.11Slukem	done
1311.11Slukem}
1321.11Slukem
1331.11Slukem#
1341.11Slukem# check_process procname
1351.11Slukem#	Ensures that a process (or processes) named procname is running.
1361.11Slukem#	Prints a list of matching pids.
1371.11Slukem#
1381.11Slukemcheck_process()
1391.11Slukem{
1401.11Slukem	_procname=$1
1411.11Slukem	if [ -z "$_procname" ]; then
1421.11Slukem		err 3 'USAGE: check_process procname'
1431.11Slukem	fi
1441.11Slukem	_procnamebn=`basename $_procname`
1451.11Slukem	_pref=
1461.11Slukem	ps -ax -o 'pid,command' | while read _npid _arg0 _argv; do
1471.11Slukem		if [ "$_npid" = "PID" ]; then
1481.11Slukem			continue
1491.11Slukem		fi
1501.15Slukem		if [   "$_arg0" = "$_procname" \
1511.15Slukem		    -o "$_arg0" = "$_procnamebn" \
1521.15Slukem		    -o "$_arg0" = "${_procnamebn}:" \
1531.15Slukem		    -o "$_arg0" = "(${_procnamebn})" ]; then
1541.11Slukem			echo -n "$_pref$_npid"
1551.11Slukem			_pref=" "
1561.11Slukem		fi
1571.11Slukem	done
1581.11Slukem}
1591.11Slukem
1601.11Slukem#
1611.16Slukem# run_rc_command arg
1621.16Slukem#	Search for arg in the list of supported commands, which is:
1631.16Slukem#		"start stop restart rcvar status ${extra_commands}"
1641.11Slukem#	If there's a match, run ${arg}_cmd or the default command (see below).
1651.11Slukem#
1661.16Slukem#	If arg has a given prefix, then change the operation as follows:
1671.11Slukem#		prefix	operation
1681.11Slukem#		------	---------
1691.11Slukem#		fast	Skip the pid check.
1701.11Slukem#		force	Set ${rcvar} to YES.
1711.11Slukem#
1721.11Slukem#	The following globals are used:
1731.11Slukem#	name		needed	function
1741.11Slukem#	----		------	--------
1751.11Slukem#	name		y	Name of script.
1761.11Slukem#	command		n	Full path to command.
1771.11Slukem#				Not needed if ${arg}_cmd is set for
1781.11Slukem#				each keyword.
1791.11Slukem#	command_args	n	Optional args/shell directives for command.
1801.16Slukem#	extra_commands	n	List of extra commands supported.
1811.11Slukem#	pidfile		n	If set, use check_pidfile $pidfile, else if
1821.11Slukem#				$command is set, use check_process $command.
1831.16Slukem#	rcvar		n	If the default command is being run, this is
1841.11Slukem#				checked with checkyesno to determine if
1851.11Slukem#				the action should be run.
1861.11Slukem#				If this variable isn't set, ${name} is checked 
1871.11Slukem#				instead.
1881.22Slukem#	${name}_chroot	n	Directory to chroot to before running ${command}
1891.22Slukem#	${name}_chdir	n	Directory to cd to before running ${command}
1901.22Slukem#				(if not using ${name}_chroot).
1911.11Slukem#	${name}_flags	n	Arguments to call ${command} with.
1921.11Slukem#				NOTE:	if $flags is set (e.g, from the parent
1931.11Slukem#					environment), it overrides this.
1941.22Slukem#	${name}_nice	n	Nice level to run ${command} at (if not using
1951.22Slukem#				${name}_chroot).
1961.22Slukem#	${name}_user	n	User to run ${command} as, using su(1) if not
1971.22Slukem#				using ${name}_chroot.
1981.22Slukem#	${name}_group	n	Group to run chrooted ${command} as.
1991.22Slukem#	${name}_groups	n	Group list to run chrooted ${command} with.
2001.11Slukem#	${_arg}_cmd	n	If set, use this as the action when invoked;
2011.11Slukem#				$_arg is available to the action to use.
2021.11Slukem#				Otherwise, use default command (see below)
2031.11Slukem#				NOTE:	checkyesno ${rcvar} is NOT performed
2041.11Slukem#					for ${_arg}_cmd; use ${_arg}_precmd to
2051.11Slukem#					do this.
2061.11Slukem#	${_arg}_precmd	n	If set, run just before performing the main
2071.11Slukem#				action in the default command (i.e, after
2081.11Slukem#				checking for required bits and process
2091.11Slukem#				(non)existance).
2101.11Slukem#				If this completes with a non-zero exit code,
2111.11Slukem#				don't run ${_arg}_cmd.
2121.11Slukem#	required_dirs	n	If set, check for the existence of the given
2131.11Slukem#				directories before running the default
2141.11Slukem#				(re)start command.
2151.11Slukem#	required_files	n	If set, check for the readability of the given
2161.11Slukem#				files before running the default (re)start
2171.11Slukem#				command.
2181.11Slukem#	required_vars	n	If set, perform checkyesno on each of the
2191.11Slukem#				listed variables before running the default
2201.11Slukem#				(re)start command.
2211.11Slukem#
2221.11Slukem#	Default commands for a given arg:
2231.11Slukem#	arg		default
2241.11Slukem#	---		-------
2251.11Slukem#	status		Show if ${command} is running, etc.
2261.11Slukem#	start		if !running && checkyesno ${rcvar}
2271.11Slukem#				${command}
2281.11Slukem#	stop		if ${pidfile}
2291.11Slukem#				kill $sig_stop `check_pidfile $pidfile`
2301.11Slukem#			else
2311.11Slukem#				kill $sig_stop `check_process $command`
2321.11Slukem#			$sig_stop defaults to TERM.
2331.11Slukem#	reload		As stop, except use $sig_reload instead.
2341.11Slukem#			$sig_reload defaults to HUP.
2351.11Slukem#	restart		Run `stop' then `start'.
2361.11Slukem#
2371.11Slukemrun_rc_command()
2381.11Slukem{
2391.11Slukem	_arg=$1
2401.11Slukem	_ckvar=${rcvar:-$name}
2411.11Slukem	if [ -z "$_ckvar" ]; then
2421.11Slukem		err 3 'neither $rcvar or $name is set.'
2431.11Slukem	fi
2441.11Slukem
2451.11Slukem	case "$_arg" in
2461.11Slukem	fast*)
2471.11Slukem		_arg=${_arg#fast}
2481.11Slukem		_rc_fast_run=YES
2491.11Slukem		;;
2501.11Slukem	force*)
2511.11Slukem		_arg=${_arg#force}
2521.11Slukem		eval ${_ckvar}=YES
2531.11Slukem		;;
2541.11Slukem	esac
2551.11Slukem
2561.16Slukem	_keywords="start stop restart rcvar $extra_commands"
2571.17Slukem	_pid=
2581.11Slukem	_pidcmd=
2591.11Slukem	if [ -z "$_rc_fast_run" ]; then
2601.11Slukem		if [ -n "$pidfile" ]; then
2611.11Slukem			_pidcmd='_pid=`check_pidfile '$pidfile' '$command'`'
2621.11Slukem		elif [ -n "$command" ]; then
2631.11Slukem			_pidcmd='_pid=`check_process '$command'`'
2641.11Slukem		fi
2651.11Slukem		if [ -n "$_pidcmd" ]; then
2661.11Slukem			_keywords="${_keywords} status"
2671.11Slukem		fi
2681.11Slukem	fi
2691.11Slukem
2701.11Slukem	if [ -z "$_arg" ]; then
2711.11Slukem		rc_usage "$_keywords"
2721.11Slukem	fi
2731.11Slukem
2741.17Slukem	if [ -n "$flags" ]; then	# allow override from environment
2751.11Slukem		_flags=$flags
2761.11Slukem	else
2771.11Slukem		eval _flags=\$${name}_flags
2781.11Slukem	fi
2791.18Slukem	eval _chdir=\$${name}_chdir
2801.22Slukem	eval _chroot=\$${name}_chroot
2811.18Slukem	eval _nice=\$${name}_nice
2821.18Slukem	eval _user=\$${name}_user
2831.22Slukem	eval _group=\$${name}_group
2841.22Slukem	eval _groups=\$${name}_groups
2851.11Slukem
2861.11Slukem	eval $_pidcmd
2871.11Slukem
2881.11Slukem	for _elem in $_keywords; do
2891.11Slukem		if [ "$_elem" != "$_arg" ]; then
2901.11Slukem			continue
2911.11Slukem		fi
2921.11Slukem
2931.11Slukem		eval _cmd=\$${_arg}_cmd
2941.11Slukem		eval _precmd=\$${_arg}_precmd
2951.11Slukem		if [ -n "$_cmd" ]; then
2961.11Slukem			eval $_precmd || return 1
2971.11Slukem			eval $_cmd
2981.11Slukem			return 0
2991.11Slukem		fi
3001.11Slukem
3011.11Slukem		case "$_arg" in
3021.11Slukem
3031.11Slukem		status)
3041.11Slukem			if [ -n "$_pid" ]; then
3051.11Slukem				echo "${name} is running as pid $_pid."
3061.11Slukem			else
3071.11Slukem				echo "${name} is not running."
3081.11Slukem			fi
3091.11Slukem			;;
3101.11Slukem
3111.11Slukem		start)
3121.11Slukem			if [ -n "$_pid" ]; then
3131.11Slukem				echo "${name} already running? (pid=$_pid)."
3141.11Slukem				exit 1
3151.11Slukem			fi
3161.11Slukem
3171.11Slukem			if ! checkyesno ${_ckvar} || [ ! -x $command ]; then
3181.11Slukem				return 0
3191.11Slukem			fi
3201.11Slukem
3211.11Slukem			for _f in $required_vars; do
3221.11Slukem				if ! checkyesno $_f; then
3231.11Slukem					warn \
3241.11Slukem			    "\$${_f} is not set; ${name} not started."
3251.11Slukem					return 1
3261.11Slukem				fi
3271.11Slukem			done
3281.11Slukem			for _f in $required_dirs; do
3291.11Slukem				if [ ! -d "${_f}/." ]; then
3301.11Slukem					warn \
3311.11Slukem			    "${_f} is not a directory; ${name} not started."
3321.11Slukem					return 1
3331.11Slukem				fi
3341.11Slukem			done
3351.11Slukem			for _f in $required_files; do
3361.11Slukem				if [ ! -r "${_f}" ]; then
3371.11Slukem					warn \
3381.11Slukem			"${_f} is not readable; ${name} not started."
3391.11Slukem					return 1
3401.11Slukem				fi
3411.11Slukem			done
3421.11Slukem
3431.11Slukem			eval $_precmd || return 1
3441.11Slukem			echo "Starting ${name}."
3451.22Slukem			if [ -n "$_chroot" ]; then
3461.22Slukem				_doit="\
3471.22Slukemchroot ${_user:+-u $_user }${_group:+-g $_group }${_groups:+-G $_groups }\
3481.22Slukem$_chroot $command $_flags $command_args"
3491.22Slukem			else
3501.22Slukem				_doit="\
3511.18Slukem${_user:+su -m $_user -c 'sh -c \"}\
3521.18Slukem${_chdir:+cd $_chdir; }\
3531.18Slukem${_nice:+nice -n $_nice }\
3541.18Slukem$command $_flags $command_args\
3551.18Slukem${_user:+\"'}"
3561.22Slukem			fi
3571.18Slukem			eval $_doit
3581.11Slukem			;;
3591.11Slukem
3601.11Slukem		stop)
3611.11Slukem			if [ -z "$_pid" ]; then
3621.11Slukem				if checkyesno ${_ckvar}; then
3631.11Slukem					if [ -n "$pidfile" ]; then
3641.11Slukem						echo \
3651.11Slukem					"${name} not running? (check $pidfile)."
3661.11Slukem					else
3671.11Slukem						echo "${name} not running?"
3681.11Slukem					fi
3691.11Slukem					exit 1
3701.11Slukem				fi
3711.11Slukem				return 0
3721.11Slukem			fi
3731.11Slukem
3741.11Slukem			eval $_precmd || return 1
3751.11Slukem			echo "Stopping ${name}."
3761.18Slukem			_doit=\
3771.18Slukem"${_user:+su -m $_user -c '}kill -${sig_stop:-TERM} $_pid${_user:+'}"
3781.18Slukem			eval $_doit
3791.11Slukem			;;
3801.11Slukem
3811.11Slukem		reload)
3821.11Slukem			if [ -z "$_pid" ]; then
3831.11Slukem				if checkyesno ${_ckvar}; then
3841.11Slukem					if [ -n "$pidfile" ]; then
3851.11Slukem						echo \
3861.11Slukem				    "${name} not running? (check $pidfile)."
3871.11Slukem					else
3881.11Slukem						echo "${name} not running?"
3891.11Slukem					fi
3901.11Slukem					exit 1
3911.11Slukem				fi
3921.11Slukem				return 0
3931.11Slukem			fi
3941.11Slukem			echo "Reloading ${name} config files."
3951.11Slukem			eval $_precmd || return 1
3961.18Slukem			_doit=\
3971.18Slukem"${_user:+su -m $_user -c '}kill -${sig_reload:-HUP} $_pid${_user:+'}"
3981.18Slukem			eval $_doit
3991.11Slukem			;;
4001.11Slukem
4011.11Slukem		restart)
4021.11Slukem			if ! checkyesno ${_ckvar}; then
4031.11Slukem				return 0
4041.11Slukem			fi
4051.11Slukem			eval $_precmd || return 1
4061.11Slukem			( $0 stop )
4071.11Slukem			sleep 1
4081.11Slukem			$0 start
4091.11Slukem
4101.11Slukem			;;
4111.11Slukem
4121.11Slukem		rcvar)
4131.11Slukem			echo "# $name"
4141.11Slukem			if checkyesno ${_ckvar}; then
4151.11Slukem				echo "\$${_ckvar}=YES"
4161.11Slukem			else
4171.11Slukem				echo "\$${_ckvar}=NO"
4181.11Slukem			fi
4191.11Slukem			;;
4201.11Slukem
4211.11Slukem		*)
4221.11Slukem			rc_usage "$_keywords"
4231.11Slukem			;;
4241.11Slukem
4251.11Slukem		esac
4261.11Slukem		return 0
4271.11Slukem	done
4281.11Slukem
4291.11Slukem	echo 1>&2 "$0: unknown directive '$_arg'."
4301.11Slukem	rc_usage "$_keywords"
4311.11Slukem	exit 1
4321.11Slukem}
4331.11Slukem
4341.11Slukem#
4351.11Slukem# run_rc_script file arg
4361.11Slukem#	Start the script `file' with `arg', and correctly handle the
4371.17Slukem#	return value from the script.  If `file' ends with `.sh', it's
4381.17Slukem#	sourced into the current environment.  Otherwise it's run as
4391.11Slukem#	a child process.
4401.17Slukem#
4411.11Slukem#	Note: because `.sh' files are sourced into the current environment
4421.11Slukem#	run_rc_command shouldn't be used because its difficult to ensure
4431.11Slukem#	that the global variable state before and after the sourcing of 
4441.11Slukem#	the .sh file won't adversely affect other scripts.
4451.11Slukem#
4461.11Slukemrun_rc_script()
4471.11Slukem{
4481.11Slukem	_file=$1
4491.11Slukem	_arg=$2
4501.11Slukem	if [ -z "$_file" -o -z "$_arg" ]; then
4511.11Slukem		err 3 'USAGE: run_rc_script file arg'
4521.11Slukem	fi
4531.11Slukem
4541.11Slukem	case "$_file" in
4551.17Slukem	*.sh)				# run in current shell
4561.11Slukem		set $_arg ; . $_file
4571.11Slukem		;;
4581.17Slukem	*)				# run in subshell
4591.11Slukem		( set $_arg ; . $_file )
4601.11Slukem		;;
4611.11Slukem	esac
4621.11Slukem}
4631.19Slukem
4641.19Slukem#
4651.19Slukem# load_rc_config
4661.19Slukem#	Source in the configuration file for a given command.
4671.19Slukem#
4681.19Slukemload_rc_config()
4691.19Slukem{
4701.19Slukem	_command=$1
4711.19Slukem	if [ -z "$_command" ]; then
4721.19Slukem		err 3 'USAGE: load_rc_config command'
4731.19Slukem	fi
4741.19Slukem
4751.19Slukem	. /etc/rc.conf
4761.20Sfvdl	if [ -f /etc/rc.conf.d/"$_command" ]; then
4771.20Sfvdl		. /etc/rc.conf.d/"$_command"
4781.20Sfvdl	fi
4791.19Slukem}
4801.19Slukem
4811.11Slukem
4821.11Slukem#
4831.11Slukem# rc_usage commands
4841.11Slukem#	Print a usage string for $0, with `commands' being a list of
4851.11Slukem#	valid commands.
4861.11Slukem#
4871.11Slukemrc_usage()
4881.11Slukem{
4891.11Slukem	echo -n 1>&2 "Usage: $0 [fast|force]("
4901.11Slukem
4911.11Slukem	_sep=
4921.11Slukem	for _elem in $*; do
4931.11Slukem		echo -n 1>&2 "$_sep$_elem"
4941.11Slukem		_sep="|"
4951.11Slukem	done
4961.11Slukem	echo 1>&2 ")"
4971.11Slukem	exit 1
4981.11Slukem}
4991.11Slukem
5001.11Slukem#
5011.11Slukem# err exitval message
5021.11Slukem#	Display message to stderr and log to the syslog, and exit with exitval.
5031.11Slukem#
5041.11Slukemerr()
5051.11Slukem{
5061.11Slukem	exitval=$1
5071.11Slukem	shift
5081.11Slukem
5091.21Slukem	logger "$0: ERROR: $*"
5101.21Slukem	echo 1>&2 "$0: ERROR: $*"
5111.11Slukem	exit $exitval
5121.11Slukem}
5131.11Slukem
5141.11Slukem#
5151.11Slukem# warn message
5161.11Slukem#	Display message to stderr and log to the syslog.
5171.11Slukem#
5181.11Slukemwarn()
5191.11Slukem{
5201.21Slukem	logger "$0: WARNING: $*"
5211.21Slukem	echo 1>&2 "$0: WARNING: $*"
5221.1Scjs}
523