lib/functions

   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.
   4 #
   5 #
   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
  14 # First set up a default search path.
  15 export PATH="/sbin:/usr/sbin:/bin:/usr/bin"
  16
  17 # Set defaults
  18 if [ -z "$COLUMNS" -o -z "$LINES" ]; then
  19         _setterm() {
  20                 set -- $(stty size 2>/dev/null)
  21                 LINES=${LINES:-$1}
  22                 COLUMNS=${COLUMNS:-$2}
  23         }
  24         _setterm
  25         unset _setterm
  26 fi
  27 [ -z "$LINES" ] || [ "$LINES" -le 0 ] && LINES=40
  28 [ -z "$COLUMNS" ] || [ "$COLUMNS" -le 0 ] && COLUMNS=80
  29 export LINES COLUMNS
  30 INIT_COL=$((COLUMNS - 13))
  31
  32 # Set colors
  33 RED=1
  34 GREEN=2
  35 YELLOW=3
  36 BLUE=4
  37 MAGENTA=5
  38 CYAN=6
  39 WHITE=7
  40 NORMAL=15
  41 # Bold definition (second parameter to termput setaf)
  42 BOLD=1
  43 NOBOLD=0
  44 # Default colors
  45 CBRACKETS="$CYAN"       # brackets [ ] color
  46 CDONE="$GREEN"          # DONE and WORK color
  47 CBUSY="$MAGENTA"        # BUSY color
  48 CFAIL="$RED"            # FAIL and DIED color
  49 CPOWEREDBY="$CYAN"      # "Powered by" color
  50 CPLD="$GREEN"           # "PLD Linux Distribution" color
  51 CI="$RED"               # Capital I color (press I to enter interactive startup)
  52 CRESMAN="$GREEN"        # "Resource Manager" color
  53 CHARS=""                # Characters displayed on the beginning of show line
  54 CCHARS="$NORMAL"        # Color of these characters (look at /etc/sysconfig/init-colors.gentoo example)
  55
  56 # Source configuration if available - may override default values
  57 [ -r /etc/sysconfig/init-colors ] && . /etc/sysconfig/init-colors
  58 [ -r /etc/sysconfig/system ] && . /etc/sysconfig/system
  59 [ -r /etc/sysconfig/bootsplash ] && . /etc/sysconfig/bootsplash
  60
  61 # if initscript is invoked via bash, enable RedHat/Fedora compatibility
  62 # RC_FEDORA is "set" if enabled and "unset" when not, but it's "value" is always empty
  63 # this is useful for inline constructs
  64 if [ "${BASH_VERSION+set}" = "set" ]; then
  65         RC_LOGGING=yes
  66         FASTRC=no
  67         RC_FEDORA=
  68 else
  69         unset RC_FEDORA || :
  70 fi
  71
  72 if [ -z "$VSERVER" -o "$VSERVER" = "detect" ]; then
  73         {
  74                 while read _f _ctx; do
  75                         [ "$_f" = "VxID:" -o "$_f" = "s_context:" ] && break
  76                 done </proc/self/status
  77         } 2>/dev/null
  78         if [ -z "$_ctx" -o "$_ctx" = "0" ]; then
  79                 VSERVER=no
  80         else
  81                 VSERVER=yes
  82         fi
  83         unset _f _ctx
  84 fi
  85
  86 # VSERVER_ISOLATION_NET = isolation only inside of vserver guests
  87 if [ -z "$VSERVER_ISOLATION_NET" -o "$VSERVER_ISOLATION_NET" = "detect" ]; then
  88         VSERVER_ISOLATION_NET=no
  89         if [ "$VSERVER" = "yes" ]; then
  90                 if [ -f /proc/self/nsproxy ]; then
  91                         # older kernels
  92                         {
  93                                 while read _t _data; do
  94                                         [ "$_t" = "net:" ] && break
  95                                 done < /proc/self/nsproxy
  96                         } 2> /dev/null
  97                         if [ "${_data##*\(}" = "I)" ]; then
  98                                 VSERVER_ISOLATION_NET=yes
  99                         fi
 100                 elif [ -f /proc/self/ninfo ]; then
 101                         # newer kernels
 102                         {
 103                                 while read _t _data; do
 104                                         [ "$_t" = "NCaps:" ] && break
 105                                 done < /proc/self/ninfo
 106                         } 2> /dev/null
 107                         if [ "${_t}" = "NCaps:" ]; then
 108                                 VSERVER_ISOLATION_NET=yes
 109                         fi
 110                 else
 111                         # assume (very?) old kernel mode
 112                         VSERVER_ISOLATION_NET=yes
 113                 fi
 114                 unset _f _data
 115         fi
 116 fi
 117
 118 # we need to know in functions if we were called from a terminal
 119 if [ -z "$ISATTY" ]; then
 120         [ -t ] && ISATTY=yes || ISATTY=no
 121         export ISATTY
 122 fi
 123
 124 is_yes() {
 125         # Test syntax
 126         if [ $# = 0 ]; then
 127                 msg_usage " is_yes {value}"
 128                 return 2
 129         fi
 130
 131         # Check value
 132         case "$1" in
 133         yes|Yes|YES|true|True|TRUE|on|On|ON|Y|y|1)
 134                 # true returns zero
 135                 return 0
 136                 ;;
 137         *)
 138                 # false returns one
 139                 return 1
 140                 ;;
 141         esac
 142 }
 143
 144 is_no() {
 145         # Test syntax
 146         if [ $# = 0 ]; then
 147                 msg_usage " is_no {value}"
 148                 return 2
 149         fi
 150
 151         case "$1" in
 152         no|No|NO|false|False|FALSE|off|Off|OFF|N|n|0)
 153                 # true returns zero
 154                 return 0
 155                 ;;
 156         *)
 157                 # false returns one
 158                 return 1
 159                 ;;
 160         esac
 161 }
 162
 163 # checks if file is empty
 164 # empty lines and lines beginning with hash are ignored
 165 is_empty_file() {
 166         [ -s "$1" ] || return 0
 167         grep -vqE "^(#|[[:blank:]]*$)" "$1" && return 1 || return 0
 168 }
 169
 170 # returns OK if $1 contains $2
 171 strstr() {
 172         [ "${1#*$2*}" = "$1" ] && return 1
 173         return 0
 174 }
 175
 176 # Apply sysctl settings, including files in /etc/sysctl.d
 177 apply_sysctl() {
 178         if [ -x /lib/systemd/systemd-sysctl ]; then
 179                 /lib/systemd/systemd-sysctl
 180                 return
 181         fi
 182
 183         local file
 184         for file in /usr/lib/sysctl.d/*.conf; do
 185                 [ -f /run/sysctl.d/${file##*/} ] && continue
 186                 [ -f /etc/sysctl.d/${file##*/} ] && continue
 187                 test -f "$file" && sysctl -q -e -p "$file"
 188         done
 189         for file in /run/sysctl.d/*.conf; do
 190                 [ -f /etc/sysctl.d/${file##*/} ] && continue
 191                 test -f "$file" && sysctl -q -e -p "$file"
 192         done
 193         for file in /etc/sysctl.d/*.conf; do
 194                 test -f "$file" && sysctl -q -e -p "$file"
 195         done
 196         sysctl -q -e -p /etc/sysctl.conf
 197 }
 198
 199 if is_yes "$FASTRC" || is_yes "$IN_SHUTDOWN"; then
 200         RC_LOGGING=no
 201 fi
 202
 203 if is_no "$RC_LOGGING"; then
 204         initlog() {
 205                 RESULT=0
 206                 while [ "$1" != "${1##-}" ]; do
 207                         case $1 in
 208                         -c)
 209                                 shift
 210                                 $1
 211                                 RESULT=$?
 212                                 break
 213                                 ;;
 214                         *)
 215                                 shift
 216                                 ;;
 217                         esac
 218                 done
 219                 return $RESULT
 220         }
 221 fi
 222
 223 kernelver() {
 224         local _x _y _z v v1 old_IFS ver
 225         {
 226                 read _x _y v _z
 227                 old_IFS=$IFS
 228                 # strip _* or -* from versions like: "2.6.25_vanilla-1", "2.6.25-1"
 229                 IFS='_-'
 230                 set -- $v
 231                 v1=${1}
 232                 IFS='.'
 233                 set -- $v1
 234                 IFS=$old_IFS
 235
 236                 ver=${3}
 237                 while [ ${#ver} -lt 3 ]; do ver="0$ver"; done
 238                 ver="$2$ver"
 239                 while [ ${#ver} -lt 6 ]; do ver="0$ver"; done
 240                 ver="$1$ver"
 241                 while [ ${#ver} -lt 9 ]; do ver="0$ver"; done
 242                 echo $ver
 243         } < /proc/version
 244 }
 245
 246 kernelverser() {
 247         local _x _y _z v v1 old_IFS ver
 248         {
 249                 read _x _y v _z
 250                 old_IFS=$IFS
 251                 # strip _* or -* from versions like: "2.6.25_vanilla-1", "2.6.25-1"
 252                 IFS='_-'
 253                 set -- $v
 254                 v1=${1}
 255                 IFS='.'
 256                 set -- $v1
 257                 IFS=$old_IFS
 258                 ver=$2
 259                 while [ ${#ver} -lt 3 ]; do ver="0$ver"; done
 260                 ver="$1$ver"
 261                 while [ ${#ver} -lt 6 ]; do ver="0$ver"; done
 262                 echo $ver
 263         } </proc/version
 264 }
 265
 266 kernelvermser() {
 267         local _x _y _z v v1 old_IFS ver
 268         {
 269                 read _x _y v _z
 270                 old_IFS=$IFS
 271                 # strip _* or -* from versions like: "2.6.25_vanilla-1", "2.6.25-1"
 272                 IFS='_-'
 273                 set -- $v
 274                 v1=${1}
 275                 IFS='.'
 276                 set -- $v1
 277                 IFS=$old_IFS
 278                 ver="$1"
 279                 while [ ${#ver} -lt 3 ]; do ver="0$ver"; done
 280                 echo $ver
 281         } </proc/version
 282 }
 283
 284 # Colors workaround
 285 termput() {
 286         is_yes "$ISATTY" || return
 287
 288         if is_yes "$FASTRC" || is_no "$TPUT"; then
 289                 case "$1" in
 290                 hpa)
 291                         echo -ne "\033[$(($2+1))G"
 292                         ;;
 293                 cuu*)
 294                         echo -ne "\033[${2}A"
 295                         ;;
 296                 el)
 297                         echo -ne "\033[0K"
 298                         ;;
 299                 setaf)
 300                         local ISBOLD
 301                         if [ -n "$3" ]; then
 302                                 ISBOLD="$3"
 303                         else
 304                                 ISBOLD="$NOBOLD";
 305                         fi
 306                         is_yes "$COLOR_INIT" && echo -ne "\033[${ISBOLD};3${2}m"
 307                         ;;
 308                 op)
 309                         termput setaf $NORMAL
 310                         ;;
 311                 esac
 312         else
 313                 case "$1" in
 314                 hpa | cuu* | el)
 315                         tput "$@"
 316                         ;;
 317                 setaf)
 318                         if [ "$3" = "1" ]; then tput bold; else tput sgr0; fi
 319                         is_yes "$COLOR_INIT" && tput setaf "$2"
 320                         ;;
 321                 op)
 322                         termput setaf $NORMAL
 323                         ;;
 324                 esac
 325         fi
 326 }
 327
 328 if [ ! -x /bin/printf ]; then
 329         # printf equivalent
 330         # FIXME: buggy when single or double quotes in message!
 331         printf() {
 332                 local text m
 333                 text="$1"
 334                 shift
 335                 if [ $# -gt 0 ]; then
 336                         m="$1"
 337                         shift
 338                         while [ $# -gt 0 ]; do
 339                                 m="$m\",\"$1"
 340                                 shift
 341                         done
 342                 fi
 343                 awk "BEGIN {printf \"$text\", \"$m\"; }"
 344         }
 345 fi
 346
 347 # National language support function
 348 nls() {
 349         local msg_echo nls_domain text message
 350         msg_echo='\n'
 351         nls_domain="$NLS_DOMAIN"
 352         while [ "$1" != "${1##-}" ]; do
 353                 case "$1" in
 354                 --nls-domain)
 355                         shift
 356                         nls_domain="$1"
 357                         shift
 358                         ;;
 359                 -n)
 360                         msg_echo=''
 361                         shift
 362                         ;;
 363                 esac
 364         done
 365         message="$1"
 366         shift
 367
 368         # empty message, so we return --misiek
 369         if [ -z "$message" ]; then
 370                 echo -en "$msg_echo"
 371                 return
 372         fi
 373
 374         if is_yes "$GETTEXT"; then
 375                 message=$(TEXTDOMAINDIR="/etc/sysconfig/locale" gettext -e --domain="${nls_domain:-rc-scripts}" "$message")
 376         fi
 377
 378         printf "$message" "$@"
 379         echo -en "$msg_echo"
 380 }
 381
 382 rc_splash() {
 383         local action="$1"
 384
 385         if ! is_no "$BOOT_SPLASH" && ! is_yes "$VSERVER"; then
 386                 [ -x /bin/splash ] && /bin/splash "$action"
 387         fi
 388
 389         : $((progress++))
 390 }
 391
 392 msg_network_down() {
 393         nls "ERROR: Networking is down. %s can't be run." "$1" >&2
 394 }
 395
 396 msg_starting() {
 397         show "Starting %s service" "$1"
 398 }
 399
 400 msg_already_running() {
 401         nls "%s service is already running." "$1"
 402 }
 403
 404 msg_stopping() {
 405         show "Stopping %s service" "$1"
 406 }
 407
 408 msg_not_running() {
 409         nls "%s service is not running." "$1"
 410 }
 411
 412 msg_reloading() {
 413         show "Reloading %s service" "$1"
 414 }
 415
 416 msg_usage() {
 417         nls "Usage: %s" "$*"
 418 }
 419
 420 # Some functions to handle PLD Linux-style messages
 421 show() {
 422         local text len time
 423
 424         if is_yes "$RC_UPTIME"; then
 425                 time=$(awk '{printf("[%8.2f] ", $1)}' /proc/uptime)
 426         fi
 427
 428         if is_no "$FASTRC" && is_yes "$GETTEXT"; then
 429                 text=$time$(nls -n "$@")
 430         else
 431                 text=$time$(printf "$@")
 432         fi
 433         len=${#text}
 434         while [ $((len++)) -lt $INIT_COL ]; do
 435                 text="$text."
 436         done
 437         if [ -n "$CHARS" ]; then
 438                 termput setaf $CCHARS
 439                 echo -n "$CHARS"
 440                 termput op
 441         fi
 442         echo -n "$text"
 443 }
 444
 445 deltext() {
 446         termput hpa $INIT_COL
 447 }
 448
 449 # Displays message in square brackests ("[ DONE ]"). Takes two arguments.
 450 # First is the text to display, second is color number to use (argument to
 451 # tput setaf). If second argument is not given, default (2, green) will be
 452 # used).
 453 progress() {
 454         local COLOR
 455         if [ -n "$2" ]; then
 456                 COLOR="$2"
 457         else
 458                 COLOR="$CDONE"
 459         fi
 460         deltext
 461         echo -n "$(termput setaf $CBRACKETS)[$(termput setaf $COLOR) $(nls --nls-domain rc-scripts "$1") $(termput setaf $CBRACKETS)]$(termput op)"
 462 }
 463
 464 busy() {
 465         echo -n "$_busy"
 466 }
 467
 468 ok() {
 469         echo -ne "$_ok${RC_FEDORA+\\r}${RC_FEDORA-\\n}"
 470 }
 471
 472 started() {
 473         echo "$_started"
 474 }
 475
 476 fail() {
 477         echo -ne "$_fail${RC_FEDORA+\\r}${RC_FEDORA-\\n}"
 478         return 1
 479 }
 480
 481 died() {
 482         echo "$_died"
 483         return 1
 484 }
 485
 486 # Check if $pid (could be plural) are running
 487 checkpid() {
 488         while [ "$1" ]; do
 489                 [ -d "/proc/$1" ] && return 0
 490                 shift
 491         done
 492         return 1
 493 }
 494
 495 # - outside chroot get only those processes, which are outside chroot.
 496 # - inside chroot get only those processes, which are inside chroot.
 497 # - don't filter out pids which do not have corresponding running processes (process died etc)
 498 # (note: some processes like named are chrooted but run outside chroot)
 499 # - do nothing inside vserver
 500 filter_chroot() {
 501         # no pids, exit early
 502         [ $# -eq 0 ] && return
 503
 504         # filter by pid namespace if such dir exists for current process
 505         # we do filter in containers as stacked containers are possible with LXC
 506         if [ -d /proc/$$/ns ]; then
 507                 local pids
 508                 pids=$(filter_ns "$@") && set -- "$pids"
 509         fi
 510
 511         if is_yes "$VSERVER"; then
 512                 echo $@
 513                 return
 514         fi
 515
 516         if [ $# -lt 1 -o ! -d /proc/1 ]; then
 517                 echo $@
 518                 return
 519         fi
 520
 521         local root_dir good_pids="" good_add_pid
 522         for root_pid in $@; do
 523                 root_dir=$(resolvesymlink /proc/${root_pid}/root)
 524                 if [ -n "$root_dir" ]; then
 525                         good_add_pid=1
 526                         if [ -n "${SYSTEM_CHROOTS}" ]; then
 527                                 for r_dir in ${SYSTEM_CHROOTS}; do
 528                                         echo "$root_dir" | grep -q "^${r_dir}" && good_add_pid=0
 529                                 done
 530                         fi
 531                         [ "$good_add_pid" -eq 1 ] && good_pids="$good_pids $root_pid"
 532                 elif [ ! -d "/proc/$root_pid" ]; then
 533                         good_pids="$good_pids $root_pid"
 534                 fi
 535         done
 536         echo $good_pids
 537 }
 538
 539 # similar to filter_chroot, but filter based on /proc/PID/ns/pid value
 540 filter_ns() {
 541         local cur_ns=$(resolvesymlink /proc/$$/ns/pid)
 542         [ "$cur_ns" ] || return 1
 543
 544         local pid ns pids=""
 545         # add pids if it matches current pid namespace
 546         # we should add pids what do not exist (dead processes),
 547         # but not add pids whose namespace does not match
 548         # (processes belonging to different NS do exist in /proc)
 549         for pid in "$@"; do
 550                 if [ ! -d /proc/$pid ]; then
 551                         pids="$pids $pid"
 552                         continue
 553                 fi
 554                 ns=$(resolvesymlink /proc/$pid/ns/pid)
 555                 if [ "$ns" = "$cur_ns" ]; then
 556                         pids="$pids $pid"
 557                 fi
 558         done
 559         echo $pids
 560         return 0
 561 }
 562
 563 # Usage:
 564 # run_cmd Message command_to_run
 565 # run_cmd -a Message command_to_run
 566 # run_cmd --user "username" "Message" command_to_run
 567 run_cmd() {
 568         local force_err=0 exit_code=0 errors user
 569         while [ $# -gt 0 ]; do
 570                 case "$1" in
 571                 -a)
 572                         force_err=1
 573                         ;;
 574                 --user)
 575                         shift
 576                         user=$1
 577                         ;;
 578                 *)
 579                         break
 580                 esac
 581                 shift
 582         done
 583
 584         local message=$1; shift
 585         show "$message"; busy
 586
 587         if errors=$(
 588                 cd /
 589                 export HOME=/tmp TMPDIR=/tmp
 590                 if is_no "$RC_LOGGING"; then
 591                         ${user:+setuidgid -s $user} "$@" 2>&1
 592                 else
 593                         ${user:+setuidgid -s $user} initlog -c "$*" 2>&1
 594                 fi
 595                 ); then
 596                 ok
 597                 log_success "$1 $message"
 598         else
 599                 fail
 600                 log_failed "$1 $message"
 601                 exit_code=1
 602         fi
 603         [ -n "$errors" ] && [ $exit_code -eq 1 -o $force_err -eq 1 ] && echo "$errors"
 604         return $exit_code
 605 }
 606
 607 _daemon_set_ulimits() {
 608         local opt val ksh=${KSH_VERSION:+1}
 609         set -- ${SERVICE_LIMITS:-$DEFAULT_SERVICE_LIMITS}
 610         while [ $# -gt 0 ]; do
 611                 opt=$1
 612                 val=$2
 613                 if [ "$ksh" ]; then
 614                         case "$opt" in
 615                         -Hu)
 616                                 opt=-Hp
 617                         ;;
 618                         -Su)
 619                                 opt=-Sp
 620                         ;;
 621                         -u)
 622                                 opt=-p
 623                         ;;
 624                         esac
 625                 fi
 626                 ulimit $opt $val
 627                 shift 2
 628         done
 629 }
 630
 631 # inner function used by daemon().
 632 # do not call this directly, as it expects variables being inherited.
 633 # also it expects to be called from subshell as it exports env.
 634 # it expects options parsed by daemon() and command to be executed in "$@".
 635 _daemon_exec() {
 636         local prog=""
 637         umask ${SERVICE_UMASK:-$DEFAULT_SERVICE_UMASK};
 638         export USER=root HOME=/tmp TMPDIR=/tmp
 639
 640         nice=${nice:-$DEFAULT_SERVICE_RUN_NICE_LEVEL}
 641         nice=${nice:-0}
 642
 643         # make nice level absolute, not to be dependant of nice level of shell where service started
 644         nice=$(($nice - $(nice)))
 645
 646         if [ "$closefds" = 1 ]; then
 647                 exec 1>&-
 648                 exec 2>&-
 649                 exec 0<&-
 650         elif [ "$redirfds" = 1 ]; then
 651                 exec 1>/dev/null
 652                 exec 2>/dev/null
 653                 exec 0</dev/null
 654         else
 655                 exec 2>&1
 656                 exec 0</dev/null
 657         fi
 658
 659         if is_no "$RC_LOGGING"; then
 660                 prog=$1; shift
 661                 if [ ! -x $prog ]; then
 662                         logger -t rc-scripts -p daemon.debug "daemon: Searching PATH for $prog, consider using full path in initscript"
 663                         local a o=$IFS
 664                         IFS=:
 665                         for a in $PATH; do
 666                                 if [ -x $a/$prog ]; then
 667                                         prog=$a/$prog
 668                                         break
 669                                 fi
 670                         done
 671                         IFS=$o
 672                 fi
 673                 set -- "$prog" "$@"
 674
 675                 # use setsid to detach from terminal,
 676                 # needs pidfile or ssd would check setsid program instead of real program
 677                 if [ "$pidfile" ]; then
 678                         set -- /usr/bin/setsid "$@"
 679                 fi
 680
 681                 prog=$1; shift
 682                 /sbin/start-stop-daemon -q --start \
 683                         --nicelevel $nice \
 684                         ${pidfile:+--pidfile $pidfile} \
 685                         ${makepid:+--make-pidfile} \
 686                         ${user:+--chuid $user} \
 687                         ${chdir:+--chdir "$chdir"} \
 688                         ${fork:+--background} \
 689                         ${SERVICE_DROPCAPS:+--dropcap $SERVICE_DROPCAPS} \
 690                         --exec "$prog" \
 691                         -- "$@"
 692         else
 693
 694                 if [ "$makepid" ] && [ "$pidfile" ]; then
 695                         export PIDFILE="$pidfile"
 696                         set -- /lib/rc-scripts/makepid "$@"
 697                 fi
 698
 699                 if [ "$fork" = "1" ]; then
 700                         set -- /usr/bin/setsid "$@"
 701                 fi
 702                 if [ -n "$user" -a "$user" != "root" ]; then
 703                         set -- /bin/runuser -u "$user" -- "$@"
 704                 fi
 705
 706                 nice -n $nice initlog -c "$*" 2>&1 </dev/null
 707         fi
 708 }
 709
 710 # A function to start a program (now it's useful on read-only filesystem too)
 711 daemon() {
 712         local errors="" waitname="" waittime=""
 713         local exit_code=0
 714         local nice=$SERVICE_RUN_NICE_LEVEL
 715         local fork user closefds redirfds pidfile makepid chdir=/
 716
 717         while [ $# -gt 0 ]; do
 718                 case $1 in
 719                 '')
 720                 msg_usage " daemon [--check] [--user user] [--fork] [--chdir directory] [--closefds] [--redirfds] [--waitforname procname] [--waitfortime seconds] [--pidfile file] [--makepid] [+/-nicelevel] {program} <program args>"
 721                         return 2
 722                         ;;
 723                 --check)
 724                         # for compatibility with redhat/mandrake
 725                         nls "warning: --check option is ignored!"
 726                         shift
 727                         ;;
 728                 --user)
 729                         shift
 730                         user=$1
 731                         ;;
 732                 --fork)
 733                         fork=1
 734                         ;;
 735                 --chdir)
 736                         shift
 737                         chdir=$1
 738                         ;;
 739                 --closefds)
 740                         closefds=1
 741                         ;;
 742                 --redirfds)
 743                         redirfds=1
 744                         ;;
 745                 --waitforname)
 746                         shift
 747                         waitname="$1"
 748                         ;;
 749                 --waitfortime)
 750                         shift
 751                         waittime="$1"
 752                         ;;
 753                 --pidfile=?*)
 754                         pidfile="${1#--pidfile=}"
 755                         case "$pidfile" in /*);; *) pidfile="/var/run/$pidfile";; esac
 756                         ;;
 757                 --pidfile)
 758                         shift
 759                         pidfile="$1"
 760                         case "$pidfile" in /*);; *) pidfile="/var/run/$pidfile";; esac
 761                         ;;
 762                 --makepid)
 763                         makepid=1
 764                         # makepid implies fork
 765                         fork=1
 766                         ;;
 767                 -*|+*)
 768                         nice=$1
 769                         shift
 770                         break
 771                         ;;
 772                 *)
 773                         break
 774                         ;;
 775                 esac
 776                 shift
 777         done
 778
 779         _daemon_set_ulimits
 780
 781         [ -z "$DEFAULT_SERVICE_UMASK" ] && DEFAULT_SERVICE_UMASK=022
 782         [ -z "$DEFAULT_SERVICE_RUN_NICE_LEVEL" ] && DEFAULT_SERVICE_RUN_NICE_LEVEL=0
 783
 784         # And start it up.
 785         busy
 786         cd $chdir
 787         [ -n "$SERVICE_CPUSET" ] && is_yes "$CPUSETS" && echo $$ > "/dev/cpuset/${SERVICE_CPUSET}/tasks"
 788         if errors=$(_daemon_exec "$@"); then
 789                 # wait for process (or pidfile) to be created
 790                 if [ "$waittime" -gt 0 ]; then
 791                         # waitname can be empty, as if pidfile is in use, it is not relevant
 792                         waitproc "$waittime" "$waitname" "$pidfile"
 793                 fi
 794                 log_success "$1 startup"
 795                 ok
 796         else
 797                 exit_code=1
 798                 fail
 799                 log_failed "$1 startup"
 800                 [ -n "$errors" ] && echo >&2 "$errors"
 801         fi
 802         return $exit_code
 803 }
 804
 805 # wait (in seconds) for process (or pidfile) to be created
 806 # example: waitproc 30 httpd /var/run/httpd.pid
 807 waitproc() {
 808         local waittime=$1 procname=$2 pidfile=$3
 809         local pid
 810         local now=$(date +%s)
 811         local maxtime=$(($now + $waittime))
 812
 813         if [ -z "$procname" -a -z "$pidfile" ]; then
 814                 msg_usage "waitproc: procname or pidfile must be specified"
 815                 return 2
 816         fi
 817
 818         while [ "$(date +%s)" -lt "$maxtime" ]; do
 819                 pid=$(pidofproc "$procname" "$pidfile")
 820                 [ -n "$pid" ] && break
 821
 822                 # start-stop-daemon uses same delay
 823                 usleep 20000
 824         done
 825 }
 826
 827 # A function to stop a program.
 828 killproc() {
 829         local notset killlevel base pid pidfile result delay=3 try
 830         # Test syntax.
 831         if [ $# = 0 ]; then
 832                 msg_usage " killproc [--pidfile|-p PIDFILE] [-d DELAY] {program} [-SIGNAME]"
 833                 return 2
 834         fi
 835
 836         while [ "$1" != "${1##-}" ]; do
 837                 case $1 in
 838                 -d)
 839                         delay="$2"
 840                         shift 2
 841                         ;;
 842                 --pidfile|-p)
 843                         pidfile="$2"
 844                         case "$pidfile" in /*);; *) pidfile="/var/run/$pidfile";; esac
 845                         shift 2
 846                         ;;
 847                 --waitforname)
 848                         waitname="$2"
 849                         shift 2
 850                         ;;
 851                 --waitfortime)
 852                         waittime="$2"
 853                         shift 2
 854                         ;;
 855                 esac
 856         done
 857
 858         busy
 859
 860         local notset=0
 861         # check for second arg to be kill level
 862         if [ -n "$2" ]; then
 863                 killlevel=$2
 864         else
 865                 notset=1
 866         fi
 867
 868         # experimental start-stop-daemon based killing.
 869         # works only with pidfile
 870         if is_no "$RC_LOGGING" && [ "$pidfile" ]; then
 871                 local sig=${killlevel:--TERM} retry
 872                 # do not retry if signal is specified,
 873                 # as otherwise impossible to send HUP if process pid stays in pidfile.
 874                 # however, do retry if --waitfortime was specified
 875                 if [ "${killlevel+set}" = "set" ] && [ -z "$waittime" ]; then
 876                         # if we send HUP it's ok if process does not die
 877                         retry="--oknodo"
 878                 else
 879                         local waitretry
 880                         : ${waittime=10}
 881                         : ${waitretry=$(($waittime * 2))}
 882
 883                         # 1. kill with $sig, wait $delay
 884                         # 2. kill with $sig, wait $waittime
 885                         # 3. kill with KILL, wait $waitretry
 886                         retry="--retry ${sig#-}/${delay}/${sig#-}/${waittime}/KILL/${waitretry}"
 887                 fi
 888                 /sbin/start-stop-daemon -q --stop \
 889                         $retry \
 890                         ${waitname:+--name $waitname} \
 891                         -s ${sig#-} \
 892                         ${pidfile:+--pidfile $pidfile}
 893                 result=$?
 894                 if [ "$result" -eq 0 ]; then
 895                         ok
 896                 else
 897                         fail
 898                 fi
 899                 return $result
 900         fi
 901
 902
 903         # Save basename.
 904         base=${1##*/}
 905
 906         # Find pid.
 907         pid=$(pidofproc "$1" "$pidfile")
 908         [ -z "$pid" ] && pid=$(pidofproc "$base" "$pidfile")
 909
 910         # Kill it.
 911         if [ -n "$pid" -a "$pid" != "$$" ] && checkpid $pid 2>&1; then
 912                 if [ "$notset" = "1" ]; then
 913                         if checkpid $pid 2>&1; then
 914                                 # TERM first, then KILL if not dead
 915                                 kill -TERM $pid
 916                                 usleep 50000
 917
 918                                 try=0
 919                                 while [ $try -lt $delay ]; do
 920                                         checkpid $pid || break
 921                                         sleep 1
 922                                         try=$((try+1))
 923                                 done
 924                                 if checkpid $pid; then
 925                                         # XXX: SIGKILL is sent already on 4th second!
 926                                         # HARMFUL for example to mysqld (which is already workarounded)
 927                                         kill -KILL $pid
 928                                         usleep 50000
 929                                 fi
 930                         fi
 931                         checkpid $pid
 932                         result=$?
 933                         if [ "$result" -eq 0 ]; then
 934                                 fail
 935                                 log_failed "$1 shutdown"
 936                         else
 937                                 ok
 938                                 log_success "$1 shutdown"
 939                         fi
 940                         result=$(( ! $result ))
 941                 else
 942                         # use specified level only
 943                         if checkpid $pid > /dev/null 2>&1; then
 944                                 kill $killlevel $pid
 945                                 result=$?
 946                                 if [ "$result" -eq 0 ]; then
 947                                         ok
 948                                         log_success "$1 got $killlevel"
 949                                 else
 950                                         result=7
 951                                         fail
 952                                         log_failed "$1 didn't get $killlevel"
 953                                 fi
 954                         else
 955                                 result=7
 956                                 died
 957                                 log_failed "$1 shutdown"
 958                         fi
 959                 fi
 960         else
 961                 died
 962                 log_failed "$1 shutdown"
 963                 result=7
 964         fi
 965
 966         if [ -n "$waitname" -a -n "$waittime" ]; then
 967                 # Save basename.
 968                 base=${waitname##*/}
 969                 # Find pid.
 970                 pid=$(pidofproc "$waitname" "$pidfile")
 971                 [ -z "$pid" ] && pid=$(pidofproc "$base" "$pidfile")
 972                 i=0
 973                 while [ "$i" -lt "$waittime" ]; do
 974                         i=$(( i + 1 ))
 975                         checkpid $pid && sleep 1 || break
 976                 done
 977         fi
 978
 979         # Remove pid file if any.
 980         if [ "$notset" = "1" ]; then
 981                 rm -f /var/run/${base}.pid
 982         fi
 983
 984         return $result
 985 }
 986
 987 # A function to find the pid of a program.
 988 pidofproc() {
 989         local pid pidfile base=${1##*/}
 990         pidfile="$base.pid"
 991         [ -n "$2" ] && pidfile="$2"
 992
 993         # Test syntax.
 994         if [ $# = 0 ]; then
 995                 msg_usage " pidofproc {program}"
 996                 return 2
 997         fi
 998
 999         # First try pidfile or "/var/run/*.pid"
1000         case "$pidfile" in
1001                 /*)pidfile="${pidfile}";;
1002                 *) pidfile="/var/run/$pidfile";;
1003         esac
1004         if [ -f "${pidfile}" ]; then
1005                 local p
1006                 for p in $(< "${pidfile}"); do
1007                         [ -z "$(echo "$p" | awk '{gsub(/[0-9]/,"");print;}')" ] && pid="$pid $p"
1008                 done
1009         fi
1010
1011         # Next try "pidof" if pidfile is not specified
1012         if [ -z "$pid" ] && [ -z "$pidfile" ]; then
1013                 pid=$(pidof -o $$ -o $PPID -o %PPID -x "$1")
1014         fi
1015
1016         pid=$(filter_chroot $pid)
1017         echo $pid
1018 }
1019
1020 # status [--pidfile PIDFILE] {subsys} [{daemon}]"
1021 status() {
1022         local pid subsys daemon cpuset_msg pidfile
1023         if [ "$1" = "--pidfile" -o "$1" = "-p" ]; then
1024                 pidfile=$2
1025                 case "$pidfile" in /*);; *) pidfile="/var/run/$pidfile";; esac
1026                 shift 2
1027         fi
1028
1029         subsys=$1
1030         daemon=${2:-$subsys}
1031
1032         # Test syntax.
1033         if [ $# = 0 ]; then
1034                 msg_usage " status [--pidfile PIDFILE] {subsys} [{daemon}]"
1035                 return 2
1036         fi
1037
1038         # if pidfile specified, pid must be there
1039         if [ "$pidfile" ]; then
1040                 [ -f "$pidfile" ] && read pid < $pidfile
1041                 # filter_chroot does not filter out dead pids, so this extra check, see t/status-pidfile.sh
1042                 if [ ! -d "/proc/$pid" ]; then
1043                         pid=
1044                 fi
1045         else
1046                 pid=$(pidof -o $$ -o $PPID -o %PPID -x $daemon)
1047         fi
1048         pid=$(filter_chroot $pid)
1049
1050         if [ "$pid" ]; then
1051                 cpuset_msg="..."
1052                 if [ -n "$SERVICE_CPUSET" ] && is_yes "$CPUSETS"; then
1053                         if grep -q "$pid" "/dev/cpuset/${SERVICE_CPUSET}/tasks"; then
1054                                 cpuset_msg=$(nls " in cpuset %s..." "$SERVICE_CPUSET")
1055                         else
1056                                 cpuset_msg=$(nls " outside of configured cpuset %s..." "$SERVICE_CPUSET")
1057                         fi
1058                 fi
1059                 nls "%s (pid %s) is running%s" "$daemon" "$pid" "$cpuset_msg"
1060                 return 0
1061         fi
1062
1063         # Next try "/var/run/*.pid" files; if pidfile is not set
1064         local base=${daemon##*/}
1065         if [ -z "$pidfile" -a -f /var/run/${base}.pid ]; then
1066                 read pid < /var/run/${base}.pid
1067                 pid=$(filter_chroot $pid)
1068                 if [ "$pid" ]; then
1069                         nls "%s dead but pid file (%s) exists" "$subsys" /var/run/${base}.pid
1070                         return 1
1071                 fi
1072         fi
1073
1074         # See if /var/lock/subsys/$subsys exists
1075         if [ -f /var/lock/subsys/$subsys ]; then
1076                 nls "daemon %s dead but subsys (%s) locked" "$daemon" "$subsys"
1077                 return 2
1078         fi
1079         nls "%s is stopped" "$subsys"
1080         return 3
1081 }
1082
1083 # Confirm whether we really want to run this service
1084 confirm() {
1085         local answer
1086         nls -n "Start service %s (Y)es/(N)o/(C)ontinue? [Y] " "$1"
1087         read answer
1088         case $answer in
1089         y|Y|t|T|j|J|"")
1090                 return 0
1091                 ;;
1092         c|C|k|K|w|W)
1093                 return 2
1094                 ;;
1095         n|N)
1096                 return 1
1097                 ;;
1098         *)
1099                 confirm $1
1100                 return $?
1101                 ;;
1102         esac
1103 }
1104
1105 # module is needed (ie. is requested, is available and isn't loaded already)
1106 is_module() {
1107         # module name without .o at end
1108         if ! lsmod | grep -q "$1"; then
1109                 if ls -1R /lib/modules/$(uname -r)/ 2> /dev/null | grep -q "^${1}.\(\|k\)o\(\|.gz\)"; then
1110                         # true
1111                         return 0
1112                 fi
1113         fi
1114         # false
1115         return 1
1116 }
1117
1118 _modprobe() {
1119         local parsed single die args foo result
1120         parsed=no
1121         while is_no "$parsed"; do
1122                 case "$1" in
1123                 "single")
1124                         single=yes
1125                         shift
1126                         ;;
1127                 "die")
1128                         die=yes
1129                         shift
1130                         ;;
1131                 -*)
1132                         args="$args $1"
1133                         shift
1134                         ;;
1135                 *)
1136                         parsed=yes
1137                         ;;
1138                 esac
1139         done
1140         if is_yes "${single}"; then
1141                 foo="$@"
1142                 show "Loading %s kernel module(s)" "$foo"
1143                 busy
1144         fi
1145         if [ -x /sbin/modprobe ]; then
1146                 /sbin/modprobe -s $args "$@"
1147                 result=$?
1148         else
1149                 deltext; fail
1150                 result=1
1151         fi
1152         if is_yes "${single}"; then
1153                 deltext
1154                 if [ $result = "0" ]; then
1155                         is_yes "$single" && ok
1156                 else
1157                         fail
1158                         if is_yes "$die"; then
1159                                 nls "Could not load %s kernel module(s)" "$@"
1160                                 exit 1
1161                         fi
1162                 fi
1163         fi
1164 }
1165
1166 if is_no "$RC_LOGGING"; then
1167         log_success() {
1168                 :
1169         }
1170
1171         log_failed() {
1172                 :
1173         }
1174 else
1175         log_success() {
1176                 initlog -n $0 -s "$1 $2" -e 1
1177         }
1178
1179         log_failed() {
1180                 initlog -n $0 -s "$1 $2" -e 2
1181         }
1182 fi
1183
1184 # Check if any flavor of portmapper is running
1185 check_portmapper() {
1186         if [ -x /usr/sbin/rpcinfo ]; then
1187                 if /usr/sbin/rpcinfo -p localhost >/dev/null 2>/dev/null; then
1188                         return 0
1189                 else
1190                         return 1
1191                 fi
1192         elif [ -z "$(pidof portmap)" -a -z "$(pidof rpcbind)" ]; then
1193                 return 1
1194         fi
1195         return 0
1196 }
1197
1198 # is_fsmounted fstype mntpoint
1199 # Check if filesystem fstype is mounted on mntpoint
1200 is_fsmounted() {
1201         local fstype=$1
1202         local mntpoint=$2
1203
1204         [ -n "$fstype" -a -n "$mntpoint" ] || return 1
1205
1206         if [ -r /proc/mounts ]; then
1207                 grep -qE "[[:blank:]]$mntpoint[[:blank:]]+$fstype[[:blank:]]" /proc/mounts
1208                 return $?
1209         else
1210                 if [ "$(stat -L -f -c %T $mntpoint 2>/dev/null)" = "$fstype" ]; then
1211                         return 0
1212                 else
1213                         return 1
1214                 fi
1215         fi
1216 }
1217
1218 # __umount_loop awk_program fstab_file first_msg retry_msg umount_args
1219 # awk_program should process fstab_file and return a list of fstab-encoded
1220 # paths; it doesn't have to handle comments in fstab_file.
1221 __umount_loop() {
1222         local remaining sig=
1223         local retry=3 count
1224
1225         remaining=$(LC_ALL=C awk "/^#/ {next} $1" "$2" | sort -r)
1226         while [ -n "$remaining" -a "$retry" -gt 0 ]; do
1227                 if [ "$retry" -eq 3 ]; then
1228                         run_cmd "$3" fstab-decode umount $5 $remaining
1229                 else
1230                         run_cmd "$4" fstab-decode umount $5 $remaining
1231                 fi
1232                 count=4
1233                 remaining=$(LC_ALL=C awk "/^#/ {next} $1" "$2" | sort -r)
1234                 while [ "$count" -gt 0 ]; do
1235                         [ -z "$remaining" ] && break
1236                         count=$(($count-1))
1237                         usleep 500000
1238                         remaining=$(LC_ALL=C awk "/^#/ {next} $1" "$2" | sort -r)
1239                 done
1240                 [ -z "$remaining" ] && break
1241                 fstab-decode /bin/fuser -k -m $sig $remaining >/dev/null
1242                 sleep 3
1243                 retry=$(($retry -1))
1244                 sig=-9
1245         done
1246 }
1247
1248 # Similar to __umount loop above, specialized for loopback devices
1249 __umount_loopback_loop() {
1250         local remaining devremaining sig=
1251         local retry=3
1252
1253         remaining=$(awk '$1 ~ /^\/dev\/loop/ && $2 != "/" {print $2}' /proc/mounts)
1254         devremaining=$(awk '$1 ~ /^\/dev\/loop/ && $2 != "/" {print $1}' /proc/mounts)
1255         while [ -n "$remaining" -a "$retry" -gt 0 ]; do
1256                 if [ "$retry" -eq 3 ]; then
1257                         run_cmd "Unmounting loopback filesystems: " \
1258                                 fstab-decode umount $remaining
1259                 else
1260                         run_cmd "Unmounting loopback filesystems (retry):" \
1261                                 fstab-decode umount $remaining
1262                 fi
1263                 for dev in $devremaining ; do
1264                         losetup $dev > /dev/null 2>&1 && \
1265                                 run_cmd "Detaching loopback device $dev: " \
1266                                 losetup -d $dev
1267                 done
1268                 remaining=$(awk '$1 ~ /^\/dev\/loop/ && $2 != "/" {print $2}' /proc/mounts)
1269                 devremaining=$(awk '$1 ~ /^\/dev\/loop/ && $2 != "/" {print $1}' /proc/mounts)
1270                 [ -z "$remaining" ] && break
1271                 fstab-decode /bin/fuser -k -m $sig $remaining >/dev/null
1272                 sleep 3
1273                 retry=$(($retry -1))
1274                 sig=-9
1275         done
1276 }
1277
1278 rc_cache_init() {
1279         # If we have cachefile, use it.
1280         # If we don't, create memory variables and try to save silently,
1281         local cachefile='/var/cache/rc-scripts/msg.cache'
1282
1283         local term
1284         if is_yes "$ISATTY"; then
1285                 term=$TERM
1286         else
1287                 term=dumb
1288         fi
1289
1290         # We create $check variable which is used to invalidate the cache.
1291         # The $check contains user locale and terminal.
1292         local check="$term.$LC_MESSAGES.$INIT_COL"
1293
1294         if [ -f "$cachefile" -a "$cachefile" -nt /etc/sysconfig/system -a "$cachefile" -nt /etc/sysconfig/init-colors ]; then
1295                 if . "$cachefile" 2>/dev/null; then
1296                         if [ "$check" = "$_check" ]; then
1297                                 return
1298                         fi
1299                 fi
1300         fi
1301
1302         # primitive caching
1303         _busy=$(progress "BUSY" "$CBUSY")
1304         _ok=$(progress "DONE")
1305         _started=$(progress "WORK")
1306         _fail=$(progress "FAIL" "$CFAIL")
1307         _died=$(progress "DIED" "$CFAIL")
1308
1309         # we don't use heredoc, as ksh attempts to create tempfile then
1310         (> "$cachefile" ) 2>/dev/null || return
1311         echo "_busy='$_busy';" >> "$cachefile"
1312         echo "_ok='$_ok';" >> "$cachefile"
1313         echo "_started='$_started';" >> "$cachefile"
1314         echo "_fail='$_fail';" >> "$cachefile"
1315         echo "_died='$_died';" >> "$cachefile"
1316         echo "_check='$check';" >> "$cachefile"
1317 }
1318
1319 rc_gettext_init() {
1320         if [ -z "$GETTEXT" ]; then
1321                 if [ -x /bin/gettext -o -x /usr/bin/gettext ]; then
1322                         GETTEXT=yes
1323                 else
1324                         GETTEXT=no
1325                 fi
1326         fi
1327
1328         if [ -z "$TPUT" ]; then
1329                 if [ -d /usr/share/terminfo ] && [ -x /usr/bin/tput -o -x /bin/tput ]; then
1330                         TPUT=yes
1331                         # check if we are on proper terminal
1332                         tput longname >/dev/null 2>&1 || TPUT=no
1333                 else
1334                         TPUT=no
1335                 fi
1336         fi
1337 }
1338
1339 use_upstart () {
1340         return 1
1341 }
1342 emit () {
1343         return 0
1344 }
1345 is_upstart_task() {
1346         return 1
1347 }
1348 is_upstart_running() {
1349         return 1
1350 }
1351 upstart_start() {
1352         return 1
1353 }
1354 upstart_stop() {
1355         return 1
1356 }
1357 upstart_reload() {
1358         return 0
1359 }
1360 upstart_status() {
1361         return 1
1362 }
1363 _upstart_controlled() {
1364         return 0
1365 }
1366 alias upstart_controlled='_upstart_controlled $0 "$@"'
1367
1368 rc_gettext_init
1369 rc_cache_init
1370
1371 #/*
1372 # * Local variables:
1373 # * mode: sh
1374 # * indent-tabs-mode: notnil
1375 # * End:
1376 # *
1377 # */