1 #!/bin/sh - keep it for file(1) to get bourne shell script result
2 # functions This file contains functions to be used by most or all
3 # shell scripts in the /etc/rc.d/init.d directory.
6 # Author: Miquel van Smoorenburg, <miquels@drinkel.nl.mugnet.org>
7 # Hacked by: Greg Galloway and Marc Ewing
8 # Modified for PLD Linux by:
9 # Marek Obuchowicz <elephant@pld-linux.org>
10 # Arkadiusz Miśkiewicz <misiek@pld-linux.org>
11 # Michał Kochanowicz <mkochano@pld-linux.org>
12 # Łukasz Pawelczyk <havner@pld-linux.org>
13 # Modified for TLD Linux by:
14 # Marcin Krol <hawk@tld-linux.org>
16 # First set up a default search path.
17 export PATH="/sbin:/usr/sbin:/bin:/usr/bin"
20 if [ -z "$COLUMNS" -o -z "$LINES" ]; then
22 set -- $(stty size 2>/dev/null)
24 COLUMNS=${COLUMNS:-$2}
29 [ -z "$LINES" ] || [ "$LINES" -le 0 ] && LINES=40
30 [ -z "$COLUMNS" ] || [ "$COLUMNS" -le 0 ] && COLUMNS=80
32 INIT_COL=$((COLUMNS - 13))
42 # Bold definition (second parameter to termput setaf)
46 CBRACKETS="$CYAN" # brackets [ ] color
47 CDONE="$GREEN" # DONE and WORK color
48 CBUSY="$MAGENTA" # BUSY color
49 CFAIL="$RED" # FAIL and DIED color
50 CPOWEREDBY="$CYAN" # "Powered by" color
51 CTLD="$GREEN" # "TLD Linux" color
52 CI="$RED" # Capital I color (press I to enter interactive startup)
53 CRESMAN="$GREEN" # "Resource Manager" color
54 CHARS="" # Characters displayed on the beginning of show line
55 CCHARS="$WHITE" # Color of these characters (look at /etc/sysconfig/init-colors.gentoo example)
57 # Source configuration if available - may override default values
58 [ -r /etc/sysconfig/init-colors ] && . /etc/sysconfig/init-colors
59 [ -r /etc/sysconfig/system ] && . /etc/sysconfig/system
60 [ -r /etc/sysconfig/bootsplash ] && . /etc/sysconfig/bootsplash
62 # we need to know in functions if we were called from a terminal
63 if [ -z "$ISATTY" ]; then
64 [ -t ] && ISATTY=yes || ISATTY=no
71 msg_usage " is_yes {value}"
77 yes|Yes|YES|true|True|TRUE|on|On|ON|Y|y|1)
91 msg_usage " is_no {value}"
96 no|No|NO|false|False|FALSE|off|Off|OFF|N|n|0)
107 # checks if file is empty
108 # empty lines and lines beginning with hash are ignored
110 [ -s "$1" ] || return 0
111 grep -vqE "^(#|[[:blank:]]*$)" "$1" && return 1 || return 0
114 # returns OK if $1 contains $2
116 [ "${1#*$2*}" = "$1" ] && return 1
120 # Apply sysctl settings, including files in /etc/sysctl.d
122 sysctl -q -e --system
125 if is_yes "$FASTRC" || is_yes "$IN_SHUTDOWN"; then
129 if is_no "$RC_LOGGING"; then
132 while [ "$1" != "${1##-}" ]; do
150 local _x _y _z v v1 old_IFS ver
154 # strip _* or -* from versions like: "2.6.25_vanilla-1", "2.6.25-1"
163 while [ ${#ver} -lt 3 ]; do ver="0$ver"; done
165 while [ ${#ver} -lt 6 ]; do ver="0$ver"; done
167 while [ ${#ver} -lt 9 ]; do ver="0$ver"; done
173 local _x _y _z v v1 old_IFS ver
177 # strip _* or -* from versions like: "2.6.25_vanilla-1", "2.6.25-1"
185 while [ ${#ver} -lt 3 ]; do ver="0$ver"; done
187 while [ ${#ver} -lt 6 ]; do ver="0$ver"; done
193 local _x _y _z v v1 old_IFS ver
197 # strip _* or -* from versions like: "2.6.25_vanilla-1", "2.6.25-1"
205 while [ ${#ver} -lt 3 ]; do ver="0$ver"; done
212 is_yes "$ISATTY" || return
214 if is_yes "$FASTRC" || is_no "$TPUT"; then
217 echo -ne "\033[$(($2+1))G"
220 echo -ne "\033[${2}A"
232 is_yes "$COLOR_INIT" && echo -ne "\033[${ISBOLD};3${2}m"
244 if [ "$3" = "1" ]; then tput bold; else tput sgr0; fi
245 is_yes "$COLOR_INIT" && tput setaf "$2"
254 if [ ! -x /bin/printf ]; then
256 # FIXME: buggy when single or double quotes in message!
261 if [ $# -gt 0 ]; then
264 while [ $# -gt 0 ]; do
269 awk "BEGIN {printf \"$text\", \"$m\"; }"
273 # National language support function
275 local msg_echo nls_domain text message
277 nls_domain="$NLS_DOMAIN"
278 while [ "$1" != "${1##-}" ]; do
294 # empty message, so we return --misiek
295 if [ -z "$message" ]; then
300 if is_yes "$GETTEXT"; then
301 message=$(TEXTDOMAINDIR="/etc/sysconfig/locale" gettext -e --domain="${nls_domain:-rc-scripts}" "$message")
304 printf "$message" "$@"
311 if ! is_no "$BOOT_SPLASH"; then
312 [ -x /bin/splash ] && /bin/splash "$action"
319 nls "ERROR: Networking is down. %s can't be run." "$1" >&2
323 show "Starting %s service" "$1"
326 msg_already_running() {
327 nls "%s service is already running." "$1"
331 show "Stopping %s service" "$1"
335 nls "%s service is not running." "$1"
339 show "Reloading %s service" "$1"
346 # Some functions to handle TLD Linux-style messages
350 if is_yes "$RC_UPTIME"; then
351 time=$(awk '{printf("[%8.2f] ", $1)}' /proc/uptime)
354 if is_no "$FASTRC" && is_yes "$GETTEXT"; then
355 text=$time$(nls -n "$@")
357 text=$time$(printf "$@")
360 while [ $((len++)) -lt $INIT_COL ]; do
363 if [ -n "$CHARS" ]; then
364 termput setaf $CCHARS
372 termput hpa $INIT_COL
375 # Displays message in square brackests ("[ DONE ]"). Takes two arguments.
376 # First is the text to display, second is color number to use (argument to
377 # tput setaf). If second argument is not given, default (2, green) will be
387 echo -n "$(termput setaf $CBRACKETS)[$(termput setaf $COLOR) $(nls --nls-domain rc-scripts "$1") $(termput setaf $CBRACKETS)]$(termput op)"
412 # Check if $pid (could be plural) are running
415 [ -d "/proc/$1" ] && return 0
421 # - outside chroot get only those processes, which are outside chroot.
422 # - inside chroot get only those processes, which are inside chroot.
423 # - don't filter out pids which do not have corresponding running processes (process died etc)
424 # (note: some processes like named are chrooted but run outside chroot)
426 # no pids, exit early
427 [ $# -eq 0 ] && return
429 # filter by pid namespace if such dir exists for current process
430 # we do filter in containers as stacked containers are possible with LXC
431 if [ -d /proc/$$/ns ]; then
433 pids=$(filter_ns "$@") && set -- "$pids"
436 if [ $# -lt 1 -o ! -d /proc/1 ]; then
441 local root_dir good_pids="" good_add_pid
442 for root_pid in $@; do
443 root_dir=$(resolvesymlink /proc/${root_pid}/root)
444 if [ -n "$root_dir" ]; then
446 if [ -n "${SYSTEM_CHROOTS}" ]; then
447 for r_dir in ${SYSTEM_CHROOTS}; do
448 echo "$root_dir" | grep -q "^${r_dir}" && good_add_pid=0
451 [ "$good_add_pid" -eq 1 ] && good_pids="$good_pids $root_pid"
452 elif [ ! -d "/proc/$root_pid" ]; then
453 good_pids="$good_pids $root_pid"
459 # similar to filter_chroot, but filter based on /proc/PID/ns/pid value
461 local cur_ns=$(resolvesymlink /proc/$$/ns/pid)
462 [ "$cur_ns" ] || return 1
465 # add pids if it matches current pid namespace
466 # we should add pids what do not exist (dead processes),
467 # but not add pids whose namespace does not match
468 # (processes belonging to different NS do exist in /proc)
470 if [ ! -d /proc/$pid ]; then
474 ns=$(resolvesymlink /proc/$pid/ns/pid)
475 if [ "$ns" = "$cur_ns" ]; then
484 # run_cmd Message command_to_run
485 # run_cmd -a Message command_to_run
486 # run_cmd --user "username" "Message" command_to_run
488 local force_err=0 exit_code=0 errors user
489 while [ $# -gt 0 ]; do
504 local message=$1; shift
505 show "$message"; busy
509 export HOME=/tmp TMPDIR=/tmp
510 if is_no "$RC_LOGGING"; then
511 ${user:+setuidgid -s $user} eval "$@" 2>&1
513 ${user:+setuidgid -s $user} initlog -c "$*" 2>&1
517 log_success "$1 $message"
520 log_failed "$1 $message"
523 [ -n "$errors" ] && [ $exit_code -eq 1 -o $force_err -eq 1 ] && echo "$errors"
527 _daemon_set_ulimits() {
528 local opt val ksh=${KSH_VERSION:+1}
529 set -- ${SERVICE_LIMITS:-$DEFAULT_SERVICE_LIMITS}
530 while [ $# -gt 0 ]; do
551 # inner function used by daemon().
552 # do not call this directly, as it expects variables being inherited.
553 # also it expects to be called from subshell as it exports env.
554 # it expects options parsed by daemon() and command to be executed in "$@".
557 umask ${SERVICE_UMASK:-$DEFAULT_SERVICE_UMASK};
558 export USER=root HOME=/tmp TMPDIR=/tmp
560 nice=${nice:-$DEFAULT_SERVICE_RUN_NICE_LEVEL}
563 # make nice level absolute, not to be dependant of nice level of shell where service started
564 nice=$(($nice - $(nice)))
566 if [ "$closefds" = 1 ]; then
570 elif [ "$redirfds" = 1 ]; then
579 if is_no "$RC_LOGGING"; then
581 if [ ! -x $prog ]; then
582 logger -t rc-scripts -p daemon.debug "daemon: Searching PATH for $prog, consider using full path in initscript"
586 if [ -x $a/$prog ]; then
595 # use setsid to detach from terminal,
596 # NOTE: setsid needs to be "outer" program
597 # otherwise start-stop-daemon would capture the setsid pid not the actual program
601 /sbin/start-stop-daemon -q --start \
603 ${pidfile:+--pidfile $pidfile} \
604 ${makepid:+--make-pidfile} \
605 ${user:+--chuid $user} \
606 ${chdir:+--chdir "$chdir"} \
607 ${fork:+--background} \
608 ${SERVICE_DROPCAPS:+--dropcap $SERVICE_DROPCAPS} \
612 if [ "$fork" = "1" ]; then
613 export PIDFILE="/dev/null"
614 if [ "$makepid" ] && [ "$pidfile" ]; then
615 export PIDFILE="$pidfile"
617 set -- /lib/rc-scripts/makepid "$@"
618 set -- /usr/bin/setsid "$@"
620 if [ -n "$user" -a "$user" != "root" ]; then
621 set -- /bin/runuser -u "$user" -- "$@"
624 nice -n $nice initlog -c "$*" 2>&1 </dev/null
628 # A function to start a program (now it's useful on read-only filesystem too)
630 local errors="" waitname="" waittime=0
632 local nice=$SERVICE_RUN_NICE_LEVEL
633 local fork user closefds redirfds pidfile makepid chdir=/
635 while [ $# -gt 0 ]; do
638 msg_usage " daemon [--check] [--user user] [--fork] [--chdir directory] [--closefds] [--redirfds] [--waitforname procname] [--waitfortime seconds] [--pidfile file] [--makepid] [+/-nicelevel] {program} <program args>"
642 # for compatibility with redhat/mandrake
643 nls "warning: --check option is ignored!"
672 pidfile="${1#--pidfile=}"
673 case "$pidfile" in /*);; *) pidfile="/var/run/$pidfile";; esac
678 case "$pidfile" in /*);; *) pidfile="/var/run/$pidfile";; esac
682 # makepid implies fork
699 [ -z "$DEFAULT_SERVICE_UMASK" ] && DEFAULT_SERVICE_UMASK=022
700 [ -z "$DEFAULT_SERVICE_RUN_NICE_LEVEL" ] && DEFAULT_SERVICE_RUN_NICE_LEVEL=0
705 [ -n "$SERVICE_CPUSET" ] && is_yes "$CPUSETS" && echo $$ > "/dev/cpuset/${SERVICE_CPUSET}/tasks"
706 if errors=$(_daemon_exec "$@"); then
707 # wait for process (or pidfile) to be created
708 if [ "$waittime" -gt 0 ]; then
709 # waitname can be empty, as if pidfile is in use, it is not relevant
710 waitproc "$waittime" "$waitname" "$pidfile"
712 log_success "$1 startup"
717 log_failed "$1 startup"
718 [ -n "$errors" ] && echo >&2 "$errors"
723 # wait (in seconds) for process (or pidfile) to be created
724 # example: waitproc 30 httpd /var/run/httpd.pid
726 local waittime=$1 procname=$2 pidfile=$3
728 local now=$(date +%s)
729 local maxtime=$(($now + $waittime))
731 if [ -z "$procname" -a -z "$pidfile" ]; then
732 msg_usage "waitproc: procname or pidfile must be specified"
736 while [ "$(date +%s)" -lt "$maxtime" ]; do
737 pid=$(pidofproc "$procname" "$pidfile")
738 [ -n "$pid" ] && break
740 # start-stop-daemon uses same delay
745 # A function to stop a program.
747 local notset killlevel base pid pidfile result delay=3 try
750 msg_usage " killproc [--pidfile|-p PIDFILE] [-d DELAY] {program} [-SIGNAME]"
754 while [ "$1" != "${1##-}" ]; do
762 case "$pidfile" in /*);; *) pidfile="/var/run/$pidfile";; esac
779 # check for second arg to be kill level
786 # experimental start-stop-daemon based killing.
787 # works only with pidfile
788 if is_no "$RC_LOGGING" && [ "$pidfile" ]; then
789 local sig=${killlevel:--TERM} retry
790 # do not retry if signal is specified,
791 # as otherwise impossible to send HUP if process pid stays in pidfile.
792 # however, do retry if --waitfortime was specified
793 if [ "${killlevel+set}" = "set" ] && [ -z "$waittime" ]; then
794 # if we send HUP it's ok if process does not die
799 : ${waitretry=$(($waittime * 2))}
801 # 1. kill with $sig, wait $delay
802 # 2. kill with $sig, wait $waittime
803 # 3. kill with KILL, wait $waitretry
804 retry="--retry ${sig#-}/${delay}/${sig#-}/${waittime}/KILL/${waitretry}"
806 /sbin/start-stop-daemon -q --stop \
808 ${waitname:+--name $waitname} \
810 ${pidfile:+--pidfile $pidfile}
812 if [ "$result" -eq 0 ]; then
825 pid=$(pidofproc "$1" "$pidfile")
826 [ -z "$pid" ] && pid=$(pidofproc "$base" "$pidfile")
829 if [ -n "$pid" -a "$pid" != "$$" ] && checkpid $pid 2>&1; then
830 if [ "$notset" = "1" ]; then
831 if checkpid $pid 2>&1; then
832 # TERM first, then KILL if not dead
837 while [ $try -lt $delay ]; do
838 checkpid $pid || break
842 if checkpid $pid; then
843 # XXX: SIGKILL is sent already on 4th second!
844 # HARMFUL for example to mysqld (which is already workarounded)
851 if [ "$result" -eq 0 ]; then
853 log_failed "$1 shutdown"
856 log_success "$1 shutdown"
858 result=$(( ! $result ))
860 # use specified level only
861 if checkpid $pid > /dev/null 2>&1; then
864 if [ "$result" -eq 0 ]; then
866 log_success "$1 got $killlevel"
870 log_failed "$1 didn't get $killlevel"
875 log_failed "$1 shutdown"
880 log_failed "$1 shutdown"
884 if [ -n "$waitname" -a -n "$waittime" ]; then
888 pid=$(pidofproc "$waitname" "$pidfile")
889 [ -z "$pid" ] && pid=$(pidofproc "$base" "$pidfile")
891 while [ "$i" -lt "$waittime" ]; do
893 checkpid $pid && sleep 1 || break
897 # Remove pid file if any.
898 if [ "$notset" = "1" ]; then
899 rm -f /var/run/${base}.pid
905 # A function to find the pid of a program.
907 local pid pidfile base=${1##*/}
909 [ -n "$2" ] && pidfile="$2"
913 msg_usage " pidofproc {program}"
917 # First try pidfile or "/var/run/*.pid"
919 /*)pidfile="${pidfile}";;
920 *) pidfile="/var/run/$pidfile";;
922 if [ -f "${pidfile}" ]; then
924 for p in $(< "${pidfile}"); do
925 [ -z "$(echo "$p" | awk '{gsub(/[0-9]/,"");print;}')" ] && pid="$pid $p"
931 # Next try "pidof" if pidfile is not specified
932 if [ -z "$pid" ] && [ -z "$2" ]; then
933 pid=$(pidof -o $$ -o $PPID -o %PPID -x "$1")
936 pid=$(filter_chroot $pid)
940 # status [--pidfile PIDFILE] {subsys} [{daemon}]"
942 local pid subsys daemon cpuset_msg pidfile
943 if [ "$1" = "--pidfile" -o "$1" = "-p" ]; then
945 case "$pidfile" in /*);; *) pidfile="/var/run/$pidfile";; esac
954 msg_usage " status [--pidfile PIDFILE] {subsys} [{daemon}]"
958 # if pidfile specified, pid must be there
959 if [ "$pidfile" ]; then
960 [ -f "$pidfile" ] && read pid < $pidfile
961 # filter_chroot does not filter out dead pids, so this extra check, see t/status-pidfile.sh
962 if [ ! -d "/proc/$pid" ]; then
966 pid=$(pidof -o $$ -o $PPID -o %PPID -x $daemon)
968 pid=$(filter_chroot $pid)
972 if [ -n "$SERVICE_CPUSET" ] && is_yes "$CPUSETS"; then
973 if grep -q "$pid" "/dev/cpuset/${SERVICE_CPUSET}/tasks"; then
974 cpuset_msg=$(nls " in cpuset %s..." "$SERVICE_CPUSET")
976 cpuset_msg=$(nls " outside of configured cpuset %s..." "$SERVICE_CPUSET")
979 nls "%s (pid %s) is running%s" "$daemon" "$pid" "$cpuset_msg"
983 # Next try "/var/run/*.pid" files; if pidfile is not set
984 local base=${daemon##*/}
985 if [ -z "$pidfile" -a -f /var/run/${base}.pid ]; then
986 read pid < /var/run/${base}.pid
987 pid=$(filter_chroot $pid)
989 nls "%s dead but pid file (%s) exists" "$subsys" /var/run/${base}.pid
994 # See if /var/lock/subsys/$subsys exists
995 if [ -f /var/lock/subsys/$subsys ]; then
996 nls "daemon %s dead but subsys (%s) locked" "$daemon" "$subsys"
999 nls "%s is stopped" "$subsys"
1003 # Confirm whether we really want to run this service
1006 nls -n "Start service %s (Y)es/(N)o/(C)ontinue? [Y] " "$1"
1025 # module is needed (ie. is requested, is available and isn't loaded already)
1027 # fail if /sbin/lsmod does not exists (ex. in containers)
1028 [ -x /sbin/lsmod ] || return 1
1030 # module name without .o at end
1031 if ! lsmod | grep -q "$1"; then
1032 if ls -1R /lib/modules/$(uname -r)/ 2> /dev/null | grep -q "^${1}.\(\|k\)o\(\|.gz\)"; then
1042 local parsed single die args foo result
1044 while is_no "$parsed"; do
1063 if is_yes "${single}"; then
1065 show "Loading %s kernel module(s)" "$foo"
1068 if [ -x /sbin/modprobe ]; then
1069 /sbin/modprobe -s $args "$@"
1075 if is_yes "${single}"; then
1077 if [ $result = "0" ]; then
1078 is_yes "$single" && ok
1081 if is_yes "$die"; then
1082 nls "Could not load %s kernel module(s)" "$@"
1089 if is_no "$RC_LOGGING"; then
1099 initlog -n $0 -s "$1 $2" -e 1
1103 initlog -n $0 -s "$1 $2" -e 2
1107 # Check if any flavor of portmapper is running
1108 check_portmapper() {
1109 if [ -x /usr/sbin/rpcinfo ]; then
1110 if /usr/sbin/rpcinfo -p localhost >/dev/null 2>/dev/null; then
1115 elif [ -z "$(pidof portmap)" -a -z "$(pidof rpcbind)" ]; then
1121 # is_fsmounted fstype mntpoint
1122 # Check if filesystem fstype is mounted on mntpoint
1127 [ -n "$fstype" -a -n "$mntpoint" ] || return 1
1129 if [ -r /proc/mounts ]; then
1130 grep -qE "[[:blank:]]$mntpoint[[:blank:]]+$fstype[[:blank:]]" /proc/mounts
1133 if [ "$(stat -L -f -c %T $mntpoint 2>/dev/null)" = "$fstype" ]; then
1141 # __umount_loop awk_program fstab_file first_msg retry_msg umount_args
1142 # awk_program should process fstab_file and return a list of fstab-encoded
1143 # paths; it doesn't have to handle comments in fstab_file.
1145 local remaining sig=
1148 remaining=$(LC_ALL=C awk "/^#/ {next} $1" "$2" | sort -r)
1149 while [ -n "$remaining" -a "$retry" -gt 0 ]; do
1150 if [ "$retry" -eq 3 ]; then
1151 run_cmd "$3" fstab-decode umount $5 $remaining
1153 run_cmd "$4" fstab-decode umount $5 $remaining
1156 remaining=$(LC_ALL=C awk "/^#/ {next} $1" "$2" | sort -r)
1157 while [ "$count" -gt 0 ]; do
1158 [ -z "$remaining" ] && break
1161 remaining=$(LC_ALL=C awk "/^#/ {next} $1" "$2" | sort -r)
1163 [ -z "$remaining" ] && break
1164 fstab-decode /bin/fuser -k -m $sig $remaining >/dev/null
1166 retry=$(($retry -1))
1171 # Similar to __umount loop above, specialized for loopback devices
1172 __umount_loopback_loop() {
1173 local remaining devremaining sig=
1176 remaining=$(awk '$1 ~ /^\/dev\/loop/ && $2 != "/" {print $2}' /proc/mounts)
1177 devremaining=$(awk '$1 ~ /^\/dev\/loop/ && $2 != "/" {print $1}' /proc/mounts)
1178 while [ -n "$remaining" -a "$retry" -gt 0 ]; do
1179 if [ "$retry" -eq 3 ]; then
1180 run_cmd "Unmounting loopback filesystems: " \
1181 fstab-decode umount $remaining
1183 run_cmd "Unmounting loopback filesystems (retry):" \
1184 fstab-decode umount $remaining
1186 for dev in $devremaining ; do
1187 losetup $dev > /dev/null 2>&1 && \
1188 run_cmd "Detaching loopback device $dev: " \
1191 remaining=$(awk '$1 ~ /^\/dev\/loop/ && $2 != "/" {print $2}' /proc/mounts)
1192 devremaining=$(awk '$1 ~ /^\/dev\/loop/ && $2 != "/" {print $1}' /proc/mounts)
1193 [ -z "$remaining" ] && break
1194 fstab-decode /bin/fuser -k -m $sig $remaining >/dev/null
1196 retry=$(($retry -1))
1202 # If we have cachefile, use it.
1203 # If we don't, create memory variables and try to save silently,
1204 local cachefile='/var/cache/rc-scripts/msg.cache'
1207 if is_yes "$ISATTY"; then
1213 # We create $check variable which is used to invalidate the cache.
1214 # The $check contains user locale and terminal.
1215 local check="$term.$LC_MESSAGES.$INIT_COL"
1217 if [ -f "$cachefile" -a "$cachefile" -nt /etc/sysconfig/system -a "$cachefile" -nt /etc/sysconfig/init-colors ]; then
1218 if . "$cachefile" 2>/dev/null; then
1219 if [ "$check" = "$_check" ]; then
1226 _busy=$(progress "BUSY" "$CBUSY")
1227 _ok=$(progress "DONE")
1228 _started=$(progress "WORK")
1229 _fail=$(progress "FAIL" "$CFAIL")
1230 _died=$(progress "DIED" "$CFAIL")
1232 # we don't use heredoc, as ksh attempts to create tempfile then
1233 (> "$cachefile" ) 2>/dev/null || return
1234 echo "_busy='$_busy';" >> "$cachefile"
1235 echo "_ok='$_ok';" >> "$cachefile"
1236 echo "_started='$_started';" >> "$cachefile"
1237 echo "_fail='$_fail';" >> "$cachefile"
1238 echo "_died='$_died';" >> "$cachefile"
1239 echo "_check='$check';" >> "$cachefile"
1243 if [ -z "$GETTEXT" ]; then
1244 if [ -x /bin/gettext -o -x /usr/bin/gettext ]; then
1251 if [ -z "$TPUT" ]; then
1252 if [ -d /usr/share/terminfo ] && [ -x /usr/bin/tput -o -x /bin/tput ]; then
1254 # check if we are on proper terminal
1255 tput longname >/dev/null 2>&1 || TPUT=no
1266 # * Local variables:
1268 # * indent-tabs-mode: notnil