lsb-functions: removed KV_micro()
[grml-etc-core.git] / etc / grml / lsb-functions
1 # lsb init-functions
2 # vim:ft=sh:tw=80
3 # /lib/lsb/init-functions for Debian -*- shell-script -*-
4 #
5 # Copyright (c) 2002-03 Chris Lawrence
6 # All rights reserved.
7 #
8 # Redistribution and use in source and binary forms, with or without
9 # modification, are permitted provided that the following conditions
10 # are met:
11 # 1. Redistributions of source code must retain the above copyright
12 #    notice, this list of conditions and the following disclaimer.
13 # 2. Redistributions in binary form must reproduce the above copyright
14 #    notice, this list of conditions and the following disclaimer in the
15 #    documentation and/or other materials provided with the distribution.
16 # 3. Neither the name of the author nor the names of other contributors
17 #    may be used to endorse or promote products derived from this software
18 #    without specific prior written permission.
19 #
20 # THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21 # ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 # ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24 # FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 # DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 # OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 # HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 # LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 # SUCH DAMAGE.
31
32 TPUT="${TPUT:-"/usr/bin/tput"}"
33
34 have_tput() {
35     [ -x "$TPUT" ] && "$TPUT" hpa 60 >/dev/null 2>&1 \
36         && return 0 \
37         || return 1
38 }
39
40 log_success_msg () {
41     printf " * $@\n"
42 }
43
44 log_failure_msg () {
45     if have_tput ; then
46         RED="$("$TPUT" setaf 1)"
47         #NORMAL="$("$TPUT" op)"
48         printf " ${RED}*${NORMAL} $@\n"
49     else
50         printf " * $@\n"
51     fi
52 }
53
54 log_warning_msg () {
55     if have_tput ; then
56         YELLOW="$("$TPUT" setaf 3)"
57         #NORMAL="$("$TPUT" op")"
58         # printf " *${NORMAL} $@\n"
59         printf " ${BLUE}*${NORMAL} $@\n"
60     else
61         printf " * $@\n"
62     fi
63 }
64
65 log_warning_msg_nn () {
66     if have_tput ; then
67         YELLOW="$("$TPUT" setaf 3)"
68         printf " ${BLUE}*${NORMAL} $@"
69     else
70         printf " * $@"
71     fi
72 }
73
74 # int log_begin_message (char *message)
75 log_begin_msg () {
76         if [ "$#" -eq 0 ]; then
77                 return 1
78         fi
79         printf " ${GREEN}*${NORMAL} $@\n"
80 }
81
82 log_begin_msg_nn () {
83         if [ "$#" -eq 0 ]; then
84                 return 1
85         fi
86         printf " ${GREEN}*${NORMAL} $@"
87 }
88
89
90 SUBMSG="   ${GREEN}-${NORMAL} "
91
92 # int log_end_message (int exitstatus)
93 log_end_msg () {
94
95     # If no arguments were passed, return
96     [ "$#" -eq 0 ] && return 1
97
98     # Only do the fancy stuff if we have an appropriate terminal
99     # and if /usr is already mounted
100     if have_tput ; then
101         COLS="$("$TPUT" cols)"
102         if [ -n "$COLS" ]; then
103             COL=$(( "$COLS" - 7 ))
104         else
105             COL=73
106         fi
107         UP="$("$TPUT" cuu1)"
108         END="$("$TPUT" hpa $COL)"
109         START="$("$TPUT" hpa 0)"
110         #RED="$("$TPUT" setaf 1)"
111         #NORMAL="$("$TPUT" op)"
112         if [ "$1" -eq 0 ]; then
113             printf "${UP}${END}${BLUE}[ ${GREEN}ok ${BLUE}]${NORMAL}\n"
114         else
115             printf "${UP}${START} ${RED}*${NORMAL}${END}[${RED}fail${NORMAL}]\n"
116         fi
117     else
118         if [ "$1" -eq 0 ]; then
119             printf "   ...done.\n"
120         else
121             printf "   ...fail!\n"
122         fi
123     fi
124     return "$1"
125 }
126
127 # Copyright 1999-2005 Gentoo Foundation
128 # Distributed under the terms of the GNU General Public License v2
129 # $Header: /var/cvsroot/gentoo-src/rc-scripts/sbin/functions.sh,v 1.81.2.6 2005/05/15 20:00:31 vapier Exp $
130
131 RC_GOT_FUNCTIONS="yes"
132
133 # Different types of dependencies
134 deptypes="need use"
135 # Different types of order deps
136 ordtypes="before after"
137
138 #
139 # Internal variables
140 #
141
142 # Dont output to stdout?
143 RC_QUIET_STDOUT="no"
144 RC_VERBOSE="${RC_VERBOSE:-no}"
145
146 # Should we use color?
147 if [ -r /proc/cmdline ] ; then
148     grep -q ' nocolor' /proc/cmdline && RC_NOCOLOR='yes'
149 fi
150 RC_NOCOLOR="${RC_NOCOLOR:-no}"
151 # Can the terminal handle endcols?
152 RC_ENDCOL="yes"
153
154 #
155 # Default values for rc system
156 #
157 RC_TTY_NUMBER=11
158 RC_NET_STRICT_CHECKING="no"
159 RC_PARALLEL_STARTUP="no"
160 RC_USE_CONFIG_PROFILE="yes"
161
162 #
163 # Default values for e-message indentation and dots
164 #
165 RC_INDENTATION=''
166 RC_DEFAULT_INDENT=2
167 #RC_DOT_PATTERN=' .'
168 RC_DOT_PATTERN=''
169
170 # void splash(...)
171 #
172 #  Notify bootsplash/splashutils/gensplash/whatever about
173 #  important events.
174 #
175 splash() {
176     return 0
177 }
178
179 # void profiling(...)
180 #
181 #  Notify bootsplash/whatever about important events.
182 #
183 profiling() {
184     return 0
185 }
186
187 # void get_bootconfig()
188 #
189 #    Get the BOOTLEVEL and SOFTLEVEL by setting
190 #    'bootlevel' and 'softlevel' via kernel
191 #    parameters.
192 #
193 get_bootconfig() {
194     local copt
195     local newbootlevel
196     local newsoftlevel
197
198     for copt in $(</proc/cmdline) ; do
199         case "${copt%=*}" in
200             "bootlevel")
201                 newbootlevel="${copt##*=}"
202                 ;;
203             "softlevel")
204                 newsoftlevel="${copt##*=}"
205                 ;;
206         esac
207     done
208
209     if [ -n "${newbootlevel}" ] ; then
210         export BOOTLEVEL="${newbootlevel}"
211     else
212         export BOOTLEVEL="boot"
213     fi
214
215     if [ -n "${newsoftlevel}" ] ; then
216         export DEFAULTLEVEL="${newsoftlevel}"
217     else
218         export DEFAULTLEVEL="default"
219     fi
220
221     return 0
222 }
223
224 # void get_libdir(void)
225 #
226 #    prints the current libdir {lib,lib32,lib64}
227 #
228 get_libdir() {
229     if [ -n "${CONF_LIBDIR_OVERRIDE}" ] ; then
230         CONF_LIBDIR="${CONF_LIBDIR_OVERRIDE}"
231     elif [ -x "/usr/bin/portageq" ] ; then
232         CONF_LIBDIR="$(/usr/bin/portageq envvar CONF_LIBDIR)"
233     fi
234     printf '%s\n' ${CONF_LIBDIR:=lib}
235 }
236
237 # void esyslog(char* priority, char* tag, char* message)
238 #
239 #    use the system logger to log a message
240 #
241 esyslog() {
242     local pri
243     local tag
244
245     if [ -x /usr/bin/logger ]
246     then
247         pri="$1"
248         tag="$2"
249
250         shift 2
251         [ -z "$*" ] && return 0
252
253         /usr/bin/logger -p "${pri}" -t "${tag}" -- "$*"
254     fi
255
256     return 0
257 }
258
259 # void eindent(int num)
260 #
261 #    increase the indent used for e-commands.
262 #
263 eindent() {
264     local i=$1
265     (( i > 0 )) || (( i = RC_DEFAULT_INDENT ))
266     esetdent $(( ${#RC_INDENTATION} + i ))
267 }
268
269 # void eoutdent(int num)
270 #
271 #    decrease the indent used for e-commands.
272 #
273 eoutdent() {
274     local i=$1
275     (( i > 0 )) || (( i = RC_DEFAULT_INDENT ))
276     esetdent $(( ${#RC_INDENTATION} - i ))
277 }
278
279 # void esetdent(int num)
280 #
281 #    hard set the indent used for e-commands.
282 #    num defaults to 0
283 #
284 esetdent() {
285     local i=$1
286     (( i < 0 )) && (( i = 0 ))
287     RC_INDENTATION=$(printf "%${i}s" '')
288 }
289
290 # void einfo(char* message)
291 #
292 #    show an informative message (with a newline)
293 #
294 einfo() {
295     einfon "$*\n"
296     LAST_E_CMD=einfo
297     return 0
298 }
299
300 # void einfon(char* message)
301 #
302 #    show an informative message (without a newline)
303 #
304 einfon() {
305     [ "${RC_QUIET_STDOUT}" = "yes" ] && return 0
306     [ "${RC_ENDCOL}" != "yes" ] && [ "${LAST_E_CMD}" = "ebegin" ] && echo
307     printf " ${GOOD}*${NORMAL} ${RC_INDENTATION}$*"
308     LAST_E_CMD=einfon
309     return 0
310 }
311
312 # void ewarn(char* message)
313 #
314 #    show a warning message + log it
315 #
316 ewarn() {
317     if [ "${RC_QUIET_STDOUT}" = "yes" ]; then
318         printf " $*\n"
319     else
320         [ "${RC_ENDCOL}" != "yes" ] && [ "${LAST_E_CMD}" = "ebegin" ] && echo
321         printf " ${WARN}*${NORMAL} ${RC_INDENTATION}$*\n"
322     fi
323
324     # Log warnings to system log
325     esyslog "daemon.warning" "rc-scripts" "$*"
326
327     LAST_E_CMD=ewarn
328     return 0
329 }
330
331 # void eerror(char* message)
332 #
333 #    show an error message + log it
334 #
335 eerror() {
336     if [ "${RC_QUIET_STDOUT}" = "yes" ]; then
337         printf " $*\n" >/dev/stderr
338     else
339         [ "${RC_ENDCOL}" != "yes" ] && [ "${LAST_E_CMD}" = "ebegin" ] && echo
340         printf " ${BAD}*${NORMAL} ${RC_INDENTATION}$*\n"
341     fi
342
343     # Log errors to system log
344     esyslog "daemon.err" "rc-scripts" "$*"
345
346     LAST_E_CMD=eerror
347     return 0
348 }
349
350 # void ebegin(char* message)
351 #
352 #    show a message indicating the start of a process
353 #
354 ebegin() {
355     local msg="$*" dots spaces
356     spaces="$(printf '%'"${#RC_DOT_PATTERN}"'s' '')"
357     [ "${RC_QUIET_STDOUT}" = "yes" ] && return 0
358
359     if [ -n "${RC_DOT_PATTERN}" ]; then
360         dots=$(printf "%$(( COLS - 3 - ${#RC_INDENTATION} - ${#msg} - 7 ))s" '')
361         while [ "${dots#${spaces}}" != "${dots}" ] ; do
362             dots="${dots#${spaces}}${RC_DOT_PATTERN}"
363         done
364         msg="${msg}${dots}"
365     else
366         msg="${msg} ..."
367     fi
368     einfon "${msg}"
369     [ "${RC_ENDCOL}" = "yes" ] && echo
370
371     LAST_E_LEN=$(( 3 + ${#RC_INDENTATION} + ${#msg} ))
372     LAST_E_CMD=ebegin
373     return 0
374 }
375
376 # void _eend(int error, char *efunc, char* errstr)
377 #
378 #    indicate the completion of process, called from eend/ewend
379 #    if error, show errstr via efunc
380 #
381 #    This function is private to functions.sh.  Do not call it from a
382 #    script.
383 #
384 _eend() {
385     local retval=${1:-0} efunc=${2:-eerror} msg
386     shift 2
387
388     if [ "${retval}" -eq 0 ]; then
389         [ "${RC_QUIET_STDOUT}" = "yes" ] && return 0
390         msg="${BRACKET}[ ${GOOD}ok${BRACKET} ]${NORMAL}"
391     else
392         if [ -n "$*" ]; then
393             "${efunc}" "$*"
394         fi
395         msg="${BRACKET}[ ${BAD}!!${BRACKET} ]${NORMAL}"
396     fi
397
398     if [ "${RC_ENDCOL}" = "yes" ]; then
399         printf "${ENDCOL}  ${msg}\n"
400     else
401         [ "${LAST_E_CMD}" = "ebegin" ] || LAST_E_LEN=0
402         printf "%$(( "${COLS}" - "${LAST_E_LEN}" - 6 ))s%b\n" '' "${msg}"
403     fi
404
405     return ${retval}
406 }
407
408 # void eend(int error, char* errstr)
409 #
410 #    indicate the completion of process
411 #    if error, show errstr via eerror
412 #
413 eend() {
414     local retval=${1:-0}
415     shift
416
417     _eend ${retval} eerror "$*"
418
419     LAST_E_CMD=eend
420     return $retval
421 }
422
423 # void ewend(int error, char* errstr)
424 #
425 #    indicate the completion of process
426 #    if error, show errstr via ewarn
427 #
428 ewend() {
429     local retval=${1:-0}
430     shift
431
432     _eend ${retval} ewarn "$*"
433
434     LAST_E_CMD=ewend
435     return $retval
436 }
437
438 # v-e-commands honor RC_VERBOSE which defaults to no.
439 # The condition is negated so the return value will be zero.
440 veinfo()  { [ "${RC_VERBOSE}" != "yes" ] || einfo  "$@"; }
441 veinfon() { [ "${RC_VERBOSE}" != "yes" ] || einfon "$@"; }
442 vewarn()  { [ "${RC_VERBOSE}" != "yes" ] || ewarn  "$@"; }
443 veerror() { [ "${RC_VERBOSE}" != "yes" ] || eerror "$@"; }
444 vebegin() { [ "${RC_VERBOSE}" != "yes" ] || ebegin "$@"; }
445 veend() {
446     [ "${RC_VERBOSE}" = "yes" ] && { eend "$@"; return $?; }
447     return ${1:-0}
448 }
449 veend() {
450     [ "${RC_VERBOSE}" = "yes" ] && { ewend "$@"; return $?; }
451     return ${1:-0}
452 }
453
454 # int KV_to_int(string)
455 #
456 #    Convert a string type kernel version (2.4.0) to an int (132096)
457 #    for easy compairing or versions ...
458 #
459 KV_to_int() {
460     [ -z "$1" ] && return 1
461
462     local KV_MAJOR="$(KV_major "$1")"
463     local KV_MINOR="$(KV_minor "$1")"
464     local KV_MICRO="$(KV_micro "$1")"
465     local KV_int=$(( KV_MAJOR * 65536 + KV_MINOR * 256 + KV_MICRO ))
466
467     # We make version 2.2.0 the minimum version we will handle as
468     # a sanity check ... if its less, we fail ...
469     if [ "${KV_int}" -ge 131584 ] ; then
470         printf "${KV_int}\n"
471         return 0
472     fi
473
474     return 1
475 }
476
477 # int get_KV()
478 #
479 #    Return the kernel version (major, minor and micro concated) as an integer.
480 #    Assumes X and Y of X.Y.Z are numbers.  Also assumes that some leading
481 #    portion of Z is a number.
482 #    e.g. 2.4.25, 2.6.10, 2.6.4-rc3, 2.2.40-poop, 2.0.15+foo
483 #
484 get_KV() {
485     local KV="$(uname -r)"
486
487     printf "$(KV_to_int "${KV}")\n"
488
489     return $?
490 }
491
492 # bool get_bootparam(param)
493 #
494 #   return 0 if gentoo=param was passed to the kernel
495 #
496 #   EXAMPLE:  if get_bootparam "nodevfs" ; then ....
497 #
498 get_bootparam() {
499     local x copt params retval=1
500
501     [ ! -r "/proc/cmdline" ] && return 1
502
503     for copt in $(< /proc/cmdline)
504     do
505         if [ "${copt%=*}" = "gentoo" ]
506         then
507             params="$(gawk -v PARAMS="${copt##*=}" '
508                 BEGIN {
509                     split(PARAMS, nodes, ",")
510                     for (x in nodes)
511                         print nodes[x]
512                 }')"
513
514             # Parse gentoo option
515             for x in ${params}
516             do
517                 if [ "${x}" = "$1" ]
518                 then
519 #                    printf "YES\n"
520                     retval=0
521                 fi
522             done
523         fi
524     done
525
526     return ${retval}
527 }
528
529 # Safer way to list the contents of a directory,
530 # as it do not have the "empty dir bug".
531 #
532 # char *dolisting(param)
533 #
534 #    print a list of the directory contents
535 #
536 #    NOTE: quote the params if they contain globs.
537 #          also, error checking is not that extensive ...
538 #
539 dolisting() {
540     local x
541     local y
542     local tmpstr
543     local mylist
544     local mypath="$*"
545
546     if [ "${mypath%/\*}" != "${mypath}" ]
547     then
548         mypath="${mypath%/\*}"
549     fi
550
551     for x in ${mypath}
552     do
553         [ ! -e "${x}" ] && continue
554
555         if [ ! -d "${x}" ] && ( [ -L "${x}" ] || [ -f "${x}" ] )
556         then
557             mylist="${mylist} $(ls "${x}" 2> /dev/null)"
558         else
559             [ "${x%/}" != "${x}" ] && x="${x%/}"
560
561             cd "${x}"; tmpstr="$(ls)"
562
563             for y in ${tmpstr}
564             do
565                 mylist="${mylist} ${x}/${y}"
566             done
567         fi
568     done
569
570     printf "${mylist}\n"
571 }
572
573 # char *add_suffix(char * configfile)
574 #
575 #    Returns a config file name with the softlevel suffix
576 #    appended to it.  For use with multi-config services.
577 add_suffix() {
578     if [ "${RC_USE_CONFIG_PROFILE}" = "yes" -a -e "$1.${DEFAULTLEVEL}" ]
579     then
580         printf "$1.${DEFAULTLEVEL}\n"
581     else
582         printf "$1\n"
583     fi
584
585     return 0
586 }
587
588 # Network filesystems list for common use in rc-scripts.
589 # This variable is used in is_net_fs and other places such as
590 # localmount.
591 NET_FS_LIST="afs cifs coda gfs ncpfs nfs nfs4 shfs smbfs"
592
593 # bool is_net_fs(path)
594 #
595 #   return 0 if path is the mountpoint of a networked filesystem
596 #
597 #   EXAMPLE:  if is_net_fs / ; then ...
598 #
599 is_net_fs() {
600     local fstype
601     # /proc/mounts is always accurate but may not always be available
602     if [ -e /proc/mounts ]; then
603         fstype="$( sed -n -e '/^rootfs/!s:.* '"$1"' \([^ ]*\).*:\1:p' /proc/mounts )"
604     else
605         fstype="$( mount | sed -n -e 's:.* on '"$1"' type \([^ ]*\).*:\1:p' )"
606     fi
607     case " ${NET_FS_LIST} " in
608         *" ${fstype} "*)
609             return 0
610             ;;
611         *)
612             return 1
613             ;;
614     esac
615 }
616
617 # bool is_uml_sys()
618 #
619 #   return 0 if the currently running system is User Mode Linux
620 #
621 #   EXAMPLE:  if is_uml_sys ; then ...
622 #
623 is_uml_sys() {
624     grep -qs 'UML' /proc/cpuinfo
625     return $?
626 }
627
628 # bool is_vserver_sys()
629 #
630 #   return 0 if the currently running system is a Linux VServer
631 #
632 #   EXAMPLE:  if is_vserver_sys ; then ...
633 #
634 is_vserver_sys() {
635     grep -qs '^s_context:[[:space:]]*[1-9]' /proc/self/status
636     return $?
637 }
638
639 # bool get_mount_fstab(path)
640 #
641 #   return the parameters to pass to the mount command generated from fstab
642 #
643 #   EXAMPLE: cmd=$( get_mount_fstab /proc )
644 #            cmd=${cmd:--t proc none /proc}
645 #            mount -n ${cmd}
646 #
647 get_mount_fstab() {
648     awk '$1 ~ "^#" { next }
649          $2 == "'$*'" { if (found++ == 0) { print "-t "$3,"-o "$4,$1,$2 } }
650          END { if (found > 1) { print "More than one entry for '$*' found in /etc/fstab!" > "/dev/stderr" } }
651     ' /etc/fstab
652 }
653
654 # char *reverse_list(list)
655 #
656 #   Returns the reversed order of list
657 #
658 reverse_list() {
659     local ret
660     ret=''
661     while [ "$#" -gt 0 ] ; do
662         if [ -z "${ret}" ] ; then
663             ret="$1"
664         else
665             ret="$1 ${ret}"
666         fi
667         shift
668     done
669     printf '%s' "${ret}"
670 }
671
672
673 # bool is_older_than(reference, files/dirs to check)
674 #
675 #   return 0 if any of the files/dirs are newer than
676 #   the reference file
677 #
678 #   EXAMPLE: if is_older_than a.out *.o ; then ...
679 is_older_than() {
680     local x
681     local ref="$1"
682     shift
683
684     for x in "$@" ; do
685         [ "${x}" -nt "${ref}" ] && return 0
686
687         if [ -d "${x}" ] ; then
688             is_older_than "${ref}" "${x}"/* && return 0
689         fi
690     done
691
692     return 1
693 }
694
695 # Setup a basic $PATH.  Just add system default to existing.
696 # This should solve both /sbin and /usr/sbin not present when
697 # doing 'su -c foo', or for something like:  PATH= rcscript start
698 PATH="/bin:/sbin:/usr/bin:/usr/sbin:/usr/local/sbin:${PATH}"
699
700 if [ "$(/sbin/consoletype 2> /dev/null)" = "serial" ] ; then
701     # We do not want colors/endcols on serial terminals
702     RC_NOCOLOR="yes"
703     RC_ENDCOL="no"
704 fi
705
706 for arg in "$@" ; do
707     case "${arg}" in
708         # Lastly check if the user disabled it with --nocolor argument
709         --nocolor|-nc)
710             RC_NOCOLOR="yes"
711             ;;
712     esac
713 done
714
715 # Setup COLS and ENDCOL so eend can line up the [ ok ]
716 # width of [ ok ] == 7
717 COLS="$(stty size 2>/dev/null | cut -d' ' -f2)"
718 if [ -z "${COLS}" ] || [ "${COLS}" -le 0 ] ; then
719     COLS=80
720 fi
721
722 if [ "${RC_ENDCOL}" = "yes" ]; then
723     ENDCOL="\e[A\e[$(( ${COLS} - 8 ))G"
724 else
725     ENDCOL=''
726 fi
727
728 # Setup the colors so our messages all look pretty
729 if [ "${RC_NOCOLOR}" = "yes" ]; then
730     unset GOOD WARN BAD NORMAL HILITE BRACKET
731 else
732     GOOD='\e[32;01m'
733     WARN='\e[33;01m'
734     BAD='\e[31;01m'
735     NORMAL='\e[0m'
736     HILITE='\e[36;01m'
737     BRACKET='\e[34;01m'
738 fi
739
740 # vim:ts=4