#!/bin/sh

##

##  GNU shtool -- The GNU Portable Shell Tool

##  Copyright (c) 1994-2008 Ralf S. Engelschall <rse@engelschall.com>

##

##  See http://www.gnu.org/software/shtool/ for more information.

##  See ftp://ftp.gnu.org/gnu/shtool/ for latest version.

##

##  Version:  2.0.8 (18-Jul-2008)

##  Contents: all available modules

##

##

##  This program is free software; you can redistribute it and/or modify

##  it under the terms of the GNU General Public License as published by

##  the Free Software Foundation; either version 2 of the License, or

##  (at your option) any later version.

##

##  This program is distributed in the hope that it will be useful,

##  but WITHOUT ANY WARRANTY; without even the implied warranty of

##  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU

##  General Public License for more details.

##

##  You should have received a copy of the GNU General Public License

##  along with this program; if not, write to the Free Software

##  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,

##  USA, or contact Ralf S. Engelschall <rse@engelschall.com>.

##

##  NOTICE: Given that you include this file verbatim into your own

##  source tree, you are justified in saying that it remains separate

##  from your package, and that this way you are simply just using GNU

##  shtool. So, in this situation, there is no requirement that your

##  package itself is licensed under the GNU General Public License in

##  order to take advantage of GNU shtool.

##

##

##  Usage: shtool [<options>] [<cmd-name> [<cmd-options>] [<cmd-args>]]

##

##  Available commands:

##    echo       Print string with optional construct expansion

##    mdate      Pretty-print modification time of a file or dir

##    table      Pretty-print a field-separated list as a table

##    prop       Display progress with a running propeller

##    move       Move files with simultaneous substitution

##    install    Install a program, script or datafile

##    mkdir      Make one or more directories

##    mkln       Make link with calculation of relative paths

##    mkshadow   Make a shadow tree through symbolic links

##    fixperm    Fix file permissions inside a source tree

##    rotate     Logfile rotation

##    tarball    Roll distribution tarballs

##    subst      Apply sed(1) substitution operations

##    platform   Platform Identification Utility

##    arx        Extended archive command

##    slo        Separate linker options by library class

##    scpp       Sharing C Pre-Processor

##    version    Maintain a version information file

##    path       Deal with program paths

##

#   maximum Bourne-Shell compatibility

if [ ".$ZSH_VERSION" != . ] && (emulate sh) >/dev/null 2>&1; then

    #   reconfigure zsh(1)

    emulate sh

    NULLCMD=:

    alias -g '${1+"$@"}'='"$@"'

elif [ ".$BASH_VERSION" != . ] && (set -o posix) >/dev/null 2>&1; then

    #   reconfigure bash(1)

    set -o posix

fi

#   maximum independence of NLS nuisances

for var in \

    LANG LANGUAGE LC_ADDRESS LC_ALL LC_COLLATE LC_CTYPE LC_IDENTIFICATION \

    LC_MEASUREMENT LC_MESSAGES LC_MONETARY LC_NAME LC_NUMERIC LC_PAPER \

    LC_TELEPHONE LC_TIME

do

    if (set +x; test -z "`(eval $var=C; export $var) 2>&1`"); then

        eval $var=C; export $var

    else

        unset $var

    fi

done

#   initial command line handling

if [ $# -eq 0 ]; then

    echo "$0:Error: invalid command line" 1>&2

    echo "$0:Hint:  run \`$0 -h' for usage" 1>&2

    exit 1

fi

if [ ".$1" = ".-h" ] || [ ".$1" = ".--help" ]; then

    echo "This is GNU shtool, version 2.0.8 (18-Jul-2008)"

    echo 'Copyright (c) 1994-2008 Ralf S. Engelschall <rse@engelschall.com>'

    echo 'Report bugs to <bug-shtool@gnu.org>'

    echo ''

    echo 'Usage: shtool [<options>] [<cmd-name> [<cmd-options>] [<cmd-args>]]'

    echo ''

    echo 'Available global <options>:'

    echo '  -v, --version   display shtool version information'

    echo '  -h, --help      display shtool usage help page (this one)'

    echo '  -d, --debug     display shell trace information'

    echo '  -r, --recreate  recreate this shtool script via shtoolize'

    echo ''

    echo 'Available <cmd-name> [<cmd-options>] [<cmd-args>]:'

    echo '  echo     [-n|--newline] [-e|--expand] [<string> ...]'

    echo '  mdate    [-n|--newline] [-z|--zero] [-s|--shorten] [-d|--digits]'

    echo '           [-f|--field-sep <str>] [-o|--order <spec>] <path>'

    echo '  table    [-F|--field-sep <sep>] [-w|--width <width>] [-c|--columns'

    echo '           <cols>] [-s|--strip <strip>] <str><sep><str>...'

    echo '  prop     [-p|--prefix <str>]'

    echo '  move     [-v|--verbose] [-t|--trace] [-e|--expand] [-p|--preserve]'

    echo '           <src-file> <dst-file>'

    echo '  install  [-v|--verbose] [-t|--trace] [-d|--mkdir] [-c|--copy]'

    echo '           [-C|--compare-copy] [-s|--strip] [-m|--mode <mode>]'

    echo '           [-o|--owner <owner>] [-g|--group <group>] [-e|--exec'

    echo '           <sed-cmd>] <file> [<file> ...] <path>'

    echo '  mkdir    [-t|--trace] [-f|--force] [-p|--parents] [-m|--mode'

    echo '           <mode>] [-o|--owner <owner>] [-g|--group <group>] <dir>'

    echo '           [<dir> ...]'

    echo '  mkln     [-t|--trace] [-f|--force] [-s|--symbolic] <src-path>'

    echo '           [<src-path> ...] <dst-path>'

    echo '  mkshadow [-v|--verbose] [-t|--trace] [-a|--all] <src-dir> <dst-dir>'

    echo '  fixperm  [-v|--verbose] [-t|--trace] <path> [<path> ...]'

    echo '  rotate   [-v|--verbose] [-t|--trace] [-f|--force] [-n|--num-files'

    echo '           <count>] [-s|--size <size>] [-c|--copy] [-r|--remove]'

    echo '           [-a|--archive-dir <dir>] [-z|--compress [<tool>:]<level>]'

    echo '           [-b|--background] [-d|--delay] [-p|--pad <len>] [-m|--mode'

    echo '           <mode>] [-o|--owner <owner>] [-g|--group <group>] [-M|--migrate'

    echo '           <cmd>] [-P|--prolog <cmd>] [-E|--epilog <cmd>] <file> [...]'

    echo '  tarball  [-t|--trace] [-v|--verbose] [-o|--output <tarball>]'

    echo '           [-c|--compress <prog>] [-d|--directory <dir>] [-u|--user'

    echo '           <user>] [-g|--group <group>] [-e|--exclude <pattern>]'

    echo '           <path> [<path> ...]'

    echo '  subst    [-v|--verbose] [-t|--trace] [-n|--nop] [-w|--warning]'

    echo '           [-q|--quiet] [-s|--stealth] [-i|--interactive] [-b|--backup'

    echo '           <ext>] [-e|--exec <cmd>] [-f|--file <cmd-file>] [<file>]'

    echo '           [...]'

    echo '  platform [-F|--format <format>] [-S|--sep <string>] [-C|--conc'

    echo '           <string>] [-L|--lower] [-U|--upper] [-v|--verbose]'

    echo '           [-c|--concise] [-n|--no-newline] [-t|--type <type>]'

    echo '           [-V|--version] [-h|--help]'

    echo '  arx      [-t|--trace] [-C|--command <cmd>] <op> <archive> [<file>'

    echo '           ...]'

    echo '  slo      [-p|--prefix <str>] -- -L<dir> -l<lib> [-L<dir> -l<lib>'

    echo '           ...]'

    echo '  scpp     [-v|--verbose] [-p|--preserve] [-f|--filter <filter>]'

    echo '           [-o|--output <ofile>] [-t|--template <tfile>] [-M|--mark'

    echo '           <mark>] [-D|--define <dname>] [-C|--class <cname>]'

    echo '           <file> [<file> ...]'

    echo '  version  [-l|--language <lang>] [-n|--name <name>] [-p|--prefix'

    echo '           <prefix>] [-s|--set <version>] [-e|--edit] [-i|--increase'

    echo '           <knob>] [-d|--display <type>] <file>'

    echo '  path     [-s|--suppress] [-r|--reverse] [-d|--dirname] [-b|--basename]'

    echo '           [-m|--magic] [-p|--path <path>] <str> [<str> ...]'

    echo ''

    exit 0

fi

if [ ".$1" = ".-v" ] || [ ".$1" = ".--version" ]; then

    echo "GNU shtool 2.0.8 (18-Jul-2008)"

    exit 0

fi

if [ ".$1" = ".-r" ] || [ ".$1" = ".--recreate" ]; then

    shtoolize -oshtool all

    exit 0

fi

if [ ".$1" = ".-d" ] || [ ".$1" = ".--debug" ]; then

    shift

    set -x

fi

name=`echo "$0" | sed -e 's;.*/\([^/]*\)$;\1;' -e 's;-sh$;;' -e 's;\.sh$;;'`

case "$name" in

    echo|mdate|table|prop|move|install|mkdir|mkln|mkshadow|fixperm|rotate|tarball|subst|platform|arx|slo|scpp|version|path )

        #   implicit tool command selection

        tool="$name"

        ;;

    * )

        #   explicit tool command selection

        tool="$1"

        shift

        ;;

esac

arg_spec=""

opt_spec=""

gen_tmpfile=no

##

##  DISPATCH INTO SCRIPT PROLOG

##

case $tool in

    echo )

        str_tool="echo"

        str_usage="[-n|--newline] [-e|--expand] [<string> ...]"

        arg_spec="0+"

        opt_spec="n.e."

        opt_alias="n:newline,e:expand"

        opt_n=no

        opt_e=no

        ;;

    mdate )

        str_tool="mdate"

        str_usage="[-n|--newline] [-z|--zero] [-s|--shorten] [-d|--digits] [-f|--field-sep <str>] [-o|--order <spec>] <path>"

        arg_spec="1="

        opt_spec="n.z.s.d.f:o:"

        opt_alias="n:newline,z:zero,s:shorten,d:digits,f:field-sep,o:order"

        opt_n=no

        opt_z=no

        opt_s=no

        opt_d=no

        opt_f=" "

        opt_o="dmy"

        ;;

    table )

        str_tool="table"

        str_usage="[-F|--field-sep <sep>] [-w|--width <width>] [-c|--columns <cols>] [-s|--strip <strip>] <str><sep><str>..."

        arg_spec="1+"

        opt_spec="F:w:c:s:"

        opt_alias="F:field-sep,w:width,c:columns,s:strip"

        opt_F=":"

        opt_w=15

        opt_c=3

        opt_s=79

        ;;

    prop )

        str_tool="prop"

        str_usage="[-p|--prefix <str>]"

        arg_spec="0="

        opt_spec="p:"

        opt_alias="p:prefix"

        opt_p=""

        ;;

    move )

        str_tool="move"

        str_usage="[-v|--verbose] [-t|--trace] [-e|--expand] [-p|--preserve] <src-file> <dst-file>"

        arg_spec="2="

        opt_spec="v.t.e.p."

        opt_alias="v:verbose,t:trace,e:expand,p:preserve"

        opt_v=no

        opt_t=no

        opt_e=no

        opt_p=no

        ;;

    install )

        str_tool="install"

        str_usage="[-v|--verbose] [-t|--trace] [-d|--mkdir] [-c|--copy] [-C|--compare-copy] [-s|--strip] [-m|--mode <mode>] [-o|--owner <owner>] [-g|--group <group>] [-e|--exec <sed-cmd>] <file> [<file> ...] <path>"

        arg_spec="1+"

        opt_spec="v.t.d.c.C.s.m:o:g:e+"

        opt_alias="v:verbose,t:trace,d:mkdir,c:copy,C:compare-copy,s:strip,m:mode,o:owner,g:group,e:exec"

        opt_v=no

        opt_t=no

        opt_d=no

        opt_c=no

        opt_C=no

        opt_s=no

        opt_m="0755"

        opt_o=""

        opt_g=""

        opt_e=""

        ;;

    mkdir )

        str_tool="mkdir"

        str_usage="[-t|--trace] [-f|--force] [-p|--parents] [-m|--mode <mode>] [-o|--owner <owner>] [-g|--group <group>] <dir> [<dir> ...]"

        arg_spec="1+"

        opt_spec="t.f.p.m:o:g:"

        opt_alias="t:trace,f:force,p:parents,m:mode,o:owner,g:group"

        opt_t=no

        opt_f=no

        opt_p=no

        opt_m=""

        opt_o=""

        opt_g=""

        ;;

    mkln )

        str_tool="mkln"

        str_usage="[-t|--trace] [-f|--force] [-s|--symbolic] <src-path> [<src-path> ...] <dst-path>"

        arg_spec="2+"

        opt_spec="t.f.s."

        opt_alias="t:trace,f:force,s:symbolic"

        opt_t=no

        opt_f=no

        opt_s=no

        ;;

    mkshadow )

        str_tool="mkshadow"

        str_usage="[-v|--verbose] [-t|--trace] [-a|--all] <src-dir> <dst-dir>"

        arg_spec="2="

        opt_spec="v.t.a."

        opt_alias="v:verbose,t:trace,a:all"

        opt_v=no

        opt_t=no

        opt_a=no

        ;;

    fixperm )

        str_tool="fixperm"

        str_usage="[-v|--verbose] [-t|--trace] <path> [<path> ...]"

        arg_spec="1+"

        opt_spec="v.t."

        opt_alias="v:verbose,t:trace"

        opt_v=no

        opt_t=no

        ;;

    rotate )

        str_tool="rotate"

        str_usage="[-v|--verbose] [-t|--trace] [-f|--force] [-n|--num-files <count>] [-s|--size <size>] [-c|--copy] [-r|--remove] [-a|--archive-dir <dir>] [-z|--compress [<tool>:]<level>] [-b|--background] [-d|--delay] [-p|--pad <len>] [-m|--mode <mode>] [-o|--owner <owner>] [-g|--group <group>] [-M|--migrate <cmd>] [-P|--prolog <cmd>] [-E|--epilog <cmd>] <file> [...]"

        arg_spec="1+"

        opt_spec="v.t.f.n:s:c.r.a:z:b.d.p:o:g:m:M:P:E:"

        opt_alias="v:verbose,t:trace,f:force,n:num-files,s:size,c:copy,r:remove,a:archive-dir,z:compress,b:background,d:delay,p:pad,o:owner,g:group,m:mode,M:migrate,P:prolog,E:epilog"

        opt_v=no

        opt_t=no

        opt_f=no

        opt_n=10

        opt_s=""

        opt_c=no

        opt_r=no

        opt_a=""

        opt_z=""

        opt_b=no

        opt_d=no

        opt_p=1

        opt_o=""

        opt_g=""

        opt_m=""

        opt_M=""

        opt_P=""

        opt_E=""

        ;;

    tarball )

        str_tool="tarball"

        str_usage="[-t|--trace] [-v|--verbose] [-o|--output <tarball>] [-c|--compress <prog>] [-d|--directory <dir>] [-u|--user <user>] [-g|--group <group>] [-e|--exclude <pattern>] <path> [<path> ...]"

        gen_tmpfile=yes

        arg_spec="1+"

        opt_spec="t.v.o:c:d:u:g:e:"

        opt_alias="t:trace,v:verbose,o:output,c:compress,d:directory,u:user,g:group,e:exclude"

        opt_t=no

        opt_v=no

        opt_o=""

        opt_c=""

        opt_d=""

        opt_u=""

        opt_g=""

        opt_e="CVS,\\.cvsignore,\\.svn,\\.[oa]\$"

        ;;

    subst )

        str_tool="subst"

        str_usage="[-v|--verbose] [-t|--trace] [-n|--nop] [-w|--warning] [-q|--quiet] [-s|--stealth] [-i|--interactive] [-b|--backup <ext>] [-e|--exec <cmd>] [-f|--file <cmd-file>] [<file>] [...]"

        gen_tmpfile=yes

        arg_spec="0+"

        opt_spec="v.t.n.w.q.s.i.b:e+f:"

        opt_alias="v:verbose,t:trace,n:nop,w:warning,q:quiet,s:stealth,i:interactive,b:backup,e:exec,f:file"

        opt_v=no

        opt_t=no

        opt_n=no

        opt_w=no

        opt_q=no

        opt_s=no

        opt_i=no

        opt_b=""

        opt_e=""

        opt_f=""

        ;;

    platform )

        str_tool="platform"

        str_usage="[-F|--format <format>] [-S|--sep <string>] [-C|--conc <string>] [-L|--lower] [-U|--upper] [-v|--verbose] [-c|--concise] [-n|--no-newline] [-t|--type <type>] [-V|--version] [-h|--help]"

        arg_spec="0="

        opt_spec="F:S:C:L.U.v.c.n.t:d.V.h."

        opt_alias="F:format,S:sep,C:conc,L:lower,U:upper,v:verbose,c:consise,t:type,n:no-newline,V:version,h:help"

        opt_F="%{sp} (%{ap})"

        opt_S=" "

        opt_C="/"

        opt_L=no

        opt_U=no

        opt_t=""

        opt_v=no

        opt_c=no

        opt_n=no

        opt_V=no

        opt_h=no

        ;;

    arx )

        str_tool="arx"

        str_usage="[-t|--trace] [-C|--command <cmd>] <op> <archive> [<file> ...]"

        arg_spec="2+"

        opt_spec="t.C:"

        opt_alias="t:trace,C:command"

        opt_t=no

        opt_C="ar"

        ;;

    slo )

        str_tool="slo"

        str_usage="[-p|--prefix <str>] -- -L<dir> -l<lib> [-L<dir> -l<lib> ...]"

        arg_spec="1+"

        opt_spec="p:"

        opt_alias="p:prefix"

        opt_p="SLO_"

        ;;

    scpp )

        str_tool="scpp"

        str_usage="[-v|--verbose] [-p|--preserve] [-f|--filter <filter>] [-o|--output <ofile>] [-t|--template <tfile>] [-M|--mark <mark>] [-D|--define <dname>] [-C|--class <cname>] <file> [<file> ...]"

        gen_tmpfile=yes

        arg_spec="1+"

        opt_spec="v.p.f+o:t:M:D:C:"

        opt_alias="v:verbose,p:preserve,f:filter,o:output,t:template,M:mark,D:define,C:class"

        opt_v=no

        opt_p=no

        opt_f=""

        opt_o="lib.h"

        opt_t="lib.h.in"

        opt_M="%%MARK%%"

        opt_D="cpp"

        opt_C="intern"

        ;;

    version )

        str_tool="version"

        str_usage="[-l|--language <lang>] [-n|--name <name>] [-p|--prefix <prefix>] [-s|--set <version>] [-e|--edit] [-i|--increase <knob>] [-d|--display <type>] <file>"

        arg_spec="1="

        opt_spec="l:n:p:s:i:e.d:"

        opt_alias="l:language,n:name,p:prefix,s:set,e:edit,i:increase,d:display"

        opt_l="txt"

        opt_n="unknown"

        opt_p=""

        opt_s=""

        opt_e="no"

        opt_i=""

        opt_d="short"

        ;;

    path )

        str_tool="path"

        str_usage="[-s|--suppress] [-r|--reverse] [-d|--dirname] [-b|--basename] [-m|--magic] [-p|--path <path>] <str> [<str> ...]"

        gen_tmpfile=yes

        arg_spec="1+"

        opt_spec="s.r.d.b.m.p:"

        opt_alias="s:suppress,r:reverse,d:dirname,b:basename,m:magic,p:path"

        opt_s=no

        opt_r=no

        opt_d=no

        opt_b=no

        opt_m=no

        opt_p="$PATH"

        ;;

    -* )

        echo "$0:Error: unknown option \`$tool'" 2>&1

        echo "$0:Hint:  run \`$0 -h' for usage" 2>&1

        exit 1

        ;;

    * )

        echo "$0:Error: unknown command \`$tool'" 2>&1

        echo "$0:Hint:  run \`$0 -h' for usage" 2>&1

        exit 1

        ;;

esac

##

##  COMMON UTILITY CODE

##

#   commonly used ASCII values

ASC_TAB="	"

ASC_NL="

"

#   determine name of tool

if [ ".$tool" != . ]; then

    #   used inside shtool script

    toolcmd="$0 $tool"

    toolcmdhelp="shtool $tool"

    msgprefix="shtool:$tool"

else

    #   used as standalone script

    toolcmd="$0"

    toolcmdhelp="sh $0"

    msgprefix="$str_tool"

fi

#   parse argument specification string

eval `echo $arg_spec |\

      sed -e 's/^\([0-9]*\)\([+=]\)/arg_NUMS=\1; arg_MODE=\2/'`

#   parse option specification string

eval `echo h.$opt_spec |\

      sed -e 's/\([a-zA-Z0-9]\)\([.:+]\)/opt_MODE_\1=\2;/g'`

#   parse option alias string

eval `echo h:help,$opt_alias |\

      sed -e 's/-/_/g' -e 's/\([a-zA-Z0-9]\):\([^,]*\),*/opt_ALIAS_\2=\1;/g'`

#   interate over argument line

opt_PREV=''

while [ $# -gt 0 ]; do

    #   special option stops processing

    if [ ".$1" = ".--" ]; then

        shift

        break

    fi

    #   determine option and argument

    opt_ARG_OK=no

    if [ ".$opt_PREV" != . ]; then

        #   merge previous seen option with argument

        opt_OPT="$opt_PREV"

        opt_ARG="$1"

        opt_ARG_OK=yes

        opt_PREV=''

    else

        #   split argument into option and argument

        case "$1" in

            --[a-zA-Z0-9]*=*)

                eval `echo "x$1" |\

                      sed -e 's/^x--\([a-zA-Z0-9-]*\)=\(.*\)$/opt_OPT="\1";opt_ARG="\2"/'`

                opt_STR=`echo $opt_OPT | sed -e 's/-/_/g'`

                eval "opt_OPT=\${opt_ALIAS_${opt_STR}-${opt_OPT}}"

                ;;

            --[a-zA-Z0-9]*)

                opt_OPT=`echo "x$1" | cut -c4-`

                opt_STR=`echo $opt_OPT | sed -e 's/-/_/g'`

                eval "opt_OPT=\${opt_ALIAS_${opt_STR}-${opt_OPT}}"

                opt_ARG=''

                ;;

            -[a-zA-Z0-9]*)

                eval `echo "x$1" |\

                      sed -e 's/^x-\([a-zA-Z0-9]\)/opt_OPT="\1";/' \

                          -e 's/";\(.*\)$/"; opt_ARG="\1"/'`

                ;;

            -[a-zA-Z0-9])

                opt_OPT=`echo "x$1" | cut -c3-`

                opt_ARG=''

                ;;

            *)

                break

                ;;

        esac

    fi

    #   eat up option

    shift

    #   determine whether option needs an argument

    eval "opt_MODE=\$opt_MODE_${opt_OPT}"

    if [ ".$opt_ARG" = . ] && [ ".$opt_ARG_OK" != .yes ]; then

        if [ ".$opt_MODE" = ".:" ] || [ ".$opt_MODE" = ".+" ]; then

            opt_PREV="$opt_OPT"

            continue

        fi

    fi

    #   process option

    case $opt_MODE in

        '.' )

            #   boolean option

            eval "opt_${opt_OPT}=yes"

            ;;

        ':' )

            #   option with argument (multiple occurances override)

            eval "opt_${opt_OPT}=\"\$opt_ARG\""

            ;;

        '+' )

            #   option with argument (multiple occurances append)

            eval "opt_${opt_OPT}=\"\$opt_${opt_OPT}\${ASC_NL}\$opt_ARG\""

            ;;

        * )

            echo "$msgprefix:Error: unknown option: \`$opt_OPT'" 1>&2

            echo "$msgprefix:Hint:  run \`$toolcmdhelp -h' or \`man shtool' for details" 1>&2

            exit 1

            ;;

    esac

done

if [ ".$opt_PREV" != . ]; then

    echo "$msgprefix:Error: missing argument to option \`$opt_PREV'" 1>&2

    echo "$msgprefix:Hint:  run \`$toolcmdhelp -h' or \`man shtool' for details" 1>&2

    exit 1

fi

#   process help option

if [ ".$opt_h" = .yes ]; then

    echo "Usage: $toolcmdhelp $str_usage"

    exit 0

fi

#   complain about incorrect number of arguments

case $arg_MODE in

    '=' )

        if [ $# -ne $arg_NUMS ]; then

            echo "$msgprefix:Error: invalid number of arguments (exactly $arg_NUMS expected)" 1>&2

            echo "$msgprefix:Hint:  run \`$toolcmd -h' or \`man shtool' for details" 1>&2

            exit 1

        fi

        ;;

    '+' )

        if [ $# -lt $arg_NUMS ]; then

            echo "$msgprefix:Error: invalid number of arguments (at least $arg_NUMS expected)" 1>&2

            echo "$msgprefix:Hint:  run \`$toolcmd -h' or \`man shtool' for details" 1>&2

            exit 1

        fi

        ;;

esac

#   establish a temporary file on request

if [ ".$gen_tmpfile" = .yes ]; then

    #   create (explicitly) secure temporary directory

    if [ ".$TMPDIR" != . ]; then

        tmpdir="$TMPDIR"

    elif [ ".$TEMPDIR" != . ]; then

        tmpdir="$TEMPDIR"

    else

        tmpdir="/tmp"

    fi

    tmpdir="$tmpdir/.shtool.$$"

    ( umask 077

      rm -rf "$tmpdir" >/dev/null 2>&1 || true

      mkdir  "$tmpdir" >/dev/null 2>&1

      if [ $? -ne 0 ]; then

          echo "$msgprefix:Error: failed to create temporary directory \`$tmpdir'" 1>&2

          exit 1

      fi

    )

    #   create (implicitly) secure temporary file

    tmpfile="$tmpdir/shtool.tmp"

    touch "$tmpfile"

fi

#   utility function: map string to lower case

util_lower () {

    echo "$1" | tr 'ABCDEFGHIJKLMNOPQRSTUVWXYZ' 'abcdefghijklmnopqrstuvwxyz'

}

#   utility function: map string to upper case

util_upper () {

    echo "$1" | tr 'abcdefghijklmnopqrstuvwxyz' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'

}

#   cleanup procedure

shtool_exit () {

    rc="$1"

    if [ ".$gen_tmpfile" = .yes ]; then

        rm -rf "$tmpdir" >/dev/null 2>&1 || true

    fi

    exit $rc

}

##

##  DISPATCH INTO SCRIPT BODY

##

case $tool in

echo )

    ##

    ##  echo -- Print string with optional construct expansion

    ##  Copyright (c) 1998-2008 Ralf S. Engelschall <rse@engelschall.com>

    ##

    text="$*"

    #   check for broken escape sequence expansion

    seo=''

    bytes=`echo '\1' | wc -c | awk '{ printf("%s", $1); }'`

    if [ ".$bytes" != .3 ]; then

        bytes=`echo -E '\1' | wc -c | awk '{ printf("%s", $1); }'`

        if [ ".$bytes" = .3 ]; then

            seo='-E'

        fi

    fi

    #   check for existing -n option (to suppress newline)

    minusn=''

    bytes=`echo -n 123 2>/dev/null | wc -c | awk '{ printf("%s", $1); }'`

    if [ ".$bytes" = .3 ]; then

        minusn='-n'

    fi

    #   determine terminal bold sequence

    term_bold=''

    term_norm=''

    if [ ".$opt_e" = .yes ] && [ ".`echo $text | grep '%[Bb]'`" != . ]; then

        case $TERM in

            #   for the most important terminal types we directly know the sequences

            xterm|xterm*|vt220|vt220*)

                term_bold=`awk 'BEGIN { printf("%c%c%c%c", 27, 91, 49, 109); }' </dev/null 2>/dev/null`

                term_norm=`awk 'BEGIN { printf("%c%c%c", 27, 91, 109); }' </dev/null 2>/dev/null`

                ;;

            vt100|vt100*|cygwin)

                term_bold=`awk 'BEGIN { printf("%c%c%c%c%c%c", 27, 91, 49, 109, 0, 0); }' </dev/null 2>/dev/null`

                term_norm=`awk 'BEGIN { printf("%c%c%c%c%c", 27, 91, 109, 0, 0); }' </dev/null 2>/dev/null`

                ;;

            #   for all others, we try to use a possibly existing `tput' or `tcout' utility

            * )

                paths=`echo $PATH | sed -e 's/:/ /g'`

                for tool in tput tcout; do

                    for dir in $paths; do

                        if [ -r "$dir/$tool" ]; then

                            for seq in bold md smso; do # 'smso' is last

                                bold="`$dir/$tool $seq 2>/dev/null`"

                                if [ ".$bold" != . ]; then

                                    term_bold="$bold"

                                    break

                                fi

                            done

                            if [ ".$term_bold" != . ]; then

                                for seq in sgr0 me rmso init reset; do # 'reset' is last

                                    norm="`$dir/$tool $seq 2>/dev/null`"

                                    if [ ".$norm" != . ]; then

                                        term_norm="$norm"

                                        break

                                    fi

                                done

                            fi

                            break

                        fi

                    done

                    if [ ".$term_bold" != . ] && [ ".$term_norm" != . ]; then

                        break;

                    fi

                done

                ;;

        esac

        if [ ".$term_bold" = . ] || [ ".$term_norm" = . ]; then

            echo "$msgprefix:Warning: unable to determine terminal sequence for bold mode" 1>&2

            term_bold=''

            term_norm=''

        fi

    fi

    #   determine user name

    username=''

    if [ ".$opt_e" = .yes ] && [ ".`echo $text | grep '%[uUgG]'`" != . ]; then

        username="`(id -un) 2>/dev/null`"

        if [ ".$username" = . ]; then

            str="`(id) 2>/dev/null`"

            if [ ".`echo $str | grep '^uid[ 	]*=[ 	]*[0-9]*('`" != . ]; then

                username=`echo $str | sed -e 's/^uid[ 	]*=[ 	]*[0-9]*(//' -e 's/).*$//'`

            fi

            if [ ".$username" = . ]; then

                username="$LOGNAME"

                if [ ".$username" = . ]; then

                    username="$USER"

                    if [ ".$username" = . ]; then

                        username="`(whoami) 2>/dev/null |\

                                   awk '{ printf("%s", $1); }'`"

                        if [ ".$username" = . ]; then

                            username="`(who am i) 2>/dev/null |\

                                       awk '{ printf("%s", $1); }'`"

                            if [ ".$username" = . ]; then

                                username='unknown'

                            fi

                        fi

                    fi

                fi

            fi

        fi

    fi

    #   determine user id

    userid=''

    if [ ".$opt_e" = .yes ] && [ ".`echo $text | grep '%U'`" != . ]; then

        userid="`(id -u) 2>/dev/null`"

        if [ ".$userid" = . ]; then

            userid="`(id -u ${username}) 2>/dev/null`"

            if [ ".$userid" = . ]; then

                str="`(id) 2>/dev/null`"

                if [ ".`echo $str | grep '^uid[ 	]*=[ 	]*[0-9]*('`" != . ]; then

                    userid=`echo $str | sed -e 's/^uid[ 	]*=[ 	]*//' -e 's/(.*$//'`

                fi

                if [ ".$userid" = . ]; then

                    userid=`(getent passwd ${username}) 2>/dev/null | \

                            sed -e 's/[^:]*:[^:]*://' -e 's/:.*$//'`

                    if [ ".$userid" = . ]; then

                        userid=`grep "^${username}:" /etc/passwd 2>/dev/null | \

                                sed -e 's/[^:]*:[^:]*://' -e 's/:.*$//'`

                        if [ ".$userid" = . ]; then

                            userid=`(ypmatch "${username}" passwd; nismatch "${username}" passwd) 2>/dev/null | \

                                    sed -e 'q' | sed -e 's/[^:]*:[^:]*://' -e 's/:.*$//'`

                            if [ ".$userid" = . ]; then

                                userid=`(nidump passwd . | grep "^${username}:") 2>/dev/null | \

                                        sed -e 's/[^:]*:[^:]*://' -e 's/:.*$//'`

                                if [ ".$userid" = . ]; then

                                    userid='?'

                                fi

                            fi

                        fi

                    fi

                fi

            fi

        fi

    fi

    #   determine (primary) group id

    groupid=''

    if [ ".$opt_e" = .yes ] && [ ".`echo $text | grep '%[gG]'`" != . ]; then

        groupid="`(id -g ${username}) 2>/dev/null`"

        if [ ".$groupid" = . ]; then

            str="`(id) 2>/dev/null`"

            if [ ".`echo $str | grep 'gid[ 	]*=[ 	]*[0-9]*('`" != . ]; then

                groupid=`echo $str | sed -e 's/^.*gid[ 	]*=[ 	]*//' -e 's/(.*$//'`

            fi

            if [ ".$groupid" = . ]; then

                groupid=`(getent passwd ${username}) 2>/dev/null | \

                         sed -e 's/[^:]*:[^:]*:[^:]*://' -e 's/:.*$//'`

                if [ ".$groupid" = . ]; then

                    groupid=`grep "^${username}:" /etc/passwd 2>/dev/null | \

                             sed -e 's/[^:]*:[^:]*:[^:]*://' -e 's/:.*$//'`

                    if [ ".$groupid" = . ]; then

                        groupid=`(ypmatch "${username}" passwd; nismatch "${username}" passwd) 2>/dev/null | \

                                 sed -e 'q' | sed -e 's/[^:]*:[^:]*:[^:]*://' -e 's/:.*$//'`

                        if [ ".$groupid" = . ]; then

                            groupid=`(nidump passwd . | grep "^${username}:") 2>/dev/null | \

                                     sed -e 's/[^:]*:[^:]*:[^:]*://' -e 's/:.*$//'`

                            if [ ".$groupid" = . ]; then

                                groupid='?'

                            fi

                        fi

                    fi

                fi

            fi

        fi

    fi

    #   determine (primary) group name

    groupname=''

    if [ ".$opt_e" = .yes ] && [ ".`echo $text | grep '%g'`" != . ]; then

        groupname="`(id -gn ${username}) 2>/dev/null`"

        if [ ".$groupname" = . ]; then

            str="`(id) 2>/dev/null`"

            if [ ".`echo $str | grep 'gid[ 	]*=[ 	]*[0-9]*('`" != . ]; then

                groupname=`echo $str | sed -e 's/^.*gid[ 	]*=[ 	]*[0-9]*(//' -e 's/).*$//'`

            fi

            if [ ".$groupname" = . ]; then

                groupname=`(getent group) 2>/dev/null | \

                           grep "^[^:]*:[^:]*:${groupid}:" | \

                           sed -e 's/:.*$//'`

                if [ ".$groupname" = . ]; then

                    groupname=`grep "^[^:]*:[^:]*:${groupid}:" /etc/group 2>/dev/null | \

                               sed -e 's/:.*$//'`

                    if [ ".$groupname" = . ]; then

                        groupname=`(ypcat group; niscat group) 2>/dev/null | \

                                   sed -e 'q' | grep "^[^:]*:[^:]*:${groupid}:" | \

                                   sed -e 's/:.*$//'`

                        if [ ".$groupname" = . ]; then

                            groupname=`(nidump group .) 2>/dev/null | \

                                       grep "^[^:]*:[^:]*:${groupid}:" | \

                                       sed -e 's/:.*$//'`

                            if [ ".$groupname" = . ]; then

                                groupname='?'

                            fi

                        fi

                    fi

                fi

            fi

        fi

    fi

    #   determine host and domain name

    hostname=''

    domainname=''

    if [ ".$opt_e" = .yes ] && [ ".`echo $text | grep '%h'`" != . ]; then

        hostname="`(uname -n) 2>/dev/null |\

                   awk '{ printf("%s", $1); }'`"

        if [ ".$hostname" = . ]; then

            hostname="`(hostname) 2>/dev/null |\

                       awk '{ printf("%s", $1); }'`"

            if [ ".$hostname" = . ]; then

                hostname='unknown'

            fi

        fi

        case $hostname in

            *.* )

                domainname=".`echo $hostname | cut -d. -f2-`"

                hostname="`echo $hostname | cut -d. -f1`"

                ;;

        esac

    fi

    if [ ".$opt_e" = .yes ] && [ ".`echo $text | grep '%d'`" != . ]; then

        if [ ".$domainname" = . ]; then

            if [ -f /etc/resolv.conf ]; then

                domainname="`grep '^[ 	]*domain' /etc/resolv.conf | sed -e 'q' |\

                             sed -e 's/.*domain//' \

                                 -e 's/^[ 	]*//' -e 's/^ *//' -e 's/^	*//' \

                                 -e 's/^\.//' -e 's/^/./' |\

                             awk '{ printf("%s", $1); }'`"

                if [ ".$domainname" = . ]; then