2 # (c) 2010 Quest Software, Inc. All rights reserved
4 # Copyright 2010 Quest Software, Inc. All rights reserved.
6 # Redistribution and use in source and binary forms, with or without
7 # modification, are permitted provided that the following conditions
10 # 1. Redistributions of source code must retain the above copyright
11 # notice, this list of conditions and the following disclaimer.
12 # 2. Redistributions in binary form must reproduce the above copyright
13 # notice, this list of conditions and the following disclaimer in the
14 # documentation and/or other materials provided with the distribution.
15 # 3. Neither the name of Quest Software, Inc. nor the names of its
16 # contributors may be used to endorse or promote products derived from
17 # this software without specific prior written permission.
19 # THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
20 # "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
21 # LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
22 # A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
23 # OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
24 # SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
25 # TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
26 # PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
27 # LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
28 # NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
29 # SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 # Please see <http://rc.quest.com/topics/polypkg/> for more information
33 pp_version="1.0.0.$pp_revision"
34 pp_copyright="Copyright 2010, Quest Software, Inc. All rights reserved."
37 pp_opt_destdir="$DESTDIR"
38 pp_opt_install_script=
41 pp_opt_no_package=false
42 pp_opt_only_front=false
46 pp_opt_save_unstripped=false
47 pp_opt_vas_platforms=false
48 pp_opt_wrkdir="`pwd`/pp.work.$$"
55 test -n "$PP_NO_CLEAN" && pp_opt_no_clean=true
56 test -n "$PP_DEBUG" && pp_opt_debug=true
57 test -n "$PP_VERBOSE" && pp_opt_verbose=true
60 pp_debug "main_cleanup"
62 if $pp_opt_no_clean || test x"$pp_platform" = x"unknown"; then
65 pp_backend_${pp_platform}_cleanup
66 $pp_errors && pp_die "Errors during cleanup"
67 if test -d "$pp_wrkdir"; then
68 if $pp_opt_debug; then
69 pp_debug "not removing $pp_wrkdir"
71 pp_verbose rm -rf "$pp_wrkdir"
79 while test $# -gt 0; do
81 # convert -[dilpv] to --long-options
83 --?*=?*) n=`echo "$1" | sed -ne 's/^--\([^=]*\)=.*/\1/p'`
84 a=`echo "$1" | sed -ne 's/^--[^=]*=\(.*\)/\1/p'`
86 set -- "--$n" "$a" "$@";;
89 -d) shift; set -- "--debug" "$@";;
90 -d*) a=`echo "$1" | sed -ne 's/^-.//'`
91 shift; set -- "--debug" "$@";;
93 -i) shift; set -- "--install-script" "$@";;
94 -i*) a=`echo "$1" | sed -ne 's/^-.//'`
95 shift; set -- "--install-script" "$a" "$@";;
97 -l) shift; set -- "--list" "$@";;
98 -l*) a=`echo "$1" | sed -ne 's/^-.//'`
99 shift; set -- "--list" "$@";;
101 -p) shift; set -- "--platform" "$@";;
102 -p*) a=`echo "$1" | sed -ne 's/^-.//'`
103 shift; set -- "--platform" "$a" "$@";;
105 -v) shift; set -- "--verbose" "$@";;
106 -v*) a=`echo "$1" | sed -ne 's/^-.//'`
107 shift; set -- "--verbose" "$@";;
109 -\?) shift; set -- "--help" "$@";;
110 -\?*) a=`echo "$1" | sed -ne 's/^-.//'`
111 shift; set -- "--help" "$@";;
115 --destdir|--eval|--install-script|--platform|--wrkdir)
116 test $# -ge 2 || pp_error "missing argument to $1";;
121 --debug) pp_opt_debug=true; shift;;
122 --destdir) pp_opt_destdir="$2"; shift;shift;;
123 --eval) pp_opt_eval="$2"; shift;shift;; # undoc
124 --install-script) pp_opt_install_script="$2"; shift;shift;;
125 --list) pp_opt_list=true; shift;;
126 --no-clean) pp_opt_no_clean=true; shift;;
127 --no-package) pp_opt_no_package=true; shift;;
128 --only-front) pp_opt_only_front=true; shift;;
129 --platform) pp_opt_platform="$2"; shift;shift;;
130 --probe) pp_opt_probe=true; shift;;
131 --strip) pp_opt_strip=true; shift;;
132 --save-unstripped) pp_opt_save_unstripped=true; shift;;
133 --wrkdir) pp_opt_wrkdir="$2"; shift;shift;;
134 --vas-platforms) pp_opt_vas_platforms=true; shift;;
135 --verbose) pp_opt_verbose=true; shift;;
136 --version) pp_opt_version=true; shift;;
137 --help) pp_errors=true; shift;;
139 -*) pp_error "unknown option $1"; shift;;
146 if test $# -gt 0; then
151 #-- extra arguments of the form Foo=bar alter *global* vars
152 while test $# -gt 0; do
154 -*) pp_error "unexpected option '$1'"
158 _val=`echo "$_val"|sed -e 's/[$"\\]/\\&/g'`
159 pp_debug "setting $_var = \"$_val\""
160 pp_opt_init_vars="$pp_opt_init_vars$_var=\"$_val\";"
162 *) pp_error "unexpected argument $1'"
168 pp_error "unknown argument $1"
172 polypkg $pp_version $pp_copyright
173 usage: $0 [options] [input.pp] [var=value ...]
174 -d --debug -- write copious info to stderr
175 --destdir=path -- file root, defaults to \$DESTDIR
176 -? --help -- display this information
177 -i --install-script=path -- create an install helper script
178 -l --list -- write package filenames to stdout
179 --no-clean -- don't remove temporary files
180 --no-package -- do everything but create packages
181 --only-front -- only perform front-end actions
182 -p --platform=platform -- defaults to local platform
183 --probe -- print local system identifier, then exit
184 --strip -- strip debug symbols from binaries before
185 packaging (modifies files in destdir)
186 --save-unstripped -- save unstripped binaries to
187 \$name-\$version-unstripped.tar.gz
188 --wrkdir=path -- defaults to subdirectory of \$TMPDIR or /tmp
189 -v --verbose -- write info to stderr
190 --version -- display version and quit
197 # initialise the front and back ends
200 $pp_opt_only_front || pp_backend_init
202 # run the front-end to generate the intermediate files
203 # set $pp_input_dir to be the 'include dir' if needed
204 pp_debug "calling frontend on $pp_opt_input"
205 case "$pp_opt_input" in
208 pp_warn "reading directives from standard input"
211 */*) pp_input_dir=${pp_opt_input%/*}
212 pp_frontend <"$pp_opt_input"
215 pp_frontend <"$pp_opt_input"
219 pp_files_ignore_others
220 pp_service_scan_groups
222 # some sanity checks after front-end processing
223 if test x"$pp_platform" != x"null"; then
224 pp_debug "sanity checks"
225 test -n "$pp_components" || pp_error "No components?"
226 pp_check_var_is_defined "name"
227 pp_check_var_is_defined "version"
228 pp_files_check_duplicates
229 pp_files_check_coverage
230 pp_die_if_errors "Errors during sanity checks"
233 # stop now if we're only running the front
234 $pp_opt_only_front && return
236 if test x"$pp_opt_strip" = x"true"; then
240 # run the back-end to generate the package
241 pp_debug "calling backend"
243 pp_die_if_errors "Errors during backend processing"
245 # copy the resulting package files to PP_PKGDESTDIR or .
246 for f in `pp_backend_names` -; do
247 test x"$f" = x"-" && continue
248 pp_debug "copying: $f to `pwd`"
249 if pp_verbose cp -r $pp_wrkdir/$f ${PP_PKGDESTDIR:-.}; then
250 echo "${PP_PKGDESTDIR:+$PP_PKGDESTDIR/}$f"
252 pp_error "$f: missing package"
255 pp_die_if_errors "Errors during package copying"
258 pp_install_script () {
259 pp_debug "writing install script to $pp_opt_install_script"
260 rm -f $pp_opt_install_script
261 pp_backend_install_script > $pp_opt_install_script
262 pp_die_if_errors "Errors during package install script"
263 chmod +x $pp_opt_install_script
267 # If PP_DEV_PATH is set, then jump to that script.
268 # (Useful when working on polypkg source that isn't installed)
269 if test -n "$PP_DEV_PATH" -a x"$PP_DEV_PATH" != x"$0"; then
270 pp_warn "switching from $0 to $PP_DEV_PATH ..."
271 exec "$PP_DEV_PATH" "$@" || exit 1
274 pp_set_expand_converter_or_reexec "$@"
277 if $pp_opt_version; then
278 #-- print version and exit
279 echo "polypkg $pp_version"
285 trap 'pp_main_cleanup' 0
287 pp_wrkdir="$pp_opt_wrkdir"
288 pp_debug "pp_wrkdir = $pp_wrkdir"
290 mkdir -p "$pp_wrkdir"
292 pp_destdir="$pp_opt_destdir"
293 pp_debug "pp_destdir = $pp_destdir"
295 if $pp_opt_probe; then
298 elif $pp_opt_vas_platforms; then
300 pp_backend_vas_platforms
301 elif test -n "$pp_opt_eval"; then
302 #-- execute a shell command
303 eval "$pp_opt_eval" || exit
306 if test -n "$pp_opt_install_script"; then
317 if test -n "$TERM" -a -t 1 && (tput op) >/dev/null 2>/dev/null; then
318 pp_col_redfg=`tput setf 4` 2>/dev/null
319 pp_col_bluefg=`tput setf 1` 2>/dev/null
320 pp_col_reset=`tput op` 2>/dev/null
328 if test x"" = x"$pp_lineno"; then
331 echo "$1 line $pp_lineno: $2" >&2
336 pp__warn "pp: ${pp_col_redfg}warning${pp_col_reset}" "$*"
340 pp__warn "pp: ${pp_col_redfg}error${pp_col_reset}" "$*"
349 pp_die_if_errors () {
350 $pp_errors && pp_die "$@"
354 $pp_opt_debug && echo "${pp_col_bluefg}debug${pp_col_reset} $*" >&2
358 $pp_opt_verbose && echo "pp: ${pp_col_bluefg}info${pp_col_reset} $*" >&2
363 sed -e 's,%(\([^)]*\)),
\16\15`\1`
\16,g' \
364 -e 's,%{\([^}]*\)},
\16\15${\1}
\16,g' \
367 sed -e '/^[^
\15]/s/["$`\\]/\\&/g' \
371 -e 's,
\17,"
\16echo ",g' |
378 eval "$1=\`expr \$$1 + 1\`"
382 eval "$1=\`expr \$$1 - 1\`"
385 pp_check_var_is_defined () {
386 if eval test -z "\"\$$1\""; then
387 pp_error "\$$1: not set"
404 pp_contains "$_l" "$_w" || return 1
414 pp_contains "$_l" "$_w" && return 0
420 if eval test -z \"\$$1\"; then
422 elif eval pp_contains '"$'$1'"' '"$2"'; then
430 typeset result element
434 pp_add_to_list result $element
439 pp_mode_strip_altaccess () {
442 echo `echo "$1" | cut -b -10`;;
449 typeset umode gmode omode smode
451 set -- `pp_mode_strip_altaccess "$1"`
454 ?--[-X]??????) umode=0;;
455 ?--[xs]??????) umode=1;;
456 ?-w[-X]??????) umode=2;;
457 ?-w[xs]??????) umode=3;;
458 ?r-[-X]??????) umode=4;;
459 ?r-[xs]??????) umode=5;;
460 ?rw[-X]??????) umode=6;;
461 ?rw[xs]??????) umode=7;;
462 *) pp_error "bad user mode $1";;
466 ????--[-S]???) gmode=0;;
467 ????--[xs]???) gmode=1;;
468 ????-w[-S]???) gmode=2;;
469 ????-w[xs]???) gmode=3;;
470 ????r-[-X]???) gmode=4;;
471 ????r-[xs]???) gmode=5;;
472 ????rw[-X]???) gmode=6;;
473 ????rw[xs]???) gmode=7;;
474 *) pp_error "bad group mode $1";;
478 ???????--[-T]) omode=0;;
479 ???????--[xt]) omode=1;;
480 ???????-w[-T]) omode=2;;
481 ???????-w[xt]) omode=3;;
482 ???????r-[-T]) omode=4;;
483 ???????r-[xt]) omode=5;;
484 ???????rw[-T]) omode=6;;
485 ???????rw[xt]) omode=7;;
486 *) pp_error "bad other mode $1";;
490 ???[-x]??[-x]??[-x]) smode=;;
491 ???[-x]??[-x]??[tT]) smode=1;;
492 ???[-x]??[Ss]??[-x]) smode=2;;
493 ???[-x]??[Ss]??[tT]) smode=3;;
494 ???[Ss]??[-x]??[-x]) smode=4;;
495 ???[Ss]??[-x]??[tT]) smode=5;;
496 ???[Ss]??[Ss]??[-x]) smode=6;;
497 ???[Ss]??[Ss]??[tT]) smode=7;;
498 *) pp_error "bad set-id mode $1";;
501 echo "$smode$umode$gmode$omode"
505 pp_debug "find: ${1#$pp_destdir}/"
506 for f in "$1"/.* "$1"/*; do
507 case "$f" in */.|*/..) continue;; esac # should never happen!
508 if test -d "$f" -o -f "$f" -o -h "$f"; then
509 if test -d "$f" -a ! -h "$f"; then
510 echo "${f#$pp_destdir}/"
513 echo "${f#$pp_destdir}"
520 #test -t && pp_warn "pp_prepend: stdin is a tty?"
522 pp_debug "prepending to $1"
524 cat - $1._prepend >$1
527 pp_debug "prepend: creating $1"
532 pp_note_file_used() {
533 echo "$1" >> $pp_wrkdir/all.files
536 pp_create_dir_if_missing () {
538 */) pp_error "pp_create_dir_if_missing: trailing / forbidden";;
540 *) if test ! -d "$pp_destdir$1"; then
541 pp_debug "fabricating directory $1/"
542 pp_create_dir_if_missing "${1%/*}"
543 mkdir "$pp_destdir$1" &&
544 pp_note_file_used "$1/"
545 pp_remove_later "$1" &&
546 chmod ${2:-755} "$pp_destdir$1"
551 pp_add_file_if_missing () {
553 #-- check that the file isn't already declared in the component
554 if test -s $pp_wrkdir/%files.${2:-run}; then
555 awk "\$6 == \"$1\" {exit 1}" < $pp_wrkdir/%files.${2:-run} || return 1
558 pp_create_dir_if_missing "${1%/*}"
559 pp_debug "fabricating file $1"
560 echo "f ${3:-755} - - ${4:--} $1" >> $pp_wrkdir/%files.${2:-run}
561 pp_note_file_used "$1"
566 pp_add_transient_file () {
567 test -f "$pp_destdir$1" && pp_die "$pp_destdir$1: exists"
568 pp_create_dir_if_missing "${1%/*}"
569 pp_debug "transient file $1"
570 pp_note_file_used "$1"
577 test -s $pp_wrkdir/pp_cleanup && cat $pp_wrkdir/pp_cleanup
578 } > $pp_wrkdir/pp_cleanup.new
579 mv $pp_wrkdir/pp_cleanup.new $pp_wrkdir/pp_cleanup
583 if test -h "$1"; then
584 ls -1ld "$1" | sed -ne 's,.* -> ,,p'
586 echo "$1: not a symbolic link" >&2
591 pp_remove_later_now () {
593 if test -s $pp_wrkdir/pp_cleanup; then
594 pp_debug "pp_remove_later_now"
596 pp_debug "removing $pp_destdir$f"
597 if test -d $pp_destdir$f; then
602 done < $pp_wrkdir/pp_cleanup
603 rm $pp_wrkdir/pp_cleanup
609 pp_debug "&& pp_readlink_fn=$pp_readlink_fn"
611 if test -n "$pp_readlink_fn"; then
612 pp_debug "&& calling $pp_readlink_fn $*"
613 "$pp_readlink_fn" "$@"
620 pp_install_script_common () {
623 # Automatically generated for
624 # $name $version ($pp_platform)
625 # by PolyPackage $pp_version
630 echo "usage: \$0 list-services" ;;
632 echo "usage: \$0 list-components" ;;
634 echo "usage: \$0 list-files {cpt...|all}" ;;
636 echo "usage: \$0 install {cpt...|all}" ;;
638 echo "usage: \$0 uninstall {cpt...|all}" ;;
640 echo "usage: \$0 start {svc...}" ;;
642 echo "usage: \$0 stop {svc...}" ;;
644 echo "usage: \$0 print-platform" ;;
646 echo "usage: \$0 [-q] command [args]"
647 echo " list-services"
648 echo " list-components"
649 echo " list-files {cpt...|all}"
650 echo " install {cpt...|all}"
651 echo " uninstall {cpt...|all}"
652 echo " start {svc...}"
653 echo " stop {svc...}"
654 echo " print-platform"
660 if test x"\$1" = x"-q"; then
662 verbose () { "\$@"; }
663 verbosemsg () { : ; }
665 verbose () { echo "+ \$*"; "\$@"; }
666 verbosemsg () { echo "\$*"; }
673 typeset func deps allfuncs
675 while test $# -gt 0; do
676 pp_add_to_list allfuncs "$1"
677 deps=`pp_backend_function "$1:depends"`
679 set -- `pp_unique "$@" $deps`
682 for func in $allfuncs
684 pp_debug "generating function code for '$1'"
688 pp_mkgroup|pp_mkuser|pp_havelib) echo <<.;;
689 if test \$# -lt 1; then
690 echo "$func: not enough arguments" >&2
695 pp_backend_function "$func" || cat <<.
696 echo "$func: not implemented" >&2
708 #-- convert all non alpha/digits to underscores
709 echo "$*" | tr -c '[a-z][A-Z][0-9]\012' '[_*]'
713 awk -F: '$3 == uid { if (!found) print $1; found=1; } END { if (!found) exit 1; }' uid="$1" \
714 < /etc/passwd || pp_error "no local username for uid $1"
718 awk -F: '$3 == gid { if (!found) print $1; found=1; } END { if (!found) exit 1; }' gid="$1" \
719 < /etc/group || pp_error "no local group for gid $1"
722 pp_backend_function_getopt () {
725 _pp_optstring="$1"; shift; eval `_pp_getopt "$_pp_optstring"`
727 _pp_getopt_meta=s,[\\\\\"\'\`\$\&\;\(\)\{\}\#\%\ \ ],\\\\\&,g
729 sed "$_pp_getopt_meta" <<. | tr '\012' ' '
734 sed "s,^..,,$pp_getopt_meta" <<. | tr '\012' ' '
744 _pp_nonl '_pp_nonl set --; while test $# -gt 0; do case "$1" in "--") shift; break;;'
745 sed 's/\([^: ]:*\)/<@<\1>@>/g;
746 s/<@<\(.\):>@>/"-\1") _pp_nonl -"\1"; _pp_protect "$2"; shift; shift;; "-\1"*) _pp_nonl -"\1"; _pp_protect2 "$1"; shift;;/g;s/<@<\(.\)>@>/ "-\1") _pp_nonl -"\1"; shift;; "-\1"*) _pp_nonl -"\1"; _pp_tmp="$1"; shift; set -- -`_pp_protect2 "$_pp_tmp"` "$@";;/g' <<.
749 _pp_nonl '-*) echo "$1: unknown option">&2; return 1;; *) break;; esac; done; _pp_nonl --; while test $# -gt 0; do _pp_nonl "$1"; shift; done; echo'
755 pp_copy_unstripped () {
756 typeset filedir realdir
757 filedir="`dirname ${1#$pp_destdir}`"
758 realdir="$pp_wrkdir/unstripped/$filedir"
761 # Can't use hardlinks because `strip` modifies the original file in-place
765 pp_package_stripped_binaries () {
766 (cd "$pp_wrkdir/unstripped" && tar -c .) \
767 | gzip > "$name-dbg-$version.tar.gz"
768 rm -rf "$pp_wrkdir/unstripped"
771 pp_strip_binaries () {
772 if test x"$pp_opt_save_unstripped" = x"true"; then
773 rm -rf "$pp_wrkdir/unstripped"
774 mkdir "$pp_wrkdir/unstripped"
777 for f in `find "$pp_destdir" -type f`; do
778 if file "$f" | awk '{print $2}' | grep ^ELF >/dev/null 2>&1; then
779 if test x"$pp_opt_save_unstripped" = x"true"; then
780 if file "$f" | LC_MESSAGES=C grep 'not stripped' >/dev/null 2>&1; then
781 pp_debug "Saving unstripped binary $f"
782 pp_copy_unstripped "$f"
784 pp_debug "$f is already stripped; not saving a copy"
787 pp_debug "Stripping unnecessary symbols from $f"
792 if test x"$pp_opt_save_unstripped" = x"true"; then
793 pp_package_stripped_binaries
800 pp_frontend_init () {
804 description="No description"
805 copyright="Copyright 2010 Quest Software, Inc. All rights reserved."
807 #-- if the user supplied extra arguments on the command line
808 # then load them now.
809 pp_debug "pp_opt_init_vars=$pp_opt_init_vars"
810 test -n "$pp_opt_init_vars" && eval "$pp_opt_init_vars"
820 pp_debug "is_qualifier: $* -> $ret"
824 pp_eval_qualifier () {
829 "[!"*",$pp_platform]"| \
830 "[!$pp_platform,"*"]"| \
831 "[!"*",$pp_platform,"*"]") ret=false;;
834 "["*",$pp_platform]"| \
835 "[$pp_platform,"*"]"| \
836 "["*",$pp_platform,"*"]") ret=true;;
838 *) pp_die "pp_eval_qualifier: bad qualifier '$1'"
840 pp_debug "eval: $* -> $ret"
849 %if) if test 0 = $pp_if_false; then
851 true |1) pp_incr pp_if_true;;
852 false|0) pp_incr pp_if_false;;
855 if pp_is_qualifier "$*"; then
856 pp_eval_qualifier "$*" || ifret=false
858 eval test "$@" || ifret=false
859 pp_debug "evaluating test $* -> $ifret"
867 %else) test $# = 0 || pp_warn "ignoring argument to %else"
868 if test $pp_if_false -gt 1; then
870 elif test $pp_if_false = 1; then
873 elif test $pp_if_true = 0; then
874 pp_die "unmatched %else"
879 %endif) test $# = 0 || pp_warn "ignoring argument to %endif"
880 if test $pp_if_false -gt 0; then
882 elif test $pp_if_true -gt 0; then
885 pp_die "unmatched %endif"
887 *) pp_die "frontend_if: unknown cmd $ifcmd";;
893 typeset section newsection sed_word sed_ws line cpt svc
894 typeset section_enabled newsection_enabled s sed sed_candidate
897 newsection='%_initial'
900 sed_word="[a-zA-Z_][a-zA-Z_0-9]*"
903 #-- not all seds are created equal
905 for sed_candidate in ${PP_SED:-sed} /usr/xpg4/bin/sed; do
906 if echo 'foo' | $sed_candidate -ne '/^\(x\)*foo/p' | grep foo > /dev/null
913 pp_die "sed is broken on this system"
917 #-- Note: this sed script should perform similar to pp_eval_qualifier()
918 $sed -e "/^#/s/.*//" \
919 -e "/^\\[!\\($sed_word,\\)*$pp_platform\\(,$sed_word\\)*\\]/s/.*//" \
920 -e "s/^\\[\\($sed_word,\\)*$pp_platform\\(,$sed_word\\)*\\]$sed_ws*//" \
921 -e "s/^\\[!\\($sed_word,\\)*$sed_word\\]$sed_ws*//" \
922 -e "/^\\[\\($sed_word,\\)*$sed_word\\]/s/.*//" \
923 -e "s/^%$sed_ws*/%/" \
924 -e "s/^$sed_ws/%\\\\&/" \
925 > $pp_wrkdir/frontend.tmp
927 #-- add an ignore section at the end to force section completion
928 echo '%ignore' >> $pp_wrkdir/frontend.tmp
929 echo >> $pp_wrkdir/frontend.tmp
931 exec 0<$pp_wrkdir/frontend.tmp
933 : > $pp_wrkdir/%fixup
934 while read -r line; do
935 #-- Convert leading double-% to single-%, or switch sections
938 pp_debug "line $pp_lineno: $line"
942 #pp_debug "line $pp_lineno: $*"
947 pp_debug "processing if directive $1"
951 test 0 -ne $pp_if_false && continue # ignore lines %if'd out
955 pp_debug "processing new section $1"
956 newsection="$1"; shift
958 if pp_is_qualifier "$1"; then
959 pp_eval_qualifier "$1" || newsection_enabled=false
962 test $# -eq 0 || pp_warn "ignoring extra arguments: $line"
964 %pre|%post|%preun|%postup|%postun|%files|%depend|%check)
965 pp_debug "processing new component section $*"
967 if test $# -eq 0 || pp_is_qualifier "$1"; then
975 if test $# -gt 0 && pp_is_qualifier "$1"; then
976 pp_eval_qualifier "$1" || newsection_enabled=false
980 pp_warn "ignoring extra arguments: $line"
983 $newsection_enabled && pp_add_component "$cpt";;
984 x-*) :;; # useful for discarding stuff
985 *) pp_error "unknown component: $1 $cpt";;
989 newsection="%ignore"; shift
990 if test $# -gt 0; then
991 pp_set_api_version "$1"
994 pp_error "%pp: missing version"
997 pp_error "%pp: too many arguments"
1000 pp_debug "processing new service section $1 $2"
1002 if test $# -eq 0 || pp_is_qualifier "$1"; then
1003 pp_error "$s: service name required"
1009 newsection="$s.$svc"
1010 newsection_enabled=:
1011 if test $# -gt 0 && pp_is_qualifier "$1"; then
1012 pp_eval_qualifier "$1" || newsection_enabled=false
1016 pp_warn "ignoring extra arguments: $line"
1017 $newsection_enabled && pp_add_service "$svc"
1020 pp_debug "removing leading %\\"
1022 pp_debug " result is <$line>"
1028 pp_debug "removing leading %"
1035 pp_error "unknown section $1"
1036 newsection='%ignore'
1037 newsection_enabled=:
1042 test 0 != $pp_if_false && continue # ignore lines %if'd out
1044 pp_debug "section=$section (enabled=$section_enabled) newsection=$newsection (enabled=$newsection_enabled)"
1046 #-- finish processing a previous section
1047 if test x"$newsection" != x""; then
1048 $section_enabled && case "$section" in
1050 pp_debug "leaving ignored section $section"
1051 : ignore # guaranteed to be the last section
1054 pp_debug "leaving $section: sourcing $pp_wrkdir/tmp"
1055 $pp_opt_debug && cat $pp_wrkdir/tmp >&2
1059 %pre.*|%preun.*|%post.*|%postup.*|%postun.*|%depend.*|%check.*|%service.*|%fixup)
1060 pp_debug "leaving $section: substituting $pp_wrkdir/tmp"
1061 # cat $pp_wrkdir/tmp >&2 # debugging
1062 $pp_opt_debug && pp_substitute < $pp_wrkdir/tmp >&2
1063 pp_substitute < $pp_wrkdir/tmp > $pp_wrkdir/tmp.sh
1064 . $pp_wrkdir/tmp.sh >> $pp_wrkdir/$section ||
1065 pp_error "shell error in $section"
1066 rm -f $pp_wrkdir/tmp.sh
1070 section="$newsection"
1071 section_enabled="$newsection_enabled"
1075 #-- ignore section content that is disabled
1076 $section_enabled || continue
1078 #-- process some lines in-place
1081 case "$line" in "") continue;; esac # ignore non-section blanks
1082 pp_die "Ignoring text before % section introducer";;
1083 %set|%pre.*|%preun.*|%post.*|%postup.*|%postun.*|%check.*|%service.*|%fixup)
1084 pp_debug "appending line to \$pp_wrkdir/tmp"
1085 echo "$line" >> $pp_wrkdir/tmp
1088 test $# -eq 0 && continue;
1089 pp_files_expand "$@" >> $pp_wrkdir/$section
1092 pp_debug "Adding explicit dependency $@ to $cpt"
1093 echo "$@" >> $pp_wrkdir/%depend.$cpt
1099 if test $pp_if_true != 0 -o $pp_if_false != 0; then
1100 pp_die "missing %endif at end of file"
1105 pp_debug " name = $name"
1106 pp_debug " version = $version"
1107 pp_debug " summary = $summary"
1108 pp_debug " description = $description"
1109 pp_debug " copyright = $copyright"
1111 pp_debug "\$pp_components: $pp_components"
1112 pp_debug "\$pp_services: $pp_services"
1115 pp_set_api_version() {
1118 *) pp_error "This version of polypackage is too old";;
1124 pp_set_platform () {
1125 if test -n "$pp_opt_platform"; then
1126 pp_contains "$pp_platforms" "$pp_opt_platform" ||
1127 pp_die "$pp_opt_platform: unknown platform"
1128 pp_platform="$pp_opt_platform"
1130 uname_s=`uname -s 2>/dev/null`
1132 for p in $pp_platforms; do
1133 pp_debug "probing for platform $p"
1134 if eval pp_backend_${p}_detect "$uname_s"; then
1139 test -z "$pp_platform" &&
1140 pp_die "cannot detect platform (supported: $pp_platforms)"
1142 pp_debug "pp_platform = $pp_platform"
1147 pp_expand_test_usr_bin () {
1148 awk '$1 == "/usr" || $2 == "/usr" {usr++}
1149 $1 == "/bin" || $2 == "/bin" {bin++}
1150 END { if (usr == 1 && bin == 1) exit(0); else exit(1); }'
1153 pp_set_expand_converter_or_reexec () {
1154 test -d /usr -a -d /bin ||
1155 pp_die "missing /usr or /bin"
1156 echo /usr /bin | pp_expand_test_usr_bin || pp_die "pp_expand_test_usr_bin?"
1157 if (eval "echo /{usr,bin}" | pp_expand_test_usr_bin) 2>/dev/null; then
1158 pp_expand_path=pp_expand_path_brace
1159 elif (eval "echo /@(usr|bin)" | pp_expand_test_usr_bin) 2>/dev/null; then
1160 pp_expand_path=pp_expand_path_at
1162 test x"$pp_expand_rexec" != x"true" ||
1163 pp_die "problem finding shell that can do brace expansion"
1164 for shell in ksh ksh93 bash; do
1165 if ($shell -c 'echo /{usr,bin}' |
1166 pp_expand_test_usr_bin) 2>/dev/null ||
1167 ($shell -c 'echo /@(usr|bin)' |
1168 pp_expand_test_usr_bin) 2>/dev/null
1170 pp_debug "switching to shell $shell"
1171 pp_expand_rexec=true exec $shell "$0" "$@"
1174 pp_die "cannot find a shell that does brace expansion"
1178 pp_expand_path_brace () {
1180 eval "for f in $1; do echo \"\$f\"; done|sort -u"
1183 pp_expand_path_at () {
1186 echo "$1" | sed -e 's/{/@(/g' -e 's/}/)/g' -e 's/,/|/g'
1187 `; do echo \"\$f\"; done|sort -u"
1190 pp_shlib_suffix='.so*'
1193 #@ $pp_components: whitespace-delimited list of components seen in %files
1195 #@ $pp_services: whitespace-delimited list of %service seen
1198 rm -f $pp_wrkdir/%files.* \
1199 $pp_wrkdir/%post.* \
1201 $pp_wrkdir/%preun.* \
1202 $pp_wrkdir/%postup.* \
1203 $pp_wrkdir/%postun.* \
1204 $pp_wrkdir/%service.* \
1210 pp_have_component () {
1211 pp_contains "$pp_components" "$1"
1214 pp_have_all_components () {
1215 pp_contains_all "$pp_components" "$@"
1218 pp_add_component () {
1219 pp_add_to_list 'pp_components' "$1"
1223 pp_add_to_list 'pp_services' "$1"
1226 pp_service_init_vars () {
1229 stop_signal=15 # SIGTERM
1232 enable=yes # make it so the service starts on boot
1233 optional=no # Whether installing this service is optional
1234 pp_backend_init_svc_vars
1237 pp_service_check_vars () {
1239 pp_error "%service $1: cmd not defined"
1242 *) pp_error "%service $1: \$enable must be set to yes or no";;
1246 pp_load_service_vars () {
1247 pp_service_init_vars
1248 . "$pp_wrkdir/%service.$1"
1249 pp_service_check_vars "$1"
1252 pp_files_expand () {
1253 typeset _p _mode _group _owner _flags _path _optional _has_target _tree
1254 typeset _path _file _tgt _m _o _g _f _type _lm _ll _lo _lg _ls _lx
1257 test $# -eq 0 && return
1259 pp_debug "pp_files_expand: path is: $1"
1261 case "$1" in "#"*) return;; esac
1264 pp_debug "pp_files_expand: other arguments: $*"
1266 #-- the mode must be an octal number of at least three digits
1268 _a=`eval echo \"$1\"`
1271 -|=|[01234567][01234567][01234567]*) _mode="$_a"; shift;;
1274 #-- the owner:group field may have optional parts
1275 _a=`eval echo \"$1\"`
1277 *:*) _group=${_a#*:}; _owner=${_a%:*}; shift;;
1278 =|-) _group=$_a; _owner=$_a; shift;;
1279 *) _group=; _owner=;;
1282 #-- process the flags argument
1287 if test $# -gt 0; then
1288 _a=`eval echo \"$1\"`
1289 case ",$_a," in *,volatile,*) _flags="${_flags}v";; esac
1290 case ",$_a," in *,optional,*) _optional=true;; esac
1291 case ",$_a," in *,symlink,*) _has_target=true;; esac
1292 case ",$_a," in *,ignore-others,*) _flags="${_flags}i";; esac
1293 case ",$_a," in *,ignore,*) _ignore=true;; esac
1297 #-- process the target argument
1298 if $_has_target; then
1299 test $# -ne 0 || pp_error "$_p: missing target"
1300 _a=`eval echo \"$1\"`
1305 pp_debug "pp_files_expand: $_mode|$_owner:$_group|$_flags|$_target|$*"
1307 test $# -eq 0 || pp_error "$_p: too many arguments"
1309 #-- process speciall suffixes
1312 *"/**") _p="${_p%"/**"}"; tree="**";;
1313 *".%so") _p="${_p%".%so"}$pp_shlib_suffix";;
1316 #-- expand the path using the shell glob
1317 pp_debug "expanding .$_p ... with $pp_expand_path"
1318 (cd ${pp_destdir} && $pp_expand_path ".$_p") > $pp_wrkdir/tmp.files.exp
1320 #-- expand path/** by rewriting the glob output file
1324 pp_debug "expanding /** tree ..."
1325 while read _path; do
1327 pp_find_recurse "$pp_destdir${_path%/}"
1328 done < $pp_wrkdir/tmp.files.exp |
1329 sort -u > $pp_wrkdir/tmp.files.exp2
1330 mv $pp_wrkdir/tmp.files.exp2 $pp_wrkdir/tmp.files.exp
1334 while read _path; do
1336 _file="${pp_destdir}${_path}"
1345 *) pp_warn "$_path: inserting leading /"
1346 _path="/$_path";; # ensure leading /
1351 */../*|*/..) pp_error "$_path: invalid .. in path";;
1352 */./*|*/.) pp_warn "$_path: invalid component . in path";;
1353 *//*) pp_warn "$_path: redundant / in path";;
1356 #-- set the type based on the real file's type
1358 _type=f _m=_ _o=_ _g=_
1359 elif test -h "$_file"; then
1361 */) pp_warn "$_path (symlink $_file): removing trailing /"
1366 if test x"$_target" != x"=" -a -n "$_target"; then
1368 pp_debug "symlink target is $_tgt"
1370 _tgt=`pp_readlink "$_file"`;
1371 test -z "$_tgt" && pp_error "can't readlink $_file"
1374 pp_warn "stripped \$destdir from symlink ($_path)"
1375 _tgt="${_tgt#$pp_destdir}";;
1379 elif test -d "$_file"; then
1380 #-- display a warning if the user forgot the trailing /
1383 *) pp_warn "$_path (matching $_file): adding trailing /"
1387 $_has_target && pp_error "$_file: not a symlink"
1388 elif test -f "$_file"; then
1390 */) pp_warn "$_path (matching $_file): removing trailing /"
1395 $_has_target && pp_error "$_file: not a symlink"
1397 $_optional && continue
1398 pp_error "$_file: missing"
1402 #-- convert '=' shortcuts into mode/owner/group from ls
1403 case ":$_m:$_o:$_g:" in *:=:*)
1404 if LS_OPTIONS=--color=never /bin/ls -ld "$_file" \
1407 read _lm _ll _lo _lg _ls _lx < $pp_wrkdir/ls.tmp
1408 test x"$_m" = x"=" && _m=`pp_mode_from_ls "$_lm"`
1409 test x"$_o" = x"=" && _o="$_lo"
1410 test x"$_g" = x"=" && _g="$_lg"
1412 pp_error "cannot read $_file"
1413 test x"$_m" = x"=" && _m=-
1414 test x"$_o" = x"=" && _o=-
1415 test x"$_g" = x"=" && _g=-
1420 test -n "$_f" || _f=-
1423 test -n "$_type" || pp_die "_type empty"
1424 test -n "$_path" || pp_die "_path empty"
1425 test -n "$_m" || pp_die "_m empty"
1426 test -n "$_o" || pp_die "_o empty"
1427 test -n "$_g" || pp_die "_g empty"
1429 #-- setuid/gid files must be given an explicit owner/group (or =)
1430 case "$_o:$_g:$_m" in
1431 -:*:[4657][1357]??|-:*:[4657]?[1357]?|-:*:[4657]??[1357])
1432 pp_error "$_path: setuid file ($_m) missing explicit owner";;
1433 *:-:[2367][1357]??|*:-:[2367]?[1357]?|*:-:[2367]??[1357])
1434 pp_error "$_path: setgid file ($_m) missing explicit group";;
1437 # convert numeric uids into usernames; only works for /etc/passwd
1438 case "$_o" in [0-9]*) _o=`pp_getpwuid $_o`;; esac
1439 case "$_g" in [0-9]*) _g=`pp_getgrgid $_g`;; esac
1441 pp_debug "$_type $_m $_o $_g $_f $_path" $_tgt
1442 $_ignore || echo "$_type $_m $_o $_g $_f $_path" $_tgt
1443 pp_note_file_used "$_path"
1444 case "$_f" in *i*) echo "$_path" >> $pp_wrkdir/ign.files;; esac
1445 done < $pp_wrkdir/tmp.files.exp
1448 pp_files_check_duplicates () {
1450 if test -s $pp_wrkdir/all.files; then
1451 sort < $pp_wrkdir/all.files | uniq -d > $pp_wrkdir/duplicate.files
1452 if test -f $pp_wrkdir/ign.awk; then
1453 # Remove ignored files
1454 mv $pp_wrkdir/duplicate.files $pp_wrkdir/duplicate.files.ign
1455 sed -e 's/^/_ _ _ _ _ /' < $pp_wrkdir/duplicate.files.ign |
1456 awk -f $pp_wrkdir/ign.awk |
1457 sed -e 's/^_ _ _ _ _ //' > $pp_wrkdir/duplicate.files
1459 while read _path; do
1460 pp_warn "$_path: file declared more than once"
1461 done <$pp_wrkdir/duplicate.files
1465 pp_files_check_coverage () {
1466 pp_find_recurse "$pp_destdir" | sort > $pp_wrkdir/coverage.avail
1467 if test -s $pp_wrkdir/all.files; then
1468 sort -u < $pp_wrkdir/all.files
1471 fi > $pp_wrkdir/coverage.used
1472 join -v1 $pp_wrkdir/coverage.avail $pp_wrkdir/coverage.used \
1473 > $pp_wrkdir/coverage.not-packaged
1474 if test -s $pp_wrkdir/coverage.not-packaged; then
1475 pp_warn "The following files/directories were found but not packaged:"
1476 sed -e 's,^, ,' < $pp_wrkdir/coverage.not-packaged >&2
1478 join -v2 $pp_wrkdir/coverage.avail $pp_wrkdir/coverage.used \
1479 > $pp_wrkdir/coverage.not-avail
1480 if test -s $pp_wrkdir/coverage.not-avail; then
1481 pp_warn "The following files/directories were named but not found:"
1482 sed -e 's,^, ,' < $pp_wrkdir/coverage.not-avail >&2
1486 pp_files_ignore_others () {
1489 test -s $pp_wrkdir/ign.files || return
1491 #-- for each file in ign.files, we remove it from all the
1492 # other %files.* lists, except where it has an i flag.
1493 # rather than scan each list multiple times, we build
1496 pp_debug "stripping ignore files"
1499 echo '$6 == "'"$p"'" && $5 !~ /i/ { next }'
1500 done < $pp_wrkdir/ign.files > $pp_wrkdir/ign.awk
1501 echo '{ print }' >> $pp_wrkdir/ign.awk
1503 $pp_opt_debug && cat $pp_wrkdir/ign.awk
1505 for f in $pp_wrkdir/%files.*; do
1507 awk -f $pp_wrkdir/ign.awk < $f.ign > $f || pp_error "awk"
1511 pp_service_scan_groups () {
1514 #-- scan for "group" commands, and build a list of groups
1516 if test -n "$pp_services"; then
1517 for svc in $pp_services; do
1519 . $pp_wrkdir/%service.$svc
1520 if test -n "$group"; then
1521 pp_contains "$pp_services" "$group" && pp_error \
1522 "%service $svc: group name $group in use by a service"
1523 pp_add_to_list 'pp_service_groups' "$group"
1524 echo "$svc" >> $pp_wrkdir/%svcgrp.$group
1530 pp_service_get_svc_group () {
1531 (tr '\012' ' ' < $pp_wrkdir/%svcgrp.$1 ; echo) | sed -e 's/ $//'
1534 for _sufx in _init '' _names _cleanup _install_script \
1535 _init_svc_vars _function _probe _vas_platforms
1537 eval "pp_backend$_sufx () { pp_debug pp_backend$_sufx; pp_backend_\${pp_platform}$_sufx \"\$@\"; }"
1541 pp_platforms="$pp_platforms aix"
1543 pp_backend_aix_detect () {
1547 pp_backend_aix_init () {
1551 pp_aix_bosboot= # components that need bosboot
1554 pp_aix_start_services_after_install=false
1555 pp_aix_init_services_after_install=true
1557 case "$pp_aix_os" in
1558 *) pp_readlink_fn=pp_ls_readlink;; # XXX
1564 pp_aix_detect_arch () {
1565 pp_aix_arch_p=`uname -p 2>/dev/null`
1566 case "$pp_aix_arch_p" in
1567 "") pp_debug "can't get processor type from uname -p"
1568 pp_aix_arch_p=powerpc
1569 pp_aix_arch=R;; # guess (lsattr -l proc0 ??)
1570 powerpc) pp_aix_arch=R;;
1571 *) pp_aix_arch_p=intel
1572 pp_aix_arch=I;; # XXX? verify
1575 case "`/usr/sbin/lsattr -El proc0 -a type -F value`" in
1576 PowerPC_POWER*) pp_aix_arch_std=ppc64;;
1577 PowerPC*) pp_aix_arch_std=ppc;;
1578 *) pp_aix_arch_std=unknown;;
1582 pp_aix_detect_os () {
1590 pp_aix_version_fix () {
1592 v=`echo $1 | tr -c -d '[0-9].\012'`
1593 if test x"$v" != x"$1"; then
1594 pp_warn "stripped version '$1' to '$v'"
1597 ""|*..*|.*|*.) pp_error "malformed '$1'"
1600 # 5 components are only valid for fileset updates, not base
1601 # filesets (full packages). We trim 5+ components down to 4.
1602 pp_warn "version '$1' has too many dots for AIX, truncating"
1603 echo "$v" | cut -d. -f1-4;;
1604 *.*.*.*) echo "$v";;
1605 *.*.*) echo "$v.0";;
1606 *.*) echo "$v.0.0";;
1607 *) echo "$v.0.0.0";;
1615 *) pp_die "pp_aix_select: bad argument";;
1617 #pp_debug awk '$5 '$op' /^\/(usr|opt)(\/|$)/ { print; }'
1618 #awk '$5 '$op' /^\/(usr|opt)(\/|$)/ { print; }'
1619 awk $op'($6 ~ /^\/usr\// || $6 ~ /^\/opt\//) { print; }'
1622 pp_aix_copy_root () {
1623 typeset t m o g f p st target
1624 while read t m o g f p st; do
1626 d) pp_create_dir_if_missing "$1${p%/}";;
1627 f) pp_add_transient_file "$1$p"
1628 pp_verbose ln "$pp_destdir$p" "$pp_destdir$1$p" ||
1629 pp_error "can't link $p into $1";;
1630 *) pp_warn "pp_aix_copy_root: filetype $t not handled";;
1637 typeset prefix t m o g f p st
1640 while read t m o g f p st; do
1641 case "$t" in f) du -a "$pp_destdir$p";; esac
1642 done | sed -e 's!/[^/]*$!!' | sort +1 |
1644 { if (sz) print d,sz;
1647 END { if (sz) print d,sz }' |
1648 sed -n -e "s!^$pp_destdir!$prefix!p"
1652 awk '{ print "." pfx $6; }' pfx="$1"
1655 pp_aix_make_liblpp () {
1663 case "$f" in "$dn/"*) fl="$fl `basename $f`" ;;
1664 *) pp_die "liblpp name $f not in $dn/";; esac
1666 (cd "$dn" && pp_verbose ar -c -g -r "$out" $fl) || pp_error "ar error"
1669 pp_aix_make_script () {
1671 echo "#!/bin/sh" > "$1"
1673 echo "exit 0" >> "$1"
1677 pp_aix_inventory () {
1678 typeset fileset t m o g f p st type
1681 while read t m o g f p st; do
1682 case "$p" in *:*) pp_error "path $p contains colon";; esac
1685 f) type=FILE; defm=644 ;;
1686 s) type=SYMLINK; defm=777 ;;
1687 d) type=DIRECTORY; defm=755 ;;
1689 echo " type = $type"
1690 echo " class = inventory,apply,$fileset"
1691 set -- `/bin/ls -ld "$pp_destdir$p" 2>/dev/null`
1692 owner=$3 group=$4 size=$5
1693 if test x"$m" = x"-"; then m="$defm"; fi
1694 if test x"$o" = x"-"; then o="root"; fi
1695 if test x"$g" = x"-"; then g="system"; fi
1700 m=`echo $m|sed -e 's/^1/TCB,/' \
1701 -e 's/^[23]/TCB,SGID,/' \
1702 -e 's/^[45]/TCB,SUID,/' \
1703 -e 's/^[67]/TCB,SUID,SGID,/'`;; # vtx bit ignored
1707 f) if test ! -f "$pp_destdir$p"; then
1708 pp_error "$p: missing file"
1712 echo " size = VOLATILE"
1713 echo " checksum = VOLATILE"
1716 if test -r "$pp_destdir$p"; then
1717 echo " size = $size"
1718 pp_verbose sum -r < "$pp_destdir$p" |
1719 sed -e 's/.*/ checksum = "&"/'
1724 echo " target = $st"
1728 #-- Record ABI types seen
1730 f) if test -r "$pp_destdir$p"; then
1731 case "`file "$pp_destdir$p"`" in
1732 *"executable (RISC System/6000)"*) abi=ppc;;
1733 *"64-bit XCOFF executable"*) abi=ppc64;;
1736 if test -n "$abi"; then
1737 pp_add_to_list pp_aix_abis_seen $abi
1747 if test -s "$1"; then
1748 pp_warn "aix dependencies not implemented"
1752 pp_aix_add_service () {
1753 typeset svc cmd_cmd cmd_arg f
1756 pp_load_service_vars $svc
1760 cmd_arg="$pp_aix_mkssys_cmd_args";
1762 case "$stop_signal" in
1763 HUP) stop_signal=1;;
1764 INT) stop_signal=2;;
1765 QUIT) stop_signal=3;;
1766 KILL) stop_signal=9;;
1767 TERM) stop_signal=15;;
1768 USR1) stop_signal=30;;
1769 USR2) stop_signal=31;;
1771 pp_error "%service $svc: stop_signal not set";;
1773 pp_error "%service $svc: bad stop_signal ($stop_signal)";;
1776 test -z "$pidfile" || pp_error "aix requires empty pidfile (non daemon)"
1778 pp_add_component run
1779 if test "$user" = "root"; then
1782 uid="\"\`/usr/bin/id -u $user\`\""
1786 #-- add command text to create/remove the service
1787 cat <<-. >> $pp_wrkdir/%post.$svc
1792 stop_signal=$stop_signal
1794 srcgroup="$pp_aix_mkssys_group"
1796 lssrc -s \$svc > /dev/null 2>&1
1797 if [ \$? -eq 0 ]; then
1798 lssrc -s \$svc | grep "active" > /dev/null 2>&1
1799 if [ \$? -eq 0 ]; then
1800 stopsrc -s \$svc > /dev/null 2>&1
1802 rmsys -s \$svc > /dev/null 2>&1
1805 mkssys -s \$svc -u \$uid -p "\$cmd_cmd" \${cmd_arg:+-a "\$cmd_arg"} -S -n \$stop_signal -f 9 ${pp_aix_mkssys_args} \${srcgroup:+-G \$srcgroup}
1808 #-- add code to start the service on reboot
1809 ${pp_aix_init_services_after_install} &&
1810 cat <<-. >> $pp_wrkdir/%post.$svc
1811 mkitab "\$svc:2:once:/usr/bin/startsrc -s \$svc" > /dev/null 2>&1
1814 ${pp_aix_start_services_after_install} &&
1815 cat <<-. >> $pp_wrkdir/%post.$svc
1819 if [ -f "$pp_wrkdir/%post.run" ];then
1820 cat $pp_wrkdir/%post.run >> $pp_wrkdir/%post.$svc
1822 mv $pp_wrkdir/%post.$svc $pp_wrkdir/%post.run
1825 ${pp_aix_init_services_after_install} &&
1826 pp_prepend $pp_wrkdir/%preun.$svc <<-.
1829 pp_prepend $pp_wrkdir/%preun.$svc <<-.
1830 stopsrc -s $svc >/dev/null 2>&1
1834 if [ -f "$pp_wrkdir/%preun.run" ];then
1835 cat $pp_wrkdir/%preun.run >> $pp_wrkdir/%preun.$svc
1837 mv $pp_wrkdir/%preun.$svc $pp_wrkdir/%preun.run
1841 typeset briefex instuser instroot svc cmp outbff
1842 typeset user_wrkdir root_wrkdir
1843 typeset user_files root_files
1845 test -n "$pp_destdir" ||
1846 pp_error "AIX backend requires the '--destdir' option"
1848 instuser="/usr/lpp/$name"
1849 instroot="$instuser/inst_root"
1850 pp_aix_bff_name=${pp_aix_bff_name:-$name}
1852 # Here is the component mapping:
1853 # run -> $pp_aix_bff_name.rte ('Run time environment')
1854 # doc -> $pp_aix_bff_name.doc (non-standard)
1855 # dev -> $pp_aix_bff_name.adt ('Application developer toolkit')
1856 # dbg -> $pp_aix_bff_name.diag ('Diagnostics')
1858 test `echo "$summary" | wc -c ` -gt 40 && pp_error "\$summary too long"
1860 user_wrkdir=$pp_wrkdir/u
1861 root_wrkdir=$pp_wrkdir/r
1862 pp_verbose rm -rf $user_wrkdir $root_wrkdir
1863 pp_verbose mkdir -p $user_wrkdir $root_wrkdir
1865 for svc in $pp_services .; do
1866 test . = "$svc" && continue
1867 pp_aix_add_service $svc
1871 echo "4 $pp_aix_arch I $name {"
1873 for cmp in $pp_components; do
1875 run) ex=rte briefex="runtime";;
1876 doc) ex=doc briefex="documentation";;
1877 dev) ex=adt briefex="developer toolkit";;
1878 dbg) ex=diag briefex="diagnostics";;
1881 user_files=$pp_wrkdir/%files.$cmp.u
1882 root_files=$pp_wrkdir/%files.$cmp.r
1884 pp_aix_select -user < $pp_wrkdir/%files.$cmp > $user_files
1885 pp_aix_select -root < $pp_wrkdir/%files.$cmp > $root_files
1887 # Default to USR only unless there are root files,
1888 # or a post/pre/check script associated
1890 if test -s $root_files \
1891 -o -s $pp_wrkdir/%pre.$cmp \
1892 -o -s $pp_wrkdir/%post.$cmp \
1893 -o -s $pp_wrkdir/%preun.$cmp \
1894 -o -s $pp_wrkdir/%check.$cmp
1899 if $pp_opt_debug; then
1900 echo "$cmp USER %files:"
1902 echo "$cmp ROOT %files:"
1906 bosboot=N; pp_contains_any "$pp_aix_bosboot" $cmp && bosboot=b
1908 echo $pp_aix_bff_name.$ex \
1909 ${pp_aix_version:-`pp_aix_version_fix "$version"`} \
1910 1 $bosboot $content \
1911 $pp_aix_lang "$summary $briefex"
1914 pp_aix_depend $pp_wrkdir/%depend.$cmp
1918 # generate per-directory size information
1919 pp_aix_size < $user_files
1920 pp_aix_size $instroot < $root_files
1922 pp_aix_list < $user_files > $user_wrkdir/$pp_aix_bff_name.$ex.al
1923 pp_aix_list $instroot < $root_files >> $user_wrkdir/$pp_aix_bff_name.$ex.al
1924 pp_aix_list < $root_files > $root_wrkdir/$pp_aix_bff_name.$ex.al
1926 if $pp_opt_debug; then
1927 echo "$cmp USER $pp_aix_bff_name.$ex.al:"
1928 cat $user_wrkdir/$pp_aix_bff_name.$ex.al
1929 echo "$cmp ROOT $pp_aix_bff_name.$ex.al:"
1930 cat $root_wrkdir/$pp_aix_bff_name.$ex.al
1933 pp_aix_inventory $pp_aix_bff_name.$ex < $user_files \
1934 > $user_wrkdir/$pp_aix_bff_name.$ex.inventory
1935 pp_aix_inventory $pp_aix_bff_name.$ex < $root_files \
1936 > $root_wrkdir/$pp_aix_bff_name.$ex.inventory
1938 if $pp_opt_debug; then
1939 pp_debug "$cmp USER $pp_aix_bff_name.$ex.inventory:"
1940 cat $user_wrkdir/$pp_aix_bff_name.$ex.inventory
1941 pp_debug "$cmp ROOT $pp_aix_bff_name.$ex.inventory:"
1942 cat $root_wrkdir/$pp_aix_bff_name.$ex.inventory
1945 if test x"" != x"${pp_aix_copyright:-$copyright}"; then
1946 echo "${pp_aix_copyright:-$copyright}" > $user_wrkdir/$pp_aix_bff_name.$ex.copyright
1947 echo "${pp_aix_copyright:-$copyright}" > $root_wrkdir/$pp_aix_bff_name.$ex.copyright
1950 #-- assume that post/pre uninstall scripts only make
1951 # sense when installed in a root context
1953 if test -r $pp_wrkdir/%pre.$cmp; then
1954 pp_aix_make_script $user_wrkdir/$pp_aix_bff_name.$ex.pre_i \
1955 < $pp_wrkdir/%pre.$cmp
1958 if test -r $pp_wrkdir/%post.$cmp; then
1959 pp_aix_make_script $root_wrkdir/$pp_aix_bff_name.$ex.post_i \
1960 < $pp_wrkdir/%post.$cmp
1963 if test -r $pp_wrkdir/%preun.$cmp; then
1964 pp_aix_make_script $root_wrkdir/$pp_aix_bff_name.$ex.unpost_i \
1965 < $pp_wrkdir/%preun.$cmp
1968 # remove empty files
1969 for f in $user_wrkdir/$pp_aix_bff_name.$ex.* $root_wrkdir/$pp_aix_bff_name.$ex.*; do
1970 if test ! -s "$f"; then
1971 pp_debug "removing empty $f"
1976 # copy/link the root files so we can do an easy backup later
1977 pp_aix_copy_root $instroot < $root_files
1983 } > $pp_wrkdir/lpp_name
1985 if $pp_opt_debug; then
1987 cat $pp_wrkdir/lpp_name
1990 #-- copy the /lpp_name file to the destdir
1991 pp_add_transient_file /lpp_name
1992 cp $pp_wrkdir/lpp_name $pp_destdir/lpp_name
1994 #-- copy the liblpp.a files under destdir for packaging
1995 (cd $user_wrkdir && pp_verbose ar -c -g -r liblpp.a $name.*) ||
1997 if test -s $user_wrkdir/liblpp.a; then
1998 pp_add_transient_file $instuser/liblpp.a
1999 pp_verbose cp $user_wrkdir/liblpp.a $pp_destdir$instuser/liblpp.a ||
2000 pp_error "cannot create user liblpp.a"
2002 (cd $root_wrkdir && pp_verbose ar -c -g -r liblpp.a $name.*) ||
2004 if test -s $root_wrkdir/liblpp.a; then
2005 pp_add_transient_file $instroot/liblpp.a
2006 pp_verbose cp $root_wrkdir/liblpp.a $pp_destdir$instroot/liblpp.a ||
2007 pp_error "cannot create root liblpp.a"
2011 test -s $user_wrkdir/liblpp.a && echo .$instuser/liblpp.a
2012 test -s $root_wrkdir/liblpp.a && echo .$instroot/liblpp.a
2013 cat $user_wrkdir/$name.*.al # includes the relocated root files!
2014 } > $pp_wrkdir/bff.list
2016 if test -n "$pp_aix_abis_seen" -a x"$pp_aix_arch_std" = x"auto"; then
2017 case "$pp_aix_abis_seen" in
2018 "ppc ppc64"|"ppc64 ppc")
2019 pp_aix_arch_std=ppc64
2022 pp_aix_arch_std=$pp_aix_abis_seen
2025 pp_warn "multiple architectures detected: $pp_aix_abis_seen"
2026 pp_aix_arch_std=unknown
2029 pp_warn "no binary executables detected; using noarch"
2030 pp_aix_arch_std=noarch
2033 pp_warn "unknown architecture detected $pp_aix_abis_seen"
2034 pp_aix_arch_std=$pp_aix_abis_seen
2041 outbff=`pp_backend_aix_names`
2042 pp_debug "creating: $pp_wrkdir/$outbff"
2043 (cd $pp_destdir && pp_verbose /usr/sbin/backup -i -q -p -f -) \
2044 < $pp_wrkdir/bff.list \
2045 > $pp_wrkdir/$outbff || pp_error "backup failed"
2046 ${SUDO:-sudo} /usr/sbin/installp -l -d $pp_wrkdir/$outbff
2049 pp_backend_aix_cleanup () {
2053 pp_backend_aix_names () {
2054 echo "$name.${pp_aix_version:-`pp_aix_version_fix "$version"`}.bff"
2057 pp_backend_aix_install_script () {
2058 typeset pkgname platform
2060 # The script should take a first argument being the
2061 # operation; further arguments refer to components or services
2063 # list-components -- lists components in the pkg
2064 # install component... -- installs the components
2065 # uninstall component... -- uninstalles the components
2066 # list-services -- lists the services in the pkg
2067 # start service... -- starts the name service
2068 # stop service... -- stops the named services
2069 # print-platform -- prints the platform group
2071 pkgname="`pp_backend_aix_names`"
2072 platform="`pp_backend_aix_probe`" # XXX should be derived from files
2075 for cmp in $pp_components; do
2082 fsets="$fsets $name.$ex"
2086 pp_install_script_common
2091 test x"\$*" = x"all" &&
2092 set -- $pp_components
2096 run) echo "$name.rte";;
2097 doc) echo "$name.doc";;
2098 dev) echo "$name.adt";;
2099 dbg) echo "$name.diag";;
2105 test \$# -eq 0 && usage
2110 test \$# -eq 0 || usage \$op
2111 echo "$pp_components"
2114 test \$# -eq 0 || usage \$op
2118 test \$# -ge 1 || usage \$op
2119 echo \${PP_PKGDESTDIR:-.}/$pkgname
2122 test \$# -ge 1 || usage \$op
2123 verbose /usr/sbin/installp -acX -V0 -F \
2124 -d \${PP_PKGDESTDIR:-.}/$pkgname \
2125 \`cpt_to_fileset "\$@"\`
2128 test \$# -ge 1 || usage \$op
2129 verbose /usr/sbin/installp -u -e/dev/null \
2130 -V0 \`cpt_to_fileset "\$@"\`
2133 test \$# -ge 1 || usage \$op
2137 verbose \${op}src -s \$svc || ec=1
2150 pp_backend_aix_init_svc_vars () {
2154 pp_backend_aix_probe () {
2155 echo "${pp_aix_os}-${pp_aix_arch_std}"
2158 pp_backend_aix_vas_platforms () {
2159 case "${pp_aix_arch_std}" in
2161 *) pp_die "unknown architecture ${pp_aix_arch_std}";;
2163 case "${pp_aix_os}" in
2164 aix43) echo "aix-43";;
2165 aix51) echo "aix-51 aix-43";;
2166 aix52) echo "aix-51 aix-43";;
2167 aix53) echo "aix-53 aix-51 aix-43";;
2168 aix61) echo "aix-53 aix-51 aix-43";;
2169 *) pp_die "unknown system ${pp_aix_os}";;
2172 pp_backend_aix_function () {
2174 pp_mkgroup) cat <<'.';;
2175 /usr/sbin/lsgroup "$1" >/dev/null &&
2177 echo "Creating group $1"
2178 /usr/bin/mkgroup -A "$1"
2180 pp_mkuser:depends) echo pp_mkgroup;;
2181 pp_mkuser) cat <<'.';;
2182 /usr/sbin/lsuser "$1" >/dev/null &&
2184 pp_mkgroup "${2:-$1}" || return 1
2185 echo "Creating user $1"
2189 account_locked=true \
2190 home="${3:-/nohome.$1}" \
2194 pp_havelib) cat <<'.';;
2196 "") pp_tmp_name="lib$1.so";;
2197 *.*.*) pp_tmp_name="lib$1.so.$2";;
2198 *.*) pp_tmp_name="lib$1.so.$2.0";;
2199 *) pp_tmp_name="lib$1.so.$2";;
2201 for pp_tmp_dir in `echo "/usr/lib:/lib${3:+:$3}" | tr : ' '`; do
2202 test -r "$pp_tmp_dir/$pp_tmp_name" -a \
2203 -r "$pp_tmp_dir/lib$1.so" && return 0
2211 pp_platforms="$pp_platforms sd"
2213 pp_backend_sd_detect () {
2214 test x"$1" = x"HP-UX"
2217 pp_backend_sd_init () {
2220 pp_sd_stoplevels=auto
2223 pp_sd_vendor_tag=Quest
2224 pp_sd_default_start=1 # config_file default start value
2226 pp_readlink_fn=pp_ls_readlink # HPUX has no readlink
2231 pp_sd_detect_os () {
2235 pp_sd_os="${revision#?.}"
2236 test -z "$pp_sd_os" &&
2237 pp_warn "cannot detect OS version"
2238 pp_sd_os_std="hpux`echo $pp_sd_os | tr -d .`"
2240 case "`uname -m`" in
2241 9000/[678]??) pp_sd_arch_std=hppa;;
2242 ia64) pp_sd_arch_std=ia64;;
2243 *) pp_sd_arch_std=unknown;;
2247 pp_sd_write_files () {
2248 typeset t m o g f p st line dm
2249 while read t m o g f p st; do
2251 case "$f" in *v*) line="$line -v";; esac # FIXME for uninstall
2254 d) line="$line -t d"; p=${p%/}; dm=755;;
2255 s) line="$line -t s";;
2258 test x"$o" = x"-" && o=root
2259 test x"$g" = x"-" && g=sys
2260 test x"$m" = x"-" && m=$dm
2263 s) echo "$line $st $p";;
2264 *) echo "$line -o $o -g $g -m $m $pp_destdir$p $p";;
2270 pp_sd_service_group_script () {
2271 typeset grp svcs scriptpath out
2274 scriptpath="/sbin/init.d/$grp"
2275 out="$pp_destdir$scriptpath"
2277 pp_add_file_if_missing $scriptpath run 755 || return 0
2281 # generated by pp $pp_version
2286 #-- starts services in order.. stops them all if any break
2289 for svc in $svcs; do
2290 /sbin/init.d/$svc start
2296 if test -n "$undo"; then
2297 for svc in $undo; do
2298 /sbin/init.d/$svc stop
2308 #-- stops services in reverse
2311 for svc in $svcs; do
2312 reverse="$svc $reverse"
2315 for svc in $reverse; do
2316 /sbin/init.d/$svc stop || rc=$?
2322 start_msg) echo "Starting $svcs";;
2323 stop_msg) echo "Stopping $svcs";;
2326 *) echo "usage: $0 {start|stop|start_msg|stop_msg}"
2332 pp_sd_service_script () {
2333 typeset svc config_file config_value scriptpath out
2336 scriptpath="/sbin/init.d/$svc"
2338 config_file=${pp_sd_config_file:-/etc/rc.config.d/$svc}
2339 sd_config_var=`echo run-$svc | tr '[a-z]-' '[A-Z]_'`
2340 sd_config_value=${pp_sd_default_start:-0}
2341 pp_load_service_vars "$svc"
2343 test -n "$user" -a x"$user" != x"root" &&
2344 cmd="SHELL=/usr/bin/sh /usr/bin/su $user -c \"exec `echo $cmd | sed -e 's,[$\\\`],\\&,g'`\""
2345 if test -z "$pidfile"; then
2346 pidfile="/var/run/$svc.pid"
2347 cmd="$cmd & echo \$! > \$pidfile"
2350 pp_debug "config file is $config_file"
2352 pp_add_file_if_missing $scriptpath run 755
2353 pp_add_file_if_missing $config_file run 644 v
2355 cat <<-. >> $pp_destdir$config_file
2357 # Controls whether the $svc service is started
2358 $sd_config_var=$sd_config_value
2361 if test ! -f $pp_destdir$scriptpath; then
2362 cat <<-. > $pp_destdir$scriptpath
2364 # generated by pp $pp_version
2368 config_file="$config_file"
2375 test \${$sd_config_var:-0} -eq 0
2379 if test ! -s "$pidfile"; then
2380 echo "Unable to stop $svc (no pid file)"
2383 read pid < "$pidfile"
2384 if kill -0 "$pid" 2>/dev/null; then
2385 if kill -${stop_signal:-TERM} "$pid"; then
2389 echo "Unable to stop $svc"
2400 if test ! -s "$pidfile"; then
2403 read pid < "$pidfile"
2404 kill -0 "$pid" 2>/dev/null
2409 start_msg) echo "Starting the $svc service";;
2410 stop_msg) echo "Stopping the $svc service";;
2412 if test -f "$config_file"; then
2415 if pp_disabled; then
2417 elif pp_running; then
2418 echo "$svc already running";
2421 echo "$svc started";
2422 # rc(1M) says we should exit 4, but nobody expects it!
2427 stop) if pp_stop; then
2428 echo "$svc stopped";
2433 *) echo "usage: $0 {start|stop|start_msg|stop_msg}"
2440 pp_sd_make_service () {
2441 typeset level startpriority stoppriority startlevels stoplevels
2445 svcvar=`pp_makevar $svc`
2447 # TODO: Figure out why this check is here
2448 #-- don't do anything if the script exists
2449 #if test -s "$pp_destdir/sbin/init.d/$svc"; then
2450 # pp_error "$pp_destdir/sbin/init.d/$svc exists"
2454 # symlink the script, depending on the priorities chosen
2455 eval startpriority='${pp_sd_startpriority_'$svcvar'}'
2456 eval stoppriority='${pp_sd_stoppriority_'$svcvar'}'
2457 test -z "$startpriority" && startpriority="${pp_sd_startpriority:-50}"
2458 test -z "$stoppriority" && stoppriority="${pp_sd_stoppriority:-50}"
2460 eval startlevels='${pp_sd_startlevels_'$svcvar'}'
2461 test -z "$startlevels" && startlevels="$pp_sd_startlevels"
2463 eval stoplevels='${pp_sd_stoplevels_'$svcvar'}'
2464 test -z "$stoplevels" && stoplevels="$pp_sd_stoplevels"
2466 # create the script and config file
2467 pp_sd_service_script $svc
2469 # fix the priority up
2470 case "$startpriority" in
2472 ??) startpriority=0$startpriority;;
2473 ?) startpriority=00$startpriority;;
2475 case "$stoppriority" in
2477 ??) stoppriority=0$stoppriority;;
2478 ?) stoppriority=00$stoppriority;;
2481 if test x"$stoplevels" = x"auto"; then
2483 test -z "$startlevels" || for level in $startlevels; do
2484 stoplevels="$stoplevels `expr $level - 1`"
2488 # create the symlinks
2489 test -z "$startlevels" || for level in $startlevels; do
2491 "/sbin/init.d/$svc" \
2492 "/sbin/rc$level.d/S$startpriority$svc"
2494 test -z "$stoplevels" || for level in $stoplevels; do
2496 "/sbin/init.d/$svc" \
2497 "/sbin/rc$level.d/K$stoppriority$svc"
2507 script="$pp_wrkdir/control.$ctrl.$cpt"
2511 echo "exit 0" >> $script
2512 /usr/bin/chmod +x $script
2513 echo " $ctrl $script"
2517 typeset psf cpt svc outfile
2522 echo "layout_version 1.0" >>$psf
2527 tag $pp_sd_vendor_tag
2528 title "${pp_sd_vendor:-$vendor}"
2534 vendor_tag $pp_sd_vendor_tag
2537 copyright "$copyright"
2545 test -n "$description" \
2546 && echo $description > $pp_wrkdir/description \
2548 description < $pp_wrkdir/description
2551 # make convenience service groups
2552 if test -n "$pp_service_groups"; then
2553 for grp in $pp_service_groups; do
2554 pp_sd_service_group_script \
2555 $grp "`pp_service_get_svc_group $grp`"
2559 for cpt in $pp_components; do
2562 tag ${pp_sd_fileset_tag:-$cpt}
2563 title "${summary:-cpt}"
2567 #-- make sure services are shut down during uninstall
2568 if test $cpt = run -a -n "$pp_services"; then
2569 for svc in $pp_services; do
2570 pp_prepend $pp_wrkdir/%preun.$cpt <<-.
2571 /sbin/init.d/$svc stop
2576 #-- we put the post/preun code into configure/unconfigure
2577 # and not postinstall/preremove, because configure/unconfigure
2578 # scripts are run on the hosts where the package is installed,
2579 # not loaded (a subtle difference).
2580 test -s $pp_wrkdir/%pre.$cpt &&
2581 pp_sd_control checkinstall $cpt $pp_wrkdir/%pre.$cpt >> $psf
2582 test -s $pp_wrkdir/%post.$cpt &&
2583 pp_sd_control configure $cpt $pp_wrkdir/%post.$cpt >> $psf
2584 test -s $pp_wrkdir/%preun.$cpt &&
2585 pp_sd_control unconfigure $cpt $pp_wrkdir/%preun.$cpt >> $psf
2586 test -s $pp_wrkdir/%postun.$cpt &&
2587 pp_sd_control postremove $cpt $pp_wrkdir/%postun.$cpt >> $psf
2588 test -s $pp_wrkdir/%check.$cpt &&
2589 pp_sd_control checkinstall $cpt $pp_wrkdir/%check.$cpt >> $psf
2591 if test $cpt = run -a -n "$pp_services"; then
2592 for svc in $pp_services; do
2593 #-- service names are 10 chars max on hpux
2594 case "$svc" in ???????????*)
2595 pp_warn "service name '$svc' is too long for hpux";;
2597 pp_sd_make_service $svc >> $psf
2599 #pp_sd_make_service_config
2602 pp_sd_write_files < $pp_wrkdir/%files.$cpt >> $psf
2604 #-- end fileset clause
2611 #-- end product clause
2616 $pp_opt_debug && cat $psf >&2
2618 test -s $pp_wrkdir/%fixup && . $pp_wrkdir/%fixup
2620 outfile=`pp_backend_sd_names`
2621 if pp_verbose ${pp_sd_sudo} /usr/sbin/swpackage \
2623 -x run_as_superuser=false \
2624 -x media_type=tape \
2625 @ $pp_wrkdir/$outfile
2627 pp_verbose ${pp_sd_sudo} /usr/sbin/swlist -l file -s $pp_wrkdir/$outfile
2629 pp_error "swpackage failed"
2633 pp_backend_sd_cleanup () {
2637 pp_backend_sd_names () {
2638 echo "$name-$version.$pp_sd_arch_std.depot"
2641 pp_backend_sd_install_script () {
2642 typeset pkgname platform
2644 pkgname=`pp_backend_sd_names`
2645 platform="`pp_backend_sd_probe`"
2648 pp_install_script_common
2652 test x"\$*" = x"all" && set -- $pp_components
2659 test \$# -eq 0 && usage
2664 test \$# -eq 0 || usage \$op
2665 echo "$pp_components"
2668 test \$# -eq 0 || usage \$op
2672 test \$# -ge 1 || usage \$op
2673 echo \${PP_PKGDESTDIR:-.}/$pkgname
2676 test \$# -ge 1 || usage \$op
2677 verbose /usr/sbin/swinstall -x verbose=0 \
2678 -s \${PP_PKGDESTDIR:-\`pwd\`}/$pkgname \
2679 \`cpt_to_tags "\$@"\`
2682 test \$# -ge 1 || usage \$op
2683 verbose /usr/sbin/swremove -x verbose=0 \
2684 \`cpt_to_tags "\$@"\`
2687 test \$# -ge 1 || usage \$op
2691 verbose /sbin/init.d/\$svc \$op
2692 [ \$? -eq 4 -o \$? -eq 0 ] || ec=1
2706 pp_backend_sd_probe () {
2707 echo "${pp_sd_os_std}-${pp_sd_arch_std}"
2710 pp_backend_sd_vas_platforms () {
2711 case "`pp_backend_sd_probe`" in
2712 hpux*-hppa) echo hpux-pa;;
2713 hpux*-ia64) echo hpux-ia64 hpux-pa;;
2714 *) pp_die "unknown system `pp_backend_sd_probe`";;
2718 pp_backend_sd_init_svc_vars () {
2721 pp_backend_sd_function () {
2723 pp_mkgroup) cat <<'.';;
2724 /usr/sbin/groupmod "$1" 2>/dev/null ||
2725 /usr/sbin/groupadd "$1"
2727 pp_mkuser:depends) echo pp_mkgroup;;
2728 pp_mkuser) cat <<'.';;
2729 pp_mkgroup "${2:-$1}" || return 1
2732 -d "${3:-/nonexistent}" \
2733 -s "${4:-/bin/false}" \
2736 pp_havelib) cat <<'.';;
2737 for pp_tmp_dir in `echo /usr/lib${3:+:$3} | tr : ' '`; do
2738 test -r "$pp_tmp_dir/lib$1${2:+.$2}.sl" && return 0
2746 pp_platforms="$pp_platforms solaris"
2748 pp_backend_solaris_detect () {
2749 test x"$1" = x"SunOS"
2752 pp_backend_solaris_init () {
2753 pp_solaris_category=
2754 pp_solaris_istates="s S 1 2 3" # run-states when install is ok
2755 pp_solaris_rstates="s S 1 2 3" # run-states when remove is ok
2757 pp_solaris_copyright=
2760 pp_solaris_package_arch=auto
2762 pp_solaris_detect_os
2763 pp_solaris_detect_arch
2767 #-- readlink not reliably available on Solaris
2768 pp_readlink_fn=pp_ls_readlink
2771 pp_solaris_detect_os () {
2774 osrel=`/usr/bin/uname -r`
2776 5.[0-6]) pp_solaris_os="sol2${osrel#5.}";;
2777 5.*) pp_solaris_os="sol${osrel#5.}";;
2779 test -z "$pp_solaris_os" &&
2780 pp_warn "can't determine OS suffix from uname -r"
2784 pp_solaris_detect_arch () {
2785 pp_solaris_arch=`/usr/bin/optisa amd64 sparcv9 i386 sparc`
2786 [ -z "$pp_solaris_arch" ] &&
2787 pp_error "can't determine processor architecture"
2788 case "$pp_solaris_arch" in
2789 amd64) pp_solaris_arch_std=x86_64;;
2790 i386) pp_solaris_arch_std=i386;;
2791 sparcv9) pp_solaris_arch_std=sparc64;;
2792 sparc) pp_solaris_arch_std=sparc;;
2793 *) pp_solaris_arch_std=unknown;;
2797 pp_solaris_is_request_script_necessary () {
2798 typeset has_optional_services
2800 has_optional_services=no
2801 for _svc in $pp_services; do
2802 pp_load_service_vars $_svc
2803 if test "$optional" = "yes"; then
2804 has_optional_services=yes
2808 # If the package has no optional services and only one component, don't
2809 # create a request script at all.
2810 if test "$has_optional_services" = "no" &&
2811 test `echo $pp_components | wc -w` -eq 1; then
2818 pp_solaris_request () {
2821 #-- The common part of the request script contains the ask() function
2822 # and resets the CLASSES list to empty
2826 ans=`ckyorn -d "$1" \
2827 -p "Do you want to $2"` \
2829 case "$ans" in y*|Y*) return 0;; *) return 1;; esac
2833 #-- each of our components adds itself to the CLASSES list
2834 for _cmp in $pp_components; do
2837 doc) echo 'ask y "install the documentation files" &&';;
2838 dev) echo 'ask y "install the development files" &&';;
2839 dbg) echo 'ask n "install the diagnostic files" &&';;
2841 echo ' CLASSES="$CLASSES '$_cmp'"'
2844 #-- the request script writes the CLASSES var to its output
2846 echo "CLASSES=$CLASSES" > $1
2849 if test -n "$pp_services"; then
2851 for _svc in $pp_services; do
2852 pp_load_service_vars $_svc
2853 if test "$enable" = "yes"; then
2858 if test "$optional" = "yes"; then
2859 echo 'ask '$_default_prompt' "install '$_svc' service" &&'
2861 echo ' SERVICES="$SERVICES '$_svc'"'
2863 echo 'echo "SERVICES=$SERVICES" >> $1'
2868 pp_solaris_procedure () {
2871 #-- $2 for $1 component of $name
2872 case " \$CLASSES " in *" $1 "*)
2880 pp_solaris_depend () {
2882 while read _name _vers; do
2883 if test -n "$_name"; then
2884 echo "P $_name $_name"
2885 test -n "$_vers" && echo " $_vers"
2890 pp_solaris_space() {
2891 echo "$2:$3:$1" >> $pp_wrkdir/space.cumulative
2894 pp_solaris_sum_space () {
2895 if test -s $pp_wrkdir/space.cumulative; then
2896 sort -t: +2 < $pp_wrkdir/space.cumulative |
2897 awk -F: 'NR==1{n=$3}{if($3==n){b+=$1;i+=$2}else{print n" "b" "i;b=$1;i=$2;n=$3}}END{print n" "b" "i}' > $pp_wrkdir/space
2901 pp_solaris_proto () {
2902 typeset t m o g f p st
2905 while read t m o g f p st; do
2906 if test x"$o" = x"-"; then
2909 if test x"$g" = x"-"; then
2913 f) test x"$m" = x"-" && m=444
2915 *v*) echo "v $1 $p=$pp_destdir$p $m $o $g";;
2916 *) echo "f $1 $p=$pp_destdir$p $m $o $g";;
2918 if test -r "$pp_destdir$p"; then
2919 #-- Use file to record ABI types seen
2920 case "`file "$pp_destdir$p"`" in
2921 *"ELF 32"*80386*) abi=i386;;
2922 *"ELF 64"*AMD*) abi=x86_64;;
2923 *"ELF 32"*SPARC*) abi=sparc;;
2924 *"ELF 64"*SPARC*) abi=sparc64;;
2927 if test -n "$abi"; then
2928 pp_add_to_list pp_solaris_abis_seen $abi
2932 d) test x"$m" = x"-" && m=555
2933 echo "d $1 $p $m $o $g"
2935 s) test x"$m" = x"-" && m=777
2936 test x"$m" = x"777" ||
2937 pp_warn "$p: invalid mode $m for symlink, should be 777 or -"
2938 echo "s $1 $p=$st $m $o $g"
2944 pp_backend_solaris () {
2945 typeset _cmp _svc _grp
2947 prototype=$pp_wrkdir/prototype
2950 pkginfo=$pp_wrkdir/pkginfo
2952 echo "i pkginfo=$pkginfo" >> $prototype
2954 case "${pp_solaris_name:-$name}" in
2956 pp_error "Package name '${pp_solaris_name:-$name}'" \
2957 "cannot start with a number"
2960 pp_warn "Package name '${pp_solaris_name:-$name}'" \
2961 "too long for Solaris 2.6 or 2.7 (max 9 characters)"
2964 pp_warn "Package name '${pp_solaris_name:-$name}'" \
2965 "too long for 2.7 Solaris (max 9 characters)"
2969 #-- generate the package info file
2970 echo "VERSION=$version" >> $pkginfo
2971 echo "PKG=${pp_solaris_name:-$name}" >> $pkginfo
2972 echo "CLASSES=$pp_components" >> $pkginfo
2973 echo "BASEDIR=/" >> $pkginfo
2974 echo "NAME=$name $version" >> $pkginfo
2975 echo "CATEGORY=${pp_solaris_category:-application}" >> $pkginfo
2977 desc="${pp_solaris_desc:-$description}"
2979 echo "DESC=$desc" >> $pkginfo
2981 test -n "$pp_solaris_rstates" &&
2982 echo "RSTATES=$pp_solaris_rstates" >> $pkginfo
2983 test -n "$pp_solaris_istates" &&
2984 echo "ISTATES=$pp_solaris_istates" >> $pkginfo
2985 test -n "${pp_solaris_vendor:-$vendor}" &&
2986 echo "VENDOR=${pp_solaris_vendor:-$vendor}" >> $pkginfo
2988 if test -n "${pp_solaris_copyright:-$copyright}"; then
2989 echo "${pp_solaris_copyright:-$copyright}" > $pp_wrkdir/copyright
2990 echo "i copyright=$pp_wrkdir/copyright" >> $prototype
2993 #-- scripts to run before and after install
2994 : > $pp_wrkdir/postinstall
2995 : > $pp_wrkdir/preremove
2996 for _cmp in $pp_components; do
2997 #-- add the preinstall scripts in definition order
2998 if test -s $pp_wrkdir/%pre.$_cmp; then
2999 pp_solaris_procedure $_cmp preinst < $pp_wrkdir/%pre.$_cmp \
3000 >> $pp_wrkdir/preinstall
3002 #-- add the postinstall scripts in definition order
3003 if test -s $pp_wrkdir/%post.$_cmp; then
3004 pp_solaris_procedure $_cmp postinst < $pp_wrkdir/%post.$_cmp \
3005 >> $pp_wrkdir/postinstall
3007 #-- add the preremove rules in reverse definition order
3008 if test -s $pp_wrkdir/%preun.$_cmp; then
3009 pp_solaris_procedure $_cmp preremove < $pp_wrkdir/%preun.$_cmp |
3010 pp_prepend $pp_wrkdir/preremove
3012 #-- Add the check script in definition order
3013 if test -s $pp_wrkdir/%check.$_cmp; then
3014 pp_solaris_procedure $_cmp checkinstall \
3015 < $pp_wrkdir/%check.$_cmp \
3016 >> $pp_wrkdir/checkinstall
3018 #-- All dependencies are merged together for Solaris pkgs
3019 test -s $pp_wrkdir/%depend.$_cmp &&
3020 pp_solaris_depend < $pp_wrkdir/%depend.$_cmp > $pp_wrkdir/depend
3024 if pp_solaris_is_request_script_necessary; then
3025 pp_solaris_request > $pp_wrkdir/request
3028 test -n "$pp_services" &&
3029 for _svc in $pp_services; do
3030 pp_load_service_vars $_svc
3031 pp_solaris_make_service $_svc
3032 pp_solaris_install_service $_svc | pp_prepend $pp_wrkdir/postinstall
3033 pp_prepend $pp_wrkdir/preremove <<-.
3034 /etc/init.d/$_svc stop >/dev/null 2>/dev/null
3038 test -n "$pp_service_groups" &&
3039 for _grp in $pp_service_groups; do
3040 pp_solaris_make_service_group \
3041 $_grp "`pp_service_get_svc_group $_grp`"
3044 #-- if installf was used; we need to indicate a termination
3045 grep installf $pp_wrkdir/postinstall >/dev/null &&
3046 echo 'installf -f $PKGINST' >> $pp_wrkdir/postinstall
3048 pp_solaris_sum_space
3050 # NB: pkginfo and copyright are added earlier
3051 for f in compver depend space checkinstall \
3052 preinstall request postinstall \
3053 preremove postremove; do
3054 if test -s $pp_wrkdir/$f; then
3056 *install|*remove|request)
3057 # turn scripts into a proper shell scripts
3058 mv $pp_wrkdir/$f $pp_wrkdir/$f.tmp
3060 echo "# $f script for ${pp_solaris_name:-$name}-$version"
3061 cat $pp_wrkdir/$f.tmp
3062 echo "exit 0"; } > $pp_wrkdir/$f
3063 chmod +x $pp_wrkdir/$f
3064 rm -f $pp_wrkdir/$f.tmp
3067 if $pp_opt_debug; then
3068 pp_debug "contents of $f:"
3069 cat $pp_wrkdir/$f >&2
3071 echo "i $f=$pp_wrkdir/$f" >> $prototype
3075 #-- create the prototype file which lists the files to install
3076 # do this as late as possible because files could be added
3077 pp_solaris_abis_seen=
3078 for _cmp in $pp_components; do
3079 pp_solaris_proto $_cmp < $pp_wrkdir/%files.$_cmp
3082 if test x"$pp_solaris_package_arch" = x"auto"; then
3083 if pp_contains "$pp_solaris_abis_seen" sparc64; then
3084 pp_solaris_package_arch_std="sparc64"
3085 echo "ARCH=sparcv9" >> $pkginfo
3086 elif pp_contains "$pp_solaris_abis_seen" sparc; then
3087 pp_solaris_package_arch_std="sparc"
3088 echo "ARCH=sparc" >> $pkginfo
3089 elif pp_contains "$pp_solaris_abis_seen" x86_64; then
3090 pp_solaris_package_arch_std="x86_64"
3091 echo "ARCH=amd64" >> $pkginfo
3092 elif pp_contains "$pp_solaris_abis_seen" i386; then
3093 pp_solaris_package_arch_std="i386"
3094 echo "ARCH=i386" >> $pkginfo
3096 pp_warn "No ELF files found: not supplying an ARCH type"
3097 pp_solaris_package_arch_std="noarch"
3100 pp_solaris_package_arch_std="$pp_solaris_package_arch"
3101 echo "ARCH=$pp_solaris_package_arch" >> $pkginfo
3104 mkdir $pp_wrkdir/pkg
3108 if $pp_opt_debug; then
3109 echo "$pkginfo::"; cat $pkginfo
3110 echo "$prototype::"; cat $prototype
3113 pkgmk -a $pp_solaris_arch -d $pp_wrkdir/pkg \
3114 -f $prototype || { error "pkgmk failed"; return; }
3115 pkgtrans -s $pp_wrkdir/pkg \
3116 $pp_wrkdir/`pp_backend_solaris_names` \
3117 ${pp_solaris_name:-$name} \
3118 || { error "pkgtrans failed"; return; }
3121 pp_backend_solaris_cleanup () {
3125 pp_backend_solaris_names () {
3126 echo ${pp_solaris_name:-$name}-$version-${pp_solaris_package_arch_std:-$pp_solaris_arch}.pkg
3129 pp_backend_solaris_install_script () {
3130 typeset pkgname platform
3132 platform="${pp_solaris_os:-solaris}-${pp_solaris_package_arch_std:-$pp_solaris_arch}"
3135 pp_install_script_common
3136 pkgname=`pp_backend_solaris_names`
3139 tmpnocheck=/tmp/nocheck\$\$
3140 tmpresponse=/tmp/response\$\$
3141 trap 'rm -f \$tmpnocheck \$tmpresponse' 0
3144 cat <<-.. > \$tmpresponse
3146 SERVICES=$pp_services
3148 cat <<-.. > \$tmpnocheck
3163 test \$# -eq 0 && usage
3168 test \$# -eq 0 || usage \$op
3169 echo "$pp_components"
3172 test \$# -eq 0 || usage \$op
3176 test \$# -ge 1 || usage \$op
3177 echo \${PP_PKGDESTDIR:-.}/$pkgname
3180 test \$# -ge 1 || usage \$op
3182 verbose /usr/sbin/pkgadd -n -d \${PP_PKGDESTDIR:-.}/$pkgname \
3185 ${pp_solaris_name:-$name}
3188 test \$# -ge 1 || usage \$op
3190 verbose /usr/sbin/pkgrm -n \
3192 ${pp_solaris_name:-$name}
3195 test \$# -ge 1 || usage \$op
3199 verbose /etc/init.d/\$svc \$op || ec=1
3213 pp_solaris_dynlib_depend () {
3214 xargs ldd 2>/dev/null |
3215 sed -e '/^[^ ]*:$/d' -e 's,.*=>[ ]*,,' -e 's,^[ ]*,,' |
3217 grep -v '^/usr/platform/' | (
3221 if [ $# -gt 32 ]; then
3227 [ $# -gt 0 ] && pkgchk -l "$@"
3229 awk '/^Current status:/{p=0} p==1 {print $1} /^Referenced by/ {p=1}' |
3231 xargs -l32 pkginfo -x |
3232 awk 'NR % 2 == 1 { name=$1; } NR%2 == 0 { print name, $2 }'
3235 pp_solaris_add_dynlib_depends () {
3237 tmp=$pp_wrkdir/tmp.dynlib
3239 for _cmp in $pp_components; do
3240 awk '{print destdir $6}' destdir="$pp_destdir" \
3241 < $pp_wrkdir/%files.$_cmp |
3242 pp_solaris_dynlib_depend > $tmp
3243 if test -s $tmp; then
3244 cat $tmp >> $pp_wrkdir/%depend.$_cmp
3250 pp_backend_solaris_probe () {
3251 echo "${pp_solaris_os}-${pp_solaris_arch_std}"
3254 pp_backend_solaris_vas_platforms () {
3255 case `pp_backend_solaris_probe` in
3256 sol10-sparc* | sol9-sparc* | sol8-sparc*)
3257 echo solaris8-sparc solaris7-sparc solaris26-sparc;;
3258 sol7-sparc*) echo solaris7-sparc solaris26-sparc;;
3259 sol26-sparc*) echo solaris26-sparc;;
3260 sol8-*86) echo solaris8-x86;;
3261 sol10-*86 | sol10-x86_64)
3262 echo solaris10-x64 solaris8-x86;;
3263 *) pp_die "unknown system `pp_backend_solaris_probe`";;
3266 pp_backend_solaris_function() {
3268 pp_mkgroup) cat<<'.';;
3269 /usr/sbin/groupmod "$1" 2>/dev/null && return 0
3270 /usr/sbin/groupadd "$1"
3272 pp_mkuser:depends) echo pp_mkgroup;;
3273 pp_mkuser) cat<<'.';;
3274 id "$1" >/dev/null 2>/dev/null && return 0
3275 pp_mkgroup "${2:-$1}" || return 1
3278 -d "${3:-/nonexistent}" \
3279 -s "${4:-/bin/false}" \
3286 pp_backend_solaris_init_svc_vars () {
3287 pp_solaris_smf_category=
3288 pp_solaris_service_shell=/sbin/sh
3291 pp_solaris_init_svc () {
3292 smf_category=${pp_solaris_smf_category:-application}
3296 solaris_stop_signal=
3297 solaris_sysv_init_start=S70 # invocation order for start scripts
3298 solaris_sysv_init_kill=K30 # invocation order for kill scripts
3299 solaris_sysv_init_start_states="2" # states to install start link
3300 solaris_sysv_init_kill_states="S 0 1" # states to install kill link
3303 # To have the service be installed to start automatically,
3305 # solaris_sysv_init_start_states="S 0 1 2"
3311 f=/var/svc/manifest/$smf_category/$1
3312 pp_add_file_if_missing $f ||
3315 cat <<-. >$pp_destdir$f
3316 <?xml version="1.0"?>
3319 Generated by PolyPackage $pp_version
3322 <service name='$smf_category/$1'
3324 version='$smf_version'>
3328 <exec_method type='method' name='start'
3330 timeout_seconds='60'>
3332 <method_credential user='${solaris_user:-$user}' />
3336 <exec_method type='method' name='stop'
3337 exec=':kill -${solaris_stop_signal:-$stop_signal}'>
3339 <method_credential user='${solaris_user:-$user}' />
3347 pp_solaris_make_service_group () {
3348 typeset group out file svcs svc
3352 file="/etc/init.d/$group"
3353 out="$pp_destdir$file"
3355 #-- return if the script is supplued already
3356 pp_add_file_if_missing "$file" run 755 || return 0
3358 echo "#! /sbin/sh" > $out
3359 echo "# polypkg service group script for these services:" >> $out
3360 echo "svcs=\"$svcs\"" >> $out
3364 #-- starts services in order.. stops them all if any break
3367 for svc in $svcs; do
3368 if /etc/init.d/$svc start; then
3371 if test -n "$undo"; then
3372 for svc in $undo; do
3373 /etc/init.d/$svc stop
3382 #-- stops services in reverse
3385 for svc in $svcs; do
3386 reverse="$svc $reverse"
3389 for svc in $reverse; do
3390 /etc/init.d/$svc stop || rc=$?
3395 #-- returns true only if all services return true status
3398 for svc in $svcs; do
3399 /etc/init.d/$svc status || rc=$?
3408 restart) pp_stop && pp_start;;
3409 *) echo "usage: $0 {start|stop|restart|status}" >&2; exit 1;;
3415 pp_solaris_make_service () {
3416 typeset file out _cmd svc
3419 file="/etc/init.d/$svc"
3420 out="$pp_destdir$file"
3423 #-- return if we don't need to create the init script
3424 pp_add_file_if_missing "$file" run 755 ||
3427 echo "#! /sbin/sh" >$out
3428 echo "#-- This service init file generated by polypkg" >>$out
3430 #-- construct a start command that builds a pid file as needed
3431 # and forks the daemon
3433 if test -z "$pidfile"; then
3434 # The service does not define a pidfile, so we have to make
3435 # our own up. On Solaris systems where there is no /var/run
3436 # we must use /tmp to guarantee the pid files are removed after
3439 pp_piddir="/var/run"
3440 test -d "\$pp_piddir/." || pp_piddir="/tmp"
3441 pidfile="\$pp_piddir/$svc.pid"
3443 _cmd="$cmd & echo \$! > \$pidfile"
3445 # The service is able to write its own PID file
3451 if test "${user:-root}" != "root"; then
3452 _cmd="su $user -c exec $_cmd";
3456 stop_signal="${stop_signal:-TERM}"
3459 # generated command to run $svc as a daemon process
3460 pp_exec () { $_cmd; }
3463 #-- write the invariant section of the init script
3466 # returns true if $svc is running
3468 test -r "$pidfile" &&
3469 read pid junk < "$pidfile" &&
3470 test ${pid:-0} -gt 1 &&
3471 kill -0 "$pid" 2>/dev/null
3474 # prints a message describing $svc's running state
3477 echo "service $svc is running (pid $pid)"
3479 elif test -f "$pidfile"; then
3480 echo "service $svc is not running, but pid file exists"
3483 echo "service $svc is not running"
3491 echo "service $svc already running" >&2
3494 echo "starting $svc... \c"
3506 echo "stopping $svc... \c"
3507 if kill -$stop_signal $pid; then
3515 echo "service $svc already stopped" >&2
3525 restart) pp_stop && pp_start;;
3526 *) echo "usage: $0 {start|stop|restart|status}" >&2; exit 1;;
3532 pp_solaris_install_service () {
3534 s="${solaris_sysv_init_start}$1"
3535 k="${solaris_sysv_init_kill}$1"
3537 echo 'case " $SERVICES " in *" '$1' "*)'
3539 if [ "x${PKG_INSTALL_ROOT}" != "x" ]; then
3540 if [ -x ${PKG_INSTALL_ROOT}/usr/sbin/svcadm ]; then
3541 echo "/usr/sbin/svccfg import '$pp_svc_xml_file' 2>/dev/null" >> ${PKG_INSTALL_ROOT}/var/svc/profile/upgrade
3543 test -n "${solaris_sysv_init_start_states}" &&
3544 for state in ${solaris_sysv_init_start_states}; do
3545 l="/etc/rc$state.d/$s"
3547 echo "installf -c run \$PKGINST \$PKG_INSTALL_ROOT$l=../init.d/$1 s"
3548 pp_solaris_space /etc/rc$state.d 0 1
3550 test -n "${solaris_sysv_init_kill_states}" &&
3551 for state in ${solaris_sysv_init_kill_states}; do
3552 l="/etc/rc$state.d/$k"
3554 echo "installf -c run \$PKGINST \$PKG_INSTALL_ROOT$l=../init.d/$1 s"
3555 pp_solaris_space /etc/rc$state.d 0 1
3560 if [ -x /usr/sbin/svcadm ]; then
3561 echo "Registering '$1' with SMF"
3562 /usr/sbin/svcadm disable -s '$1' 2>/dev/null
3563 /usr/sbin/svccfg delete '$1' 2>/dev/null
3564 /usr/sbin/svccfg import '$pp_svc_xml_file' 2>/dev/null
3566 test -n "${solaris_sysv_init_start_states}" &&
3567 for state in ${solaris_sysv_init_start_states}; do
3568 l="/etc/rc$state.d/$s"
3570 echo "installf -c run \$PKGINST \$PKG_INSTALL_ROOT$l=../init.d/$1 s"
3571 pp_solaris_space /etc/rc$state.d 0 1
3573 test -n "${solaris_sysv_init_kill_states}" &&
3574 for state in ${solaris_sysv_init_kill_states}; do
3575 l="/etc/rc$state.d/$k"
3577 echo "installf -c run \$PKGINST \$PKG_INSTALL_ROOT$l=../init.d/$1 s"
3578 pp_solaris_space /etc/rc$state.d 0 1
3584 pp_platforms="$pp_platforms deb"
3586 pp_backend_deb_detect () {
3587 test -f /etc/debian_version
3590 pp_deb_cmp_full_name () {
3592 prefix="${pp_deb_name:-$name}"
3594 run) echo "${prefix}" ;;
3595 dbg) echo "${prefix}-${pp_deb_dbg_pkgname}";;
3596 dev) echo "${prefix}-${pp_deb_dev_pkgname}";;
3597 doc) echo "${prefix}-${pp_deb_doc_pkgname}";;
3598 *) pp_error "unknown component '$1'";
3602 pp_backend_deb_init () {
3603 pp_deb_dpkg_version="2.0"
3609 pp_deb_maintainer=support@quest.com
3612 pp_deb_control_description=
3615 pp_deb_dbg_pkgname="dbg"
3616 pp_deb_dev_pkgname="dev"
3617 pp_deb_doc_pkgname="doc"
3618 pp_deb_section=contrib # Free software that depends on non-free software
3620 # Detect the host architecture
3623 # Make sure any programs we require are installed
3624 pp_deb_check_required_programs
3626 # Set generated/interrogated platforms variables
3627 pp_deb_munge_description
3630 pp_deb_check_required_programs () {
3631 local p needed notfound ok
3633 for prog in dpkg dpkg-deb install md5sum fakeroot
3635 if which $prog 2>/dev/null >/dev/null; then
3636 pp_debug "$prog: found"
3638 pp_debug "$prog: not found"
3640 dpkg|dpkg-deb) p=dpkg;;
3641 install|md5sum) p=coreutils;;
3642 fakeroot) p=fakeroot;;
3643 *) pp_die "unexpected dpkg tool $prog";;
3645 notfound="$notfound $prog"
3646 pp_contains "$needed" "$p" || needed="$needed $p"
3649 if [ -n "$notfound" ]; then
3650 pp_error "cannot find these programs: $notfound"
3651 pp_error "please install these packages: $needed"
3655 pp_deb_munge_description () {
3656 # Insert a leading space on each line, replace blank lines with a
3657 #space followed by a full-stop.
3658 pp_deb_control_description=`echo ${pp_deb_description:-$description} | \
3659 sed "s,^\(.*\)$, \1, " \
3660 | sed "s,^[ \t]*$, .,g"`
3664 pp_deb_detect_arch () {
3665 pp_deb_arch=`dpkg --print-architecture`
3666 pp_deb_arch_std=`uname -m`
3669 pp_deb_make_control() {
3670 package_name=`pp_deb_cmp_full_name "$1"`
3672 Package: ${package_name}
3673 Version: ${pp_deb_version:-$version}-${pp_deb_release:-1}
3674 Section: ${pp_deb_section:-contrib}
3676 Architecture: ${pp_deb_arch}
3677 Maintainer: ${pp_deb_maintainer:-$maintainer}
3678 Description: ${pp_deb_summary:-$summary}
3679 ${pp_deb_control_description}
3681 if test -s $pp_wrkdir/%depend."$1"; then
3682 sed -ne '/^[ ]*$/!s/^[ ]*/Depends: /p' \
3683 < $pp_wrkdir/%depend."$1"
3687 pp_deb_make_md5sums() {
3688 local cmp="$1"; shift
3691 pkg_dir=$pp_wrkdir/`pp_deb_cmp_full_name $cmp`
3692 (cd $pkg_dir && md5sum "$@") > $pkg_dir/DEBIAN/md5sums ||
3693 pp_error "cannot make md5sums"
3696 pp_deb_make_package_maintainer_script() {
3701 # See if we need to create this script at all
3706 cat <<-. >$output || pp_error "Cannot create $output"
3709 # Generated by PolyPackage $pp_version
3713 cat $source >> "$output" || pp_error "Cannot append to $output"
3716 chmod 755 "$output" || pp_error "Cannot chmod $output"
3720 pp_deb_handle_services() {
3723 #-- add service start/stop code
3724 if test -n "$pp_services"; then
3725 #-- record the uninstall commands in reverse order
3726 for svc in $pp_services; do
3727 pp_load_service_vars $svc
3729 # Create init script (unless one exists)
3730 pp_deb_service_make_init_script $svc
3732 #-- append %post code to install the svc
3733 test x"yes" = x"$enable" &&
3734 cat<<-. >> $pp_wrkdir/%post.run
3735 # Install the service links
3736 /usr/sbin/update-rc.d $svc defaults
3739 #-- prepend %preun code to stop svc
3740 cat<<-. | pp_prepend $pp_wrkdir/%preun.run
3741 # Stop the $svc service
3742 if test -x /usr/sbin/invoke-rc.d; then
3743 /usr/sbin/invoke-rc.d $svc stop
3745 /etc/init.d/$svc stop
3747 # Remove the service links
3748 /usr/sbin/update-rc.d -f $svc remove
3751 #pp_deb_service_remove_common | pp_prepend $pp_wrkdir/%preun.run
3755 pp_deb_fakeroot () {
3756 if test -s $pp_wrkdir/fakeroot.save; then
3757 fakeroot -i $pp_wrkdir/fakeroot.save -s $pp_wrkdir/fakeroot.save "$@"
3759 fakeroot -s $pp_wrkdir/fakeroot.save "$@"
3763 pp_deb_make_DEBIAN() {
3764 local cmp="${1:-run}"
3765 local data cmp_full_name
3770 cmp_full_name=`pp_deb_cmp_full_name $cmp`
3771 data=$pp_wrkdir/$cmp_full_name
3773 # Create DEBIAN dir $data/DEBIAN
3774 mkdir -p $data/DEBIAN
3776 # Create control file
3777 pp_deb_make_control $cmp > $data/DEBIAN/control
3780 if test -f $pp_wrkdir/%conffiles.$cmp; then
3781 cp $pp_wrkdir/%conffiles.$cmp $data/DEBIAN/conffiles
3785 pp_deb_make_package_maintainer_script "$data/DEBIAN/postinst" \
3786 "$pp_wrkdir/%post.$cmp" "Post install script for $cmp_full_name"\
3790 pp_deb_make_package_maintainer_script "$data/DEBIAN/prerm" \
3791 "$pp_wrkdir/%preun.$cmp" "Pre-uninstall script for $cmp_full_name"\
3797 pp_deb_make_data() {
3798 local _l t m o g f p st data
3799 local data share_doc owner group
3801 data=$pp_wrkdir/`pp_deb_cmp_full_name $cmp`
3802 cat $pp_wrkdir/%files.${cmp} | while read t m o g f p st; do
3803 test x"$o" = x"-" && o=root
3804 test x"$g" = x"-" && g=root
3807 pp_deb_fakeroot install -D -o $o -g $g -m ${m} $pp_destdir/$p $data/$p;
3810 # File marked as "volatile". Assume this means it's a conffile
3811 # TODO: check this as admins like modified conffiles to be left
3813 echo "$p" >> $pp_wrkdir/%conffiles.$cmp
3817 pp_deb_fakeroot install -m ${m} -o $o -g $g -d $data/$p;;
3820 # Remove leading / from vars
3821 rel_p=`echo $p | sed s,^/,,`
3822 rel_st=`echo $st | sed s,^/,,`
3823 # TODO: we are always doing absolute links here. We should follow
3824 # the debian policy of relative links when in the same top-level
3826 (cd $data; ln -sf $st $rel_p);;
3827 *) pp_error "Unsupported data file type: $t";;
3831 # If no copyright file is present add one. This is a debian requirement.
3832 share_doc="/usr/share/doc/`pp_deb_cmp_full_name $cmp`"
3833 if [ ! -f "$data/$share_doc/copyright" ]
3835 echo "${pp_deb_copyright:-$copyright}" > "$pp_wrkdir/copyright"
3836 install -D -m 644 "$pp_wrkdir/copyright" "$data/$share_doc/copyright"
3843 local package_build_dir
3847 package_build_dir=$pp_wrkdir/`pp_deb_cmp_full_name $cmp`
3849 # Create package dir
3850 mkdir -p $package_build_dir
3853 pp_deb_make_data $cmp ||
3854 pp_die "Could not make DEBIAN data files for $cmp"
3856 # Make control files
3857 # must be done after copying data so conffiles are found
3858 pp_deb_make_DEBIAN $cmp ||
3859 pp_die "Could not make DEBIAN control files for $cmp"
3862 pp_deb_make_md5sums $cmp `(cd $package_build_dir;
3863 find . -type f -a -not -name DEBIAN | sed "s,^\./,,")` ||
3864 pp_die "Could not make DEBIAN md5sums for $cmp"
3871 pp_deb_handle_services $cmp
3873 for cmp in $pp_components
3875 debname=`pp_deb_name $cmp`
3881 for cmp in $pp_components
3883 debname=`pp_deb_name $cmp`
3884 # Create debian package
3885 pp_debug "Building `pp_deb_cmp_full_name $cmp` -> $output"
3886 pp_deb_fakeroot dpkg-deb \
3887 --build $pp_wrkdir/`pp_deb_cmp_full_name $cmp` \
3888 $pp_wrkdir/$debname ||
3889 pp_error "failed to create $cmp package"
3893 pp_backend_deb_cleanup () {
3899 local cmp="${1:-run}"
3900 echo `pp_deb_cmp_full_name $cmp`"_${pp_deb_version:-$version}-${pp_deb_release:-1}_${pp_deb_arch}.deb"
3902 pp_backend_deb_names () {
3903 for cmp in $pp_components
3909 pp_backend_deb_install_script () {
3910 local cmp _cmp_full_name
3913 pp_install_script_common
3918 test x"\$*" = x"all" &&
3919 set -- $pp_components
3924 for cmp in $pp_components; do
3925 echo "$cmp) echo '`pp_deb_cmp_full_name $cmp`';;"
3934 cmp_to_pathname () {
3935 test x"\$*" = x"all" &&
3936 set -- $pp_components
3941 for cmp in $pp_components; do
3942 echo "$cmp) echo \${PP_PKGDESTDIR:-.}/'`pp_deb_name $cmp`';;"
3950 test \$# -eq 0 && usage
3954 test \$# -eq 0 || usage \$op
3958 test \$# -eq 0 || usage \$op
3962 test \$# -ge 1 || usage \$op
3963 cmp_to_pathname "\$@"
3966 test \$# -ge 1 || usage \$op
3967 dpkg --install \`cmp_to_pathname "\$@"\`
3970 test \$# -ge 1 || usage \$op
3971 dpkg --remove \`cmp_to_pkgname "\$@"\`; :
3974 test \$# -ge 1 || usage \$op
3978 /etc/init.d/\$svc \$op || ec=1
3983 test \$# -eq 0 || usage \$op
3984 echo "linux-${pp_deb_arch}"
3993 pp_backend_deb_probe() {
3994 local arch distro release
3998 # /etc/debian_version exists on Debian & Ubuntu, so it's no use
3999 # to us. Use lsb_release instead.
4001 case `(lsb_release -is || echo no-lsb) 2>/dev/null` in
4009 echo unknown-$pp_deb_arch_std
4017 release=`lsb_release -rs`
4019 # If release is not numeric, use the codename
4022 release=`lsb_release -cs`
4060 # Remove trailing revision number and any dots
4061 release=`echo $release | cut -dr -f1 | tr -d .`
4065 echo $distro$release-$pp_deb_arch_std
4068 pp_backend_deb_vas_platforms () {
4069 case "$pp_deb_arch_std" in
4070 x86_64) echo "linux-x86_64.deb";; # DO NOT add linux-x86.deb here!!
4071 *86) echo "linux-x86.deb";;
4072 *) pp_die "unknown architecture ${pp_deb_arch_std}";;
4075 pp_backend_deb_init_svc_vars () {
4076 # Default multi-user runlevel on Debian is 2; 3-5 are also multi-user
4077 pp_deb_default_start_runlevels="2 3 4 5"
4078 pp_deb_default_svc_description="No description"
4081 pp_backend_deb_init_svc_vars () {
4084 start_runlevels=${pp_deb_default_start_runlevels} # == lsb default-start
4085 stop_runlevels="0 1 6" # == lsb default-stop
4086 svc_description="${pp_deb_default_svc_description}" # == lsb short descr
4089 lsb_required_start='$local_fs $network'
4095 stop_priority=50 #-- stop_priority = 100 - start_priority
4098 pp_deb_service_make_init_script () {
4100 local script=/etc/init.d/$svc
4101 local out=$pp_destdir$script
4104 pp_add_file_if_missing $script run 755 || return 0
4106 #-- start out as an empty shell script
4111 #-- determine the process name from $cmd unless $svc_process is given
4113 #_process=${svc_process:-"$1"} --? WTF
4115 #-- construct a start command that builds a pid file if needed
4117 _cmd_path=`echo $cmd | cut -d" " -f1`
4118 _cmd_name=`basename $_cmd_path`
4119 _cmd_args=`echo $cmd | cut -d" " -f2-`
4120 test x"$_cmd_path" != x"$_cmd_args" || _cmd_args=
4122 #-- generate the LSB init info
4126 # Required-Start: ${lsb_required_start}
4127 # Should-Start: ${lsb_should_start}
4128 # Required-Stop: ${lsb_required_stop}
4129 # Default-Start: ${start_runlevels}
4130 # Default-Stop: ${stop_runlevels}
4131 # Short-Description: ${svc_description}
4133 # Generated by PolyPackage ${pp_version}
4138 if test x"${svc_description}" = x"${pp_deb_default_svc_description}"; then
4142 #-- write service-specific definitions
4145 DESC="${svc_description:-$svc service}"
4148 PIDFILE="${pidfile}"
4149 STOP_SIGNAL="${stop_signal}"
4150 RELOAD_SIGNAL="${reload_signal}"
4152 DAEMON="${_cmd_path}"
4153 DAEMON_ARGS="${_cmd_args}"
4154 SCRIPTNAME=${script}
4157 #-- write the generic part of the init script
4160 [ -x "$DAEMON" ] || exit 0
4162 [ -r /etc/default/$NAME ] && . /etc/default/$NAME
4164 [ -f /etc/default/rcS ] && . /etc/default/rcS
4166 . /lib/lsb/init-functions
4171 # 0 if daemon has been started
4172 # 1 if daemon was already running
4173 # 2 if daemon could not be started
4174 if [ -n "$PIDFILE" ]
4176 pidfile_opt="--pidfile $PIDFILE"
4178 pidfile_opt="--make-pidfile --background --pidfile /var/run/$NAME.pid"
4182 user_opt="--user $USER"
4186 group_opt="--group $GROUP"
4188 if [ "$VERBOSE" = no ]
4192 quiet_opt="--verbose"
4195 start-stop-daemon --start $quiet_opt $pidfile_opt $user_opt --exec $DAEMON --test > /dev/null \
4198 # Note: there seems to be no way to tell whether the daemon will fork itself or not, so pass
4199 # --background for now
4200 start-stop-daemon --start $quiet_opt $pidfile_opt $user_opt --exec $DAEMON -- \
4208 # 0 if daemon has been stopped
4209 # 1 if daemon was already stopped
4210 # 2 if daemon could not be stopped
4211 # other if a failure occurred
4212 if [ -n "$PIDFILE" ]
4214 pidfile_opt="--pidfile $PIDFILE"
4216 pidfile_opt="--pidfile /var/run/$NAME.pid"
4220 user_opt="--user $USER"
4222 if [ -n $STOP_SIGNAL ]
4224 signal_opt="--signal $STOP_SIGNAL"
4226 if [ "$VERBOSE" = "no" ]
4230 quiet_opt="--verbose"
4232 start-stop-daemon --stop $quiet_opt $signal_opt --retry=TERM/30/KILL/5 $pidfile_opt --name $NAME
4234 [ "$RETVAL" = 2 ] && return 2
4235 # Wait for children to finish too if this is a daemon that forks
4236 # and if the daemon is only ever run from this initscript.
4237 # If the above conditions are not satisfied then add some other code
4238 # that waits for the process to drop all resources that could be
4239 # needed by services started subsequently. A last resort is to
4240 # sleep for some time.
4241 start-stop-daemon --stop $quiet_opt --oknodo --retry=0/30/KILL/5 --exec $DAEMON
4242 [ "$?" = 2 ] && return 2
4243 # Many daemons don't delete their pidfiles when they exit.
4244 test -z $PIDFILE || rm -f $PIDFILE
4250 # If the daemon can reload its configuration without
4251 # restarting (for example, when it is sent a SIGHUP),
4252 # then implement that here.
4254 if [ -n "$PIDFILE" ]
4256 pidfile_opt="--pidfile $PIDFILE"
4258 pidfile_opt="--pidfile /var/run/$NAME.pid"
4260 if [ -n "$RELOAD_SIGNAL" ]
4262 start-stop-daemon --stop --signal $RELOAD_SIGNAL $quiet_opt $pidfile_opt --name $NAME
4269 [ "$VERBOSE" != no ] && log_daemon_msg "Starting $DESC" "$NAME"
4272 0|1) [ "$VERBOSE" != no ] && log_end_msg 0 ;;
4273 2) [ "$VERBOSE" != no ] && log_end_msg 1 ;;
4277 [ "$VERBOSE" != no ] && log_daemon_msg "Stopping $DESC" "$NAME"
4280 0|1) [ "$VERBOSE" != no ] && log_end_msg 0 ;;
4281 2) [ "$VERBOSE" != no ] && log_end_msg 1 ;;
4284 reload|force-reload)
4285 if [ -n "$RELOAD_SIGNAL" ]
4287 log_daemon_msg "Reloading $DESC" "$NAME"
4291 # Do a restart instead
4297 # If the "reload" option is implemented then remove the
4298 # 'force-reload' alias
4300 log_daemon_msg "Restarting $DESC" "$NAME"
4307 1) log_end_msg 1 ;; # Old process is still running
4308 *) log_end_msg 1 ;; # Failed to start
4318 #echo "Usage: $SCRIPTNAME {start|stop|restart|reload|force-reload}" >&2
4319 echo "Usage: $SCRIPTNAME {start|stop|restart|force-reload}" >&2
4328 pp_backend_deb_function() {
4330 pp_mkgroup) cat<<'.';;
4331 /usr/sbin/groupmod "$1" 2>/dev/null && return 0
4332 /usr/sbin/groupadd "$1"
4334 pp_mkuser:depends) echo pp_mkgroup;;
4335 pp_mkuser) cat<<'.';;
4337 id -u "$1" >/dev/null 2>/dev/null && return 0
4338 # deb 3.1's useradd changed API in 4.0. Gah!
4339 /usr/sbin/useradd --help 2>&1 | /bin/grep -q .--system &&
4340 pp_tmp_system=--system
4341 pp_mkgroup "${2:-$1}" || return 1
4344 -d "${3:-/nonexistent}" \
4345 -s "${4:-/bin/false}" \
4349 pp_havelib) cat<<'.';;
4350 for pp_tmp_dir in `echo "/usr/lib:/lib${3:+:$3}" | tr : ' '`; do
4351 test -r "$pp_tmp_dir/lib$1.so{$2:+.$2}" && return 0
4359 pp_platforms="$pp_platforms kit"
4361 pp_backend_kit_detect () {
4362 test x"$1" = x"OSF1"
4365 pp_backend_kit_init () {
4371 pp_readlink_fn=pp_ls_readlink
4372 pp_kit_startlevels="2 3"
4373 pp_kit_stoplevels="0 2 3"
4377 typeset mi_file k_file svc outfile
4380 pp_backend_kit_names > /dev/null
4382 if test -z "$pp_kit_desc"; then
4383 pp_kit_desc="$description"
4386 mi_file="$pp_wrkdir/$pp_kit_subset.mi"
4387 k_file="$pp_wrkdir/$pp_kit_subset.k"
4388 scp_file="$pp_wrkdir/$pp_kit_subset.scp"
4390 desc="${pp_kit_desc:-$description}"
4395 VERS=$pp_kit_version
4399 $pp_kit_subset . 0 '$desc'
4402 if test -n "$pp_services"; then
4403 for svc in $pp_services; do
4404 pp_kit_make_service $svc
4405 pp_prepend $pp_wrkdir/%preun.run <<-.
4406 /sbin/init.d/$svc stop
4411 pp_backend_kit_make_mi "$mi_file"
4412 pp_backend_kit_make_scp
4413 #rm -rf $pp_wrkdir/kit_dest
4414 mkdir -p $pp_wrkdir/kit_dest
4415 pp_backend_kit_kits $k_file $pp_opt_destdir $pp_wrkdir/kit_dest
4416 tar cvf $pp_wrkdir/$pp_kit_subset.tar -C $pp_wrkdir/kit_dest .
4417 gzip -c $pp_wrkdir/$pp_kit_subset.tar > $pp_wrkdir/$pp_kit_subset.tar.gz
4418 #rm -rf $pp_wrkdir/$pp_kit_subset.tar $pp_wrkdir/scps
4421 pp_backend_kit_make_mi () {
4422 # XXX this information should go into the .inv files
4423 typeset t m o g f p st line dm
4424 while read t m o g f p st; do
4427 echo "0 .$p $pp_kit_subset"
4428 echo " chmod $m $p" >> $pp_wrkdir/%post.run
4429 if [ x"$o" = x"-" ] ; then
4430 echo " chown root $p" >> $pp_wrkdir/%post.run
4432 echo " chown $o $p" >> $pp_wrkdir/%post.run
4434 if [ x"$g" = x"-" ] ; then
4435 echo " chgrp 0 $p" >> $pp_wrkdir/%post.run
4437 echo " chgrp $g $p" >> $pp_wrkdir/%post.run
4441 echo " ln -s $st $p" >> $pp_wrkdir/%post.run
4442 echo " rm -f $p" >> $pp_wrkdir/%preun.run
4445 done < $pp_wrkdir/%files.run | sort -k3 |uniq > $1
4449 pp_backend_kit_make_scp () {
4450 scpdir="$pp_wrkdir/scps"
4451 mkdir "$scpdir" && touch "$scpdir"/$pp_kit_subset.scp
4452 cat <<EOF >"$scpdir"/$pp_kit_subset.scp
4454 . /usr/share/lib/shell/libscp
4468 cat $pp_wrkdir/%post.run >>"$scpdir"/$pp_kit_subset.scp
4469 cat >>"$scpdir"/$pp_kit_subset.scp <<EOF
4475 cat $pp_wrkdir/%preun.run >>"$scpdir"/$pp_kit_subset.scp
4476 cat >>"$scpdir"/$pp_kit_subset.scp <<EOF
4486 echo "Installation of the \$_DESC (\$_SUB) subset is complete."
4500 chmod 744 "$scpdir"/$pp_kit_subset.scp
4504 pp_backend_kit_cleanup () {
4508 pp_backend_kit_names () {
4509 if test -z "$pp_kit_name"; then
4510 pp_warn "pp_kit_name not specified, using XXX"
4513 case "$pp_kit_name" in
4515 *) pp_error "\$pp_kit_name $pp_kit_name must be three characters";;
4517 if test -z "$pp_kit_package"; then
4518 pp_warn "pp_kit_package not specified, using YYYY"
4521 if test -z "$pp_kit_version"; then
4522 pp_kit_version=`echo $version|tr -d '.a-zA-Z'`
4524 case "$pp_kit_version" in
4525 [0-9]) pp_kit_version="${pp_kit_version}00";;
4526 [0-9][0-9]) pp_kit_version="${pp_kit_version}0";;
4527 [0-9][0-9][0-9]) : ok;;
4528 *) pp_error "\$pp_kit_version $pp_kit_version must be three digits, ";;
4530 if test -z "$pp_kit_subset"; then
4531 pp_kit_subset="$pp_kit_name$pp_kit_package$pp_kit_version"
4533 echo "$pp_kit_subset.tar.gz"
4536 pp_backend_kit_install_script () {
4537 typeset pkgname platform
4539 pkgname=`pp_backend_kit_names`
4540 platform="`pp_backend_kit_probe`"
4543 pp_install_script_common
4547 test x"\$*" = x"all" && set -- $pp_components
4554 test \$# -eq 0 && usage
4559 test \$# -eq 0 || usage \$op
4560 echo "$pp_components"
4563 test \$# -eq 0 || usage \$op
4567 test \$# -ge 1 || usage \$op
4568 echo \${PP_PKGDESTDIR:-.}/$pkgname
4571 test \$# -ge 1 || usage \$op
4572 verbose echo \${PP_PKGDESTDIR:-\`pwd\`}/$pkgname \`cpt_to_tags "\$@"\`
4573 #verbose swinstall -x verbose=0 -s \${PP_PKGDESTDIR:-\`pwd\`}/$pkgname \`cpt_to_tags "\$@"\`
4576 test \$# -ge 1 || usage \$op
4577 verbose echo \`cpt_to_tags "\$@"\`
4578 #verbose swremove -x verbose=0 \`cpt_to_tags "\$@"\`
4581 test \$# -ge 1 || usage \$op
4585 verbose /sbin/init.d/\$svc \$op
4586 [ \$? -eq 4 -o \$? -eq 0 ] || ec=1
4600 pp_backend_kit_function () {
4602 pp_mkgroup) cat <<'.';;
4603 grep "^$1:" /etc/group >/dev/null ||
4604 /usr/sbin/groupadd $1
4606 pp_mkuser) cat <<'.';;
4608 grep "^$user:" /etc/passwd >/dev/null ||
4609 /usr/sbin/useradd -s /usr/bin/false "$@"
4611 pp_havelib) cat <<'.';;
4612 for dir in `echo /usr/lib${3+:$3} | tr : ' '`; do
4613 test -r "$dir/lib$1.${2-sl}" && return 0
4617 *) pp_error "unknown function request: $1";;
4621 pp_backend_kit_init_svc_vars () {
4625 pp_backend_kit_probe () {
4626 echo tru64-`uname -r | sed 's/V\([0-9]*\)\.\([0-9]*\)/\1\2/'`
4629 pp_kit_service_group_script () {
4630 typeset grp svcs scriptpath out
4633 scriptpath="/sbin/init.d/$grp"
4634 out="$pp_destdir$scriptpath"
4636 pp_add_file_if_missing $scriptpath run 755 || return 0
4640 # generated by pp $pp_version
4645 #-- starts services in order.. stops them all if any break
4648 for svc in $svcs; do
4649 /sbin/init.d/$svc start
4655 if test -n "$undo"; then
4656 for svc in $undo; do
4657 /sbin/init.d/$svc stop
4667 #-- stops services in reverse
4670 for svc in $svcs; do
4671 reverse="$svc $reverse"
4674 for svc in $reverse; do
4675 /sbin/init.d/$svc stop || rc=$?
4681 start_msg) echo "Starting $svcs";;
4682 stop_msg) echo "Stopping $svcs";;
4685 *) echo "usage: $0 {start|stop|start_msg|stop_msg}"
4691 pp_kit_service_script () {
4692 typeset svc scriptpath out
4695 scriptpath="/sbin/init.d/$svc"
4697 pp_load_service_vars "$svc"
4699 test -n "$user" -a x"$user" != x"root" &&
4700 cmd="SHELL=/usr/bin/sh /usr/bin/su $user -c \"exec `echo $cmd | sed -e 's,[$\\\`],\\&,g'`\""
4701 if test -z "$pidfile"; then
4702 pidfile="/var/run/$svc.pid"
4703 cmd="$cmd & echo \$! > \$pidfile"
4706 pp_add_file_if_missing $scriptpath run 755
4708 cat <<-. > $pp_destdir$scriptpath
4716 cat <<-'.' >>$pp_destdir$scriptpath
4718 if test ! -s "$pidfile"; then
4719 echo "Unable to stop $svc (no pid file)"
4722 read pid < "$pidfile"
4723 if kill -0 "$pid" 2>/dev/null; then
4724 if kill -${stop_signal:-TERM} "$pid"; then
4728 echo "Unable to stop $svc"
4739 if test ! -s "$pidfile"; then
4742 read pid < "$pidfile"
4743 kill -0 "$pid" 2>/dev/null
4747 start_msg) echo "Starting the $svc service";;
4748 stop_msg) echo "Stopping the $svc service";;
4751 echo "$svc already running";
4754 echo "$svc started";
4755 # rc(1M) says we should exit 4, but nobody expects it!
4763 echo "$svc stopped";
4769 *) echo "usage: $0 {start|stop|start_msg|stop_msg}"
4776 pp_kit_make_service () {
4777 typeset level priority startlevels stoplevels
4781 svcvar=`pp_makevar $svc`
4783 #-- don't do anything if the script exists
4784 if test -s "$pp_destdir/sbin/init.d/$svc"; then
4785 pp_error "$pp_destdir/sbin/init.d/$svc exists"
4789 # symlink the script, depending on the priorities chosen
4790 eval priority='${pp_kit_priority_'$svcvar'}'
4791 test -z "$priority" && priority="${pp_kit_priority:-50}"
4793 eval startlevels='${pp_kit_startlevels_'$svcvar'}'
4794 test -z "$startlevels" && startlevels="$pp_kit_startlevels"
4796 eval stoplevels='${pp_kit_stoplevels_'$svcvar'}'
4797 test -z "$stoplevels" && stoplevels="$pp_kit_stoplevels"
4799 # create the script and config file
4800 pp_kit_service_script $svc
4802 # fix the priority up
4805 ??) priority=0$priority;;
4806 ?) priority=00$priority;;
4809 if test x"$stoplevels" = x"auto"; then
4811 test -z "$startlevels" || for level in $startlevels; do
4812 stoplevels="$stoplevels `expr $level - 1`"
4816 # create the symlinks
4817 test -z "$startlevels" || for level in $startlevels; do
4818 echo " ln -s /sbin/init.d/$svc /sbin/rc$level.d/S$priority$svc" >>$pp_wrkdir/%post.run
4819 echo " rm /sbin/rc$level.d/S$priority$svc" >>$pp_wrkdir/%preun.run
4821 test -z "$stoplevels" || for level in $stoplevels; do
4822 echo " ln -s /sbin/init.d/$svc /sbin/rc$level.d/K$priority$svc" >>$pp_wrkdir/%post.run
4823 echo " rm -f /sbin/rc$level.d/K$priority$svc" >>$pp_wrkdir/%preun.run
4830 pp_backend_kit_sizes () {
4832 BEGIN { root = usr = var = 0; }
4834 if (substr($9, 1, 1) != "l")
4835 if (substr($10, 1, 6) == "./var/")
4837 else if (substr($10, 1, 10) == "./usr/var/")
4839 else if (substr($10, 1, 6) == "./usr/")
4844 END { printf "%d\t%d\t%d", root, usr, var }
4848 pp_kit_kits_global () {
4849 line=`sed -n '/^%%/q;/^'$2'=/{s/^'$2'=//p;q;}' <"$1"`
4850 test -z "$line" && return 1
4855 pp_backend_kit_kits () {
4856 typeset KITFILE FROMDIR TODIR
4859 SCPDIR="$pp_wrkdir/scps"
4861 PATH="/usr/lbin:/usr/bin:/etc:/usr/ucb:$PATH"; export PATH # XXX
4864 test $# -ge 3 || pp_die "pp_backend_kit_kits: too few arguments"
4869 test -f "$KITFILE" || pp_die "$KITFILE not found"
4870 test -d "$FROMDIR" || pp_die "$FROMDIR not found"
4871 test -d "$TODIR" || pp_die "$TODIR not found"
4873 INSTCTRL="$TODIR/instctrl"
4874 mkdir -p "$INSTCTRL" || pp_die "cannot create instctrl directory"
4875 chmod 775 "$INSTCTRL"
4877 grep "%%" $KITFILE > /dev/null || pp_die "no %% in $KITFILE"
4879 typeset NAME CODE VERS MI ROOT COMPRESS
4880 typeset S_LIST ALLSUBS
4882 NAME=`pp_kit_kits_global "$KITFILE" NAME` || pp_die "no NAME in $KITFILE"
4883 CODE=`pp_kit_kits_global "$KITFILE" CODE` || pp_die "no CODE in $KITFILE"
4884 VERS=`pp_kit_kits_global "$KITFILE" VERS` || pp_die "no VERS in $KITFILE"
4885 MI=`pp_kit_kits_global "$KITFILE" MI` || pp_die "no MI in $KITFILE"
4886 ROOT=`pp_kit_kits_global "$KITFILE" ROOT`
4887 COMPRESS=`pp_kit_kits_global "$KITFILE" COMPRESS`
4889 test -f "$MI" || pp_die "Inventory file $MI not found"
4893 test -f "$TODIR/$ROOT" ||
4894 pp_die "Root image $ROOT not found in $TODIR" ;;
4897 ALLSUBS=`awk 'insub==1 {print $1} /^%%/ {insub=1}' <"$KITFILE"`
4898 test $# -eq 0 && set -- $ALLSUBS
4900 pp_debug "Creating $# $NAME subsets."
4901 pp_debug "ALLSUBS=<$ALLSUBS>"
4903 if test x"$COMPRESS" = x"1"; then
4909 #rm -f *.ctrl Volume*
4913 test -z "$SUB" && pp_die "SUB is empty"
4915 typeset INV CTRL ROOTSIZE USRSIZE VARSIZE TSSUB
4919 *) pp_verbose rm -f "$TODIR/$SUB"* "$INSTCTRL/$SUB"*;;
4922 TSSUB="$pp_wrkdir/ts.$SUB"
4924 pp_debug "kits: Subset $SUB"
4928 pp_debug "kits: Generating media creation information..."
4930 # Invcutter takes as input
4932 # and generates stl_inv(4) files, like this
4933 # f 0 00000 0 0 100644 2/11/09 010 f dir/path none SUB
4934 grep " $SUB\$" "$MI" |
4935 pp_verbose /usr/lbin/invcutter \
4936 -v "$VERS" -f "$FROMDIR" > "$INSTCTRL/$INV" ||
4937 pp_die "failed to create $INSTCTRL/$INV"
4938 chmod 664 "$INSTCTRL/$INV"
4940 pp_backend_kit_sizes "$INSTCTRL/$INV" > "$pp_wrkdir/kit.sizes"
4941 read ROOTSIZE USRSIZE VARSIZE < "$pp_wrkdir/kit.sizes"
4943 # Prefix each line with $FROMDIR. This will be stripped
4944 awk '$1 != "d" {print from $10}' from="$FROMDIR/" \
4945 > "$TSSUB" < "$INSTCTRL/$INV" ||
4950 pp_debug "kits: Creating $SUB control file..."
4952 sed '1,/^%%/d;/^'"$SUB"'/{p;q;}' < "$KITFILE" > "$pp_wrkdir/kit.line"
4953 read _SUB _IGNOR DEPS FLAGS DESC < "$pp_wrkdir/kit.line"
4954 if test -z "$_SUB"; then
4955 pp_warn "No such subset $SUB in $KITFILE"
4958 DEPS=`echo $DEPS | tr '|' ' '`
4960 FLGEXP*) pp_verbose FLAGS='"${'"$FLAGS"'}"' ;;
4963 *%*) DESC=`echo $DESC|awk -F% '{printf "%-36s%%%s\n", $1, $2}'`;;
4966 cat > "$INSTCTRL/$CTRL" <<-.
4977 chmod 664 "$INSTCTRL/$CTRL"
4979 pp_debug "kits: Making tar image"
4981 pp_verbose tar cfPR "$TODIR/$SUB" "$FROMDIR/" "$TSSUB" ||
4982 pp_error "problem creating kit file"
4985 pp_debug "kits: Compressing"
4986 (cd "$TODIR" && compress -f -v "$SUB") ||
4987 pp_die "problem compressing $TODIR/$SUB"
4988 SPC=`expr $SUB : '\(...\).*'` # first three characters
4989 SVC=`expr $SUB : '.*\(...\)'` # last three characters
4990 : > "$INSTCTRL/$SPC$SVC.comp"
4991 chmod 664 "$INSTCTRL/$SPC$SVC.comp"
4992 pp_debug "kits: Padding compressed file to 10kB" # wtf?
4995 dd if="$TODIR/$SUB.Z" of="$TODIR/$SUB" bs=10k conv=sync ||
4996 pp_die "problem moving compressed file"
4997 rm -f "$TODIR/$SUB.Z"
4999 chmod 664 "$TODIR/$SUB"
5001 if test -f "$SCPDIR/$SUB.scp"; then
5002 cp "$SCPDIR/$SUB.scp" "$INSTCTRL/$SUB.scp"
5003 chmod 755 "$INSTCTRL/$SUB.scp"
5005 pp_debug "kits: null subset control program for $SUB"
5006 : > "$INSTCTRL/$SUB.scp"
5007 chmod 744 "$INSTCTRL/$SUB.scp"
5010 pp_debug "kits: Finished creating media image for $SUB"
5013 pp_debug "kits: Creating $CODE.image"
5016 *ROOT) ALLSUBS="$ROOT $ALLSUBS"
5020 (cd "$TODIR" && sum $ALLSUBS) > "$INSTCTRL/$CODE.image"
5021 chmod 664 "$INSTTRL/$CODE.image"
5022 pp_debug "kits: Creating INSTCTRL"
5023 (cd "$INSTCTRL" && tar cpvf - *) > "$TODIR/INSTCTRL"
5024 chmod 664 "$TODIR/INSTCTRL"
5025 cp "$INSTCTRL/$CODE.image" "$TODIR/$CODE.image"
5026 chmod 664 "$TODIR/$CODE.image"
5028 pp_debug "kits: Media image production complete"
5031 pp_platforms="$pp_platforms rpm"
5033 pp_backend_rpm_detect () {
5034 test x"$1" = x"Linux" -a ! -f /etc/debian_version
5037 pp_backend_rpm_init () {
5042 pp_rpm_group="Applications/Internet"
5043 pp_rpm_license="Unspecified"
5051 pp_rpm_dev_group="Development/Libraries"
5052 pp_rpm_dbg_group="Development/Tools"
5053 pp_rpm_doc_group="Documentation"
5054 pp_rpm_dev_description=
5055 pp_rpm_dbg_description=
5056 pp_rpm_doc_description=
5057 pp_rpm_dev_requires=
5058 pp_rpm_dbg_requires=
5059 pp_rpm_doc_requires=
5060 pp_rpm_dev_provides=
5061 pp_rpm_dbg_provides=
5062 pp_rpm_doc_provides=
5064 pp_rpm_dbg_pkgname=debug
5065 pp_rpm_dev_pkgname=devel
5066 pp_rpm_doc_pkgname=doc
5068 pp_rpm_defattr_uid=root
5069 pp_rpm_defattr_gid=root
5072 pp_rpm_detect_distro
5073 pp_rpm_rpmbuild=`pp_rpm_detect_rpmbuild`
5075 # SLES8 doesn't always come with readlink
5076 test -x /usr/bin/readlink -o -x /bin/readlink ||
5077 pp_readlink_fn=pp_ls_readlink
5080 pp_rpm_detect_arch () {
5083 #-- Find the default native architecture that RPM is configured to use
5084 cat <<-. >$pp_wrkdir/dummy.spec
5089 Group: ${pp_rpm_group}
5090 License: ${pp_rpm_license}
5094 $pp_opt_debug && cat $pp_wrkdir/dummy.spec
5095 pp_rpm_arch_local=`rpm -q --qf '%{arch}\n' --specfile $pp_wrkdir/dummy.spec`
5096 rm $pp_wrkdir/dummy.spec
5098 #-- Ask the kernel what machine architecture is in use
5099 local arch=`uname -p`
5100 if [ "$arch" = "unknown" ]; then
5105 i?86) pp_rpm_arch_std=i386;;
5106 x86_64) pp_rpm_arch_std=x86_64;;
5107 ppc) pp_rpm_arch_std=ppc;;
5108 ppc64) pp_rpm_arch_std=ppc64;;
5109 ia64) pp_rpm_arch_std=ia64;;
5110 s390) pp_rpm_arch_std=s390;;
5111 s390x) pp_rpm_arch_std=s390x;;
5114 case "`/usr/sbin/lsattr -El proc0 -a type -F value`" in
5115 PowerPC_POWER*) pp_rpm_arch_std=ppc64;;
5116 *) pp_rpm_arch_std=ppc;;
5119 *) pp_rpm_arch_std=unknown;;
5122 #-- Later on, when files are processed, we use 'file' to determine
5123 # what platform ABIs are used. This is used when pp_rpm_arch == auto
5127 pp_rpm_detect_distro () {
5129 if test -f /etc/whitebox-release; then
5130 pp_rpm_distro=`awk '
5131 /^White Box Enterprise Linux release/ { print "wbel" $6; exit; }
5132 ' /etc/whitebox-release`
5133 elif test -f /etc/fedora-release; then
5134 pp_rpm_distro=`awk '
5135 /^Fedora Core release/ { print "fc" $4; exit; }
5136 /^Fedora release/ { print "f" $3; exit; }
5137 ' /etc/fedora-release`
5138 elif test -f /etc/redhat-release; then
5139 pp_rpm_distro=`awk '
5140 /^Red Hat Enterprise Linux/ { print "rhel" $7; exit; }
5141 /^CentOS release/ { print "centos" $3; exit; }
5142 /^Red Hat Linux release/ { print "rh" $5; exit; }
5143 ' /etc/redhat-release`
5144 elif test -f /etc/SuSE-release; then
5145 pp_rpm_distro=`awk '
5146 /^SuSE Linux [0-9]/ { print "suse" $3; exit; }
5147 /^SUSE LINUX [0-9]/ { print "suse" $3; exit; }
5148 /^openSUSE [0-9]/ { print "suse" $2; exit; }
5149 /^S[uU]SE Linux Enterprise Server [0-9]/ { print "sles" $5; exit; }
5150 /^S[uU]SE LINUX Enterprise Server [0-9]/ { print "sles" $5; exit; }
5151 /^SuSE SLES-[0-9]/ { print "sles" substr($2,6); exit; }
5152 ' /etc/SuSE-release`
5153 elif test X"`uname -s 2>/dev/null`" = X"AIX"; then
5157 pp_rpm_distro="aix$v$r"
5159 pp_rpm_distro=`echo $pp_rpm_distro | tr -d .`
5160 test -z "$pp_rpm_distro" &&
5161 pp_warn "unknown distro"
5164 pp_rpm_detect_rpmbuild () {
5166 for cmd in rpmbuild rpm; do
5167 if `which $cmd > /dev/null 2>&1`; then
5173 pp_error "Could not find rpmbuild"
5174 # Default to `rpmbuild` in case it magically appears
5184 test -z "$arg" || echo "$label: $arg"
5188 pp_rpm_writefiles () {
5189 local _l t m o g f p st fo farch
5190 while read t m o g f p st; do
5192 test $t = d && _l="%dir ${_l%/}/"
5193 if test x"$m" = x"-"; then
5199 test x"$o" = x"-" && o="${pp_rpm_defattr_uid:-root}"
5200 test x"$g" = x"-" && g="${pp_rpm_defattr_gid:-root}"
5201 _l="%attr($m,$o,$g) $_l"
5203 if test "$t" = "f" -a x"$pp_rpm_arch" = x"auto"; then
5204 fo=`file "${pp_destdir}$p" 2>/dev/null`
5205 #NB: The following should match executables and shared objects,
5206 #relocatable objects. It will not match .a files however.
5208 *": ELF 32-bit LSB "*", Intel 80386"*)
5210 *": ELF 64-bit LSB "*", AMD x86-64"*|\
5211 *": ELF 64-bit LSB "*", x86-64"*)
5213 *": ELF 32-bit MSB "*", PowerPC"*)
5215 *": ELF 64-bit LSB "*", IA-64"*)
5217 *": ELF 32-bit MSB "*", IBM S/390"*)
5219 *": ELF 64-bit MSB "*", IBM S/390"*)
5221 *"executable (RISC System/6000)"*)
5223 *"64-bit XCOFF executable"*)
5228 pp_debug "file: $fo -> $farch"
5229 test x"$farch" = x"noarch" || pp_add_to_list pp_rpm_arch_seen $farch
5232 case $f in *v*) _l="%config(noreplace) $_l";; esac
5241 dbg) echo "${2}${pp_rpm_dbg_pkgname}";;
5242 dev) echo "${2}${pp_rpm_dev_pkgname}";;
5243 doc) echo "${2}${pp_rpm_doc_pkgname}";;
5244 *) pp_error "unknown component '$1'";
5249 while read _name _vers; do
5250 case "$_name" in ""| "#"*) continue ;; esac
5251 echo "Requires: $_name ${_vers:+>= $_vers}"
5255 pp_rpm_override_requires () {
5256 local orig_find_requires
5258 if test -z "$pp_rpm_depend_filter_cmd"; then
5262 orig_find_requires=`rpm --eval '%{__find_requires}'`
5263 cat << EOF > "$pp_wrkdir/filtered-find-requires"
5264 $orig_find_requires \$@ | $pp_rpm_depend_filter_cmd
5266 chmod +x "$pp_wrkdir/filtered-find-requires"
5267 echo "%define __find_requires $pp_wrkdir/filtered-find-requires"
5268 # Might be necessary for old versions of RPM? Not for 4.4.2.
5269 #echo "%define _use_internal_dependency_generator 0"
5273 local cmp specfile _summary _group _desc _pkg _subname svc
5275 specfile=$pp_wrkdir/$name.spec
5278 #-- force existence of a 'run' component
5279 pp_add_component run
5280 : >> $pp_wrkdir/%files.run
5282 if test -z "$pp_rpm_arch"; then
5283 pp_error "Unknown RPM architecture"
5287 #-- Write the header components of the RPM spec file
5288 cat <<-. >>$specfile
5289 Name: ${pp_rpm_name:-$name}
5290 Version: ${pp_rpm_version:-$version}
5291 Release: ${pp_rpm_release:-1}
5292 Summary: ${pp_rpm_summary:-$summary}
5293 Group: ${pp_rpm_group}
5294 License: ${pp_rpm_license}
5296 if test -n "$pp_rpm_url"; then
5297 pp_rpm_label "URL" "$pp_rpm_url" >>$specfile
5299 pp_rpm_label "Vendor" "${pp_rpm_vendor:-$vendor}" >>$specfile
5300 pp_rpm_label "Packager" "$pp_rpm_packager" >>$specfile
5301 pp_rpm_label "Provides" "$pp_rpm_provides" >>$specfile
5302 pp_rpm_label "Requires" "$pp_rpm_requires" >>$specfile
5304 test -n "$pp_rpm_serial" && pp_warn "pp_rpm_serial deprecated"
5305 if test -n "$pp_rpm_epoch"; then
5306 #-- Epoch was introduced in RPM 2.5.6
5307 case `$pp_rpm_rpmbuild --version 2>/dev/null` in
5308 1.*|2.[0-5].*|2.5.[0-5])
5309 pp_rpm_label "Serial" $pp_rpm_epoch >>$specfile;;
5311 pp_rpm_label "Epoch" $pp_rpm_epoch >>$specfile;;
5315 if test -n "$pp_rpm_requires"; then
5316 pp_rpm_label "Requires" "$pp_rpm_requires" >>$specfile
5317 elif test -s $pp_wrkdir/%depend.run; then
5318 pp_rpm_depend < $pp_wrkdir/%depend.run >> $specfile
5321 pp_rpm_override_requires >> $specfile
5323 cat <<-. >>$specfile
5326 ${pp_rpm_description:-$description}
5329 for cmp in $pp_components; do
5332 dev) _summary="development tools for $pp_rpm_summary"
5333 _group="$pp_rpm_dev_group"
5334 _desc="${pp_rpm_dev_description:-Development libraries for $name. $pp_rpm_description.}"
5336 doc) _summary="documentation for $pp_rpm_summary"
5337 _group="$pp_rpm_doc_group"
5338 _desc="${pp_rpm_doc_description:-Documentation for $name. $pp_rpm_description.}"
5340 dbg) _summary="diagnostic tools for $pp_rpm_summary"
5341 _group="$pp_rpm_dbg_group"
5342 _desc="${pp_rpm_dbg_description:-Diagnostic tools for $name.}"
5346 _subname=`pp_rpm_subname $cmp`
5350 Summary: $name $_summary
5353 eval '_pkg="$pp_rpm_'$cmp'_requires"'
5354 if test -n "$_pkg"; then
5355 eval pp_rpm_label Requires ${pp_rpm_name:-$name} $_pkg
5356 elif test -s $pp_wrkdir/%depend.$cmp; then
5357 pp_rpm_depend < $pp_wrkdir/%depend.$cmp >> $specfile
5360 eval '_pkg="$pp_rpm_'$cmp'_provides"'
5361 eval pp_rpm_label Provides $_pkg
5365 %description $_subname
5370 #-- NB: we don't put any %prep, %build or %install RPM sections
5371 # into the spec file.
5373 #-- add service start/stop code
5374 if test -n "$pp_services"; then
5375 pp_rpm_service_install_common >> $pp_wrkdir/%post.run
5377 #-- record the uninstall commands in reverse order
5378 for svc in $pp_services; do
5379 pp_load_service_vars $svc
5381 pp_rpm_service_make_init_script $svc
5383 #-- append %post code to install the svc
5384 pp_rpm_service_install $svc >> $pp_wrkdir/%post.run
5386 #-- prepend %preun code to uninstall svc
5387 # (use files in case vars are modified)
5388 pp_rpm_service_remove $svc | pp_prepend $pp_wrkdir/%preun.run
5390 pp_rpm_service_remove_common | pp_prepend $pp_wrkdir/%preun.run
5393 # make convenience service groups
5394 if test -n "$pp_service_groups"; then
5395 for grp in $pp_service_groups; do
5396 pp_rpm_service_group_make_init_script \
5397 $grp "`pp_service_get_svc_group $grp`"
5401 #-- Write the RPM %file sections
5402 # (do this after services, since services adds to %files.run)
5403 for cmp in $pp_components; do
5404 _subname=`pp_rpm_subname $cmp`
5406 if test -s $pp_wrkdir/%check.$cmp; then
5408 echo "%pre $_subname"
5409 cat $pp_wrkdir/%check.$cmp
5410 echo : # causes script to exit true by default
5413 if test -s $pp_wrkdir/%files.$cmp; then
5415 echo "%files $_subname"
5416 pp_rpm_writefiles < $pp_wrkdir/%files.$cmp
5419 if test -n "$pp_rpm_ghost"; then
5420 for ghost in $pp_rpm_ghost; do
5421 echo "%ghost $ghost"
5425 if test -s $pp_wrkdir/%pre.$cmp; then
5427 echo "%pre $_subname"
5428 cat $pp_wrkdir/%pre.$cmp
5429 echo : # causes script to exit true
5432 if test -s $pp_wrkdir/%post.$cmp; then
5434 echo "%post $_subname"
5435 cat $pp_wrkdir/%post.$cmp
5436 echo : # causes script to exit true
5439 if test -s $pp_wrkdir/%preun.$cmp; then
5441 echo "%preun $_subname"
5442 cat $pp_wrkdir/%preun.$cmp
5443 echo : # causes script to exit true
5447 #-- create a suitable work area for rpmbuild
5448 cat <<-. >$pp_wrkdir/.rpmmacros
5450 # XXX Note escaped %% for use in headerSprintf
5451 %_rpmfilename %%{ARCH}/%%{NAME}-%%{VERSION}-%%{RELEASE}.%%{ARCH}.rpm
5453 mkdir $pp_wrkdir/RPMS
5454 mkdir $pp_wrkdir/BUILD
5456 if test x"$pp_rpm_arch" = x"auto"; then
5457 #-- Reduce the arch_seen list to exactly one item
5458 case "$pp_rpm_arch_seen" in
5459 "i386 x86_64"|"x86_64 i386")
5460 pp_rpm_arch_seen=x86_64;;
5461 *"s390 s390x"* | *"s390x s390"* )
5462 pp_rpm_arch_seen=s390x;;
5464 pp_error "detected multiple targets: $pp_rpm_arch_seen"
5465 pp_rpm_arch_seen=unknown;; # not detected
5467 pp_warn "detected no binaries: using target noarch"
5468 pp_rpm_arch_seen=noarch;;
5470 pp_debug "detected architecture $pp_rpm_arch_seen"
5472 pp_rpm_arch="$pp_rpm_arch_seen"
5477 $pp_opt_debug && cat $specfile
5479 pp_debug "creating: `pp_backend_rpm_names`"
5481 pp_debug "pp_rpm_arch_seen = <${pp_rpm_arch_seen}>"
5482 pp_debug "pp_rpm_arch = <${pp_rpm_arch}>"
5486 $pp_rpm_rpmbuild -bb \
5487 --buildroot="$pp_destdir/" \
5488 --target="${pp_rpm_arch}" \
5489 --define='_unpackaged_files_terminate_build 0' \
5490 --define='_use_internal_dependency_generator 0' \
5491 `$pp_opt_debug && echo --verbose || echo --quiet` \
5492 $pp_rpm_rpmbuild_extra_flags \
5494 pp_error "Problem creating RPM packages"
5496 for f in `pp_backend_rpm_names`; do
5497 # The package might be in an arch-specific subdir
5499 for dir in $pp_wrkdir/RPMS/${pp_rpm_arch} $pp_wrkdir/RPMS; do
5500 if test -f $dir/$f; then
5504 if test x"$pkgfile" = x"not-found"; then
5505 pp_error "Problem predicting RPM filename: $f"
5507 ln $pkgfile $pp_wrkdir/$f
5512 pp_rpm_output_name () {
5513 echo "${pp_rpm_name:-$name}`pp_rpm_subname "$1" -`-${pp_rpm_version:-$version}-${pp_rpm_release:-1}.${pp_rpm_arch}.rpm"
5516 pp_backend_rpm_names () {
5518 for cmp in $pp_components; do
5519 pp_rpm_output_name $cmp
5523 pp_backend_rpm_cleanup () {
5527 pp_rpm_print_requires () {
5528 local _subname _name
5530 echo "CPU:$pp_rpm_arch"
5531 ## XXX should be lines of the form (from file/ldd/objdump)
5533 # RTLD:libc.so.4:open
5534 rpm -q --requires -p $pp_wrkdir/`pp_rpm_output_name $1` |sed -e '/^rpmlib(/d;s/ //g;s/^/RPM:/' | sort -u
5537 pp_backend_rpm_install_script () {
5541 pp_install_script_common
5547 if test x"\$1" = x"--only-installed"; then
5548 #-- only print if installation detected
5554 test x"\$*" = x"all" &&
5555 set -- $pp_components
5560 for cmp in $pp_components; do
5561 _subname=`pp_rpm_subname $cmp -`
5562 echo "$cmp) name=${pp_rpm_name:-$name}${_subname};;"
5567 if \$oi || rpm -q "\$name" >/dev/null 2>/dev/null; then
5574 cmp_to_pathname () {
5575 test x"\$*" = x"all" &&
5576 set -- $pp_components
5581 for cmp in $pp_components; do
5582 echo "$cmp) echo \${PP_PKGDESTDIR:-.}/`pp_rpm_output_name $cmp` ;;"
5591 test x"\$*" = x"all" &&
5592 set -- $pp_components
5597 for cmp in $pp_components; do
5598 echo "$cmp) cat <<'._end'"
5599 pp_rpm_print_requires $cmp
5600 echo "._end"; echo ';;'
5608 test \$# -eq 0 && usage
5612 test \$# -eq 0 || usage \$op
5616 test \$# -eq 0 || usage \$op
5620 test \$# -ge 1 || usage \$op
5621 cmp_to_pathname "\$@"
5624 test \$# -ge 1 || usage \$op
5625 verbose rpm -U --replacepkgs --oldpackage \
5626 \`cmp_to_pathname "\$@"\`
5629 test \$# -ge 1 || usage \$op
5630 pkgs=\`cmp_to_pkgname --only-installed "\$@"\`
5631 if test -z "\$pkgs"; then
5632 verbosemsg "nothing to uninstall"
5634 verbose rpm -e \$pkgs
5638 test \$# -ge 1 || usage \$op
5642 verbose /etc/init.d/\$svc \$op || ec=1
5647 test \$# -eq 0 || usage \$op
5648 echo "linux-${pp_rpm_arch}"
5651 test \$# -ge 1 || usage \$op
5652 print_requires "\$@"
5662 pp_backend_rpm_probe () {
5663 echo "${pp_rpm_distro}-${pp_rpm_arch_std}"
5666 pp_backend_rpm_vas_platforms () {
5667 case "$pp_rpm_arch_std" in
5668 x86_64) echo "linux-x86_64.rpm linux-x86.rpm";;
5669 *86) echo "linux-x86.rpm";;
5670 s390) echo "linux-s390";;
5671 s390x) echo "linux-s390x";;
5672 ppc*) echo "linux-glibc23-ppc64 linux-glibc22-ppc64";;
5673 ia64) echo "linux-ia64";;
5674 *) pp_die "unknown architecture $pp_rpm_arch_std";;
5678 pp_backend_rpm_init_svc_vars () {
5679 pp_rpm_default_start_runlevels="2 3 4 5"
5680 pp_rpm_default_svc_description="No description"
5683 pp_rpm_service_install_common () {
5686 _pp_install_service () {
5689 if [ -x /usr/lib/lsb/install_initd -a ! -r /etc/redhat-release ]
5692 /usr/lib/lsb/install_initd /etc/init.d/$svc &> /dev/null
5693 elif [ -x /sbin/chkconfig ]; then
5694 # Red Hat/chkconfig-style install
5695 /sbin/chkconfig --add $svc &> /dev/null
5696 /sbin/chkconfig $svc off &> /dev/null
5698 : # manual links under /etc/init.d
5702 _pp_enable_service () {
5705 if [ -x /usr/lib/lsb/install_initd -a ! -r /etc/redhat-release ]
5708 : # not sure how to enable
5709 elif [ -x /sbin/chkconfig ]; then
5710 # Red Hat/chkconfig-style install
5711 /sbin/chkconfig $svc on &> /dev/null
5714 set -- `sed -n -e 's/^# Default-Start://p' /etc/init.d/$svc`
5715 start_priority=`sed -n -e 's/^# X-Quest-Start-Priority:[[:space:]]*//p' /etc/init.d/$svc`
5716 stop_priority=`sed -n -e 's/^# X-Quest-Stop-Priority:[[:space:]]*//p' /etc/init.d/$svc`
5718 # Provide default start & stop priorities of 20 & 80 in
5719 # accordance with Debian update-rc.d defaults
5720 if [ -z "$start_priority" ]; then
5723 if [ -z "$stop_priority" ]; then
5727 if [ -d "/etc/rc.d" ];then
5734 do ln -sf /etc/init.d/$svc $rcdir/rc$level.d/S$start_priority$svc; done
5735 set -- `sed -n -e 's/^# Default-Stop://p' /etc/init.d/$svc`
5737 do ln -sf /etc/init.d/$svc $rcdir/rc$level.d/K$stop_priority$svc; done
5743 pp_rpm_service_remove_common () {
5746 _pp_remove_service () {
5749 /etc/init.d/$svc stop >/dev/null 2>&1
5750 if [ -x /usr/lib/lsb/remove_initd -a ! -r /etc/redhat-release ]
5752 /usr/lib/lsb/remove_initd /etc/init.d/$svc &> /dev/null
5753 elif [ -x /sbin/chkconfig ]; then
5754 /sbin/chkconfig --del $svc &> /dev/null
5756 if [ -d "/etc/rc.d" ];then
5762 rm -f $rcdir/rc?.d/[SK]??$svc
5769 pp_rpm_service_install () {
5770 pp_rpm_service_make_init_script $1 >/dev/null ||
5771 pp_error "could not create init script for service $1"
5772 echo "_pp_install_service $1"
5773 test $enable = yes && echo "_pp_enable_service $1"
5776 pp_rpm_service_remove () {
5778 if [ "\$1" = "remove" -o "\$1" = "0" ]; then
5779 # only remove the service if not upgrade
5780 _pp_remove_service $1
5786 pp_backend_rpm_init_svc_vars () {
5789 start_runlevels=${pp_rpm_default_start_runlevels} # == lsb default-start
5790 stop_runlevels="0 1 6" # == lsb default-stop
5791 svc_description="${pp_rpm_default_svc_description}" # == lsb short descr
5794 lsb_required_start='$local_fs $network'
5800 stop_priority=50 #-- stop_priority = 100 - start_priority
5803 pp_rpm_service_group_make_init_script () {
5806 local script=/etc/init.d/$grp
5807 local out=$pp_destdir$script
5809 pp_add_file_if_missing $script run 755 || return 0
5818 #-- prints usage message
5820 echo "usage: $0 {start|stop|status|restart|reload|condrestart|try-restart|force-reload}" >&2
5824 #-- starts services in order.. stops them all if any break
5827 for svc in $svcs; do
5828 if /etc/init.d/$svc start; then
5831 if test -n "$undo"; then
5832 for svc in $undo; do
5833 /etc/init.d/$svc stop
5842 #-- stops services in reverse
5845 for svc in $svcs; do
5846 reverse="$svc $reverse"
5849 for svc in $reverse; do
5850 /etc/init.d/$svc stop || rc=$?
5855 #-- returns true only if all services return true status
5858 for svc in $svcs; do
5859 /etc/init.d/$svc status || rc=$?
5866 for svc in $svcs; do
5867 /etc/init.d/$svc reload || rc=$?
5875 restart) pp_stop; pp_start;;
5877 try-restart|condrestart)
5878 if pp_status >/dev/null; then
5882 force-reload) if pp_status >/dev/null; then
5893 pp_rpm_service_make_init_script () {
5895 local script=/etc/init.d/$svc
5896 local out=$pp_destdir$script
5897 local _process _cmd _rpmlevels
5899 pp_add_file_if_missing $script run 755 || return 0
5901 #-- start out as an empty shell script
5906 #-- determine the process name from $cmd unless $svc_process is given
5908 _process=${svc_process:-"$1"}
5910 #-- construct a start command that builds a pid file if needed
5912 if test -z "$pidfile"; then
5913 pidfile=/var/run/$svc.pid
5914 _cmd="$cmd & echo \$! > \$pidfile"
5916 if test "$user" != "root"; then
5917 _cmd="su $user -c exec $_cmd";
5920 #-- generate the Red Hat chkconfig headers
5921 _rpmlevels=`echo $start_runlevels | tr -d ' '`
5923 # chkconfig: ${_rpmlevels:--} ${start_priority:-50} ${stop_priority:-50}
5924 # description: ${svc_description:-no description}
5925 # processname: ${_process}
5926 # pidfile: ${pidfile}
5929 #-- generate the LSB init info
5933 # Required-Start: ${lsb_required_start}
5934 # Should-Start: ${lsb_should_start}
5935 # Required-Stop: ${lsb_required_stop}
5936 # Default-Start: ${start_runlevels}
5937 # Default-Stop: ${stop_runlevels}
5938 # Short-Description: ${svc_description}
5940 # Generated by PolyPackage ${pp_version}
5945 if test x"${svc_description}" = x"${pp_rpm_default_svc_description}"; then
5949 #-- write service-specific definitions
5951 #-- definitions specific to service ${svc}
5952 svc_name="${svc_description:-$svc service}"
5954 pidfile="${pidfile}"
5955 stop_signal="${stop_signal}"
5956 reload_signal="${reload_signal}"
5957 pp_exec_cmd () { $_cmd; }
5960 #-- write the generic part of the init script
5963 #-- use system message logging, if available
5964 if [ -f /lib/lsb/init-functions -a ! -r /etc/redhat-release ]; then
5965 . /lib/lsb/init-functions
5966 pp_success_msg () { log_success_msg "$@"; }
5967 pp_failure_msg () { log_failure_msg "$@"; }
5968 pp_warning_msg () { log_warning_msg "$@"; }
5969 elif [ -f /etc/init.d/functions ]; then
5970 . /etc/init.d/functions
5971 pp_success_msg () { echo -n "$*"; success "$@"; echo; }
5972 pp_failure_msg () { echo -n "$*"; failure "$@"; echo; }
5973 pp_warning_msg () { echo -n "$*"; warning "$@"; echo; }
5975 pp_success_msg () { echo ${1:+"$*:"} OK; }
5976 pp_failure_msg () { echo ${1:+"$*:"} FAIL; }
5977 pp_warning_msg () { echo ${1:+"$*:"} WARNING; }
5980 #-- prints a status message
5981 pp_msg () { echo -n "$*: "; }
5983 #-- prints usage message
5985 echo "usage: $0 {start|stop|status|restart|reload|condrestart|try-restart|force-reload}" >&2
5989 #-- reloads the service, if possible
5990 # returns 0=success 1=failure 3=unimplemented
5992 test -n "$reload_signal" || return 3 # unimplemented
5993 pp_msg "Reloading ${svc_name}"
5994 if pp_signal -${reload_signal}; then
5998 pp_failure_msg "not running"
6003 #-- delivers signal $1 to the pidfile
6004 # returns 0=success 1=failure
6006 if test -r "$pidfile"; then
6008 kill "$@" "$pid" 2>/dev/null
6014 #-- prints information about the service status
6015 # returns 0=running 1=crashed 3=stopped
6017 pp_msg "Checking for ${svc_name}"
6018 if pp_signal -0; then
6019 pp_success_msg "running"
6021 elif test -r "$pidfile"; then
6022 pp_failure_msg "not running (crashed)"
6025 pp_failure_msg "not running"
6030 #-- starts the service
6031 # returns 0=success 1=failure
6033 pp_msg "Starting ${svc_name}"
6034 if pp_status >/dev/null; then
6035 pp_warning_msg "already started"
6037 elif pp_exec_cmd; then
6041 pp_failure_msg "cannot start"
6046 #-- stops the service
6047 # returns 0=success (always)
6049 pp_msg "Stopping ${svc_name}"
6050 if pp_signal -${stop_signal}; then
6053 pp_success_msg "already stopped"
6059 #-- stops and starts the service
6068 restart) pp_restart;;
6070 try-restart|condrestart)
6071 if pp_status >/dev/null; then
6075 force-reload) if pp_status >/dev/null; then
6086 pp_backend_rpm_function () {
6088 pp_mkgroup) cat<<'.';;
6089 /usr/sbin/groupadd -f -r "$1"
6091 pp_mkuser:depends) echo pp_mkgroup;;
6092 pp_mkuser) cat<<'.';;
6093 pp_mkgroup "${2:-$1}" || return 1
6096 -M -d "${3:-/nonexistent}" \
6097 -s "${4:-/bin/false}" \
6100 pp_havelib) cat<<'.';;
6101 for pp_tmp_dir in `echo "/usr/lib:/lib${3:+:$3}" | tr : ' '`; do
6102 test -r "$pp_tmp_dir/lib$1.so{$2:+.$2}" && return 0
6112 # creating a dmg file for publishing on the web
6113 hdiutil create -srcfolder /path/foo foo.dmg
6114 hdiutil internet-enable -yes /path/foo.dmg
6115 # Layout for packages
6116 <name>-<cpy>/component/<file>
6117 <name>-<cpt>/extras/postinstall
6118 <name>-<cpt>/extras/postupgrade
6119 # /Developer/usr/bin/packagemaker (man packagemaker)
6121 Make a bunch of packages, and then build a 'distribution'
6122 which is only understood by macos>10.4
6124 # Message files in the resource path used are
6125 Welcome.{rtf,html,rtfd,txt} - limited text shown in Intro
6126 ReadMe.{rtf,html,rtfd,txt} - scrollable/printable, after Intro
6127 License.{rtf,html,rtfd,txt} - ditto, user must click 'Accept'
6128 background.{jpg,tif,gif,pict,eps,pdf} 620x418 background image
6130 # These scripts looked for in the resource path
6131 InstallationCheck $pkgpath $defaultloc $targetvol
6132 0:ok 32:warn 32+x:warn[1] 64:stop 96+x:stop[2]
6133 VolumeCheck $volpath
6134 0:ok 32:failure 32+x:failure[3]
6135 preflight $pkgpath $targetloc $targetvol [priv]
6136 preinstall $pkgpath $targetloc $targetvol [priv]
6137 preupgrade $pkgpath $targetloc $targetvol [priv]
6138 postinstall $pkgpath $targetloc $targetvol [priv]
6139 postupgrade $pkgpath $targetloc $targetvol [priv]
6140 postflight $pkgpath $targetloc $targetvol [priv]
6141 0:ok else fail (for all scripts)
6143 A detailed reason is deduced by finding an index x (16..31)
6144 in the file InstallationCheck.strings or VolumeCheck.strings.
6146 Scripts marked [priv] are executed with root privileges.
6147 None of the [priv] scripts are used by metapackages.
6149 # Default permissions
6150 Permissions of existing directories should match those
6151 of a clean install of the OS; typically root:admin 0775
6152 New directories or files should be 0775 or 0664 with the
6153 appropriate user:group.
6155 /etc root:admin 0755
6156 /var root:admin 0755
6158 <http://developer.apple.com/documentation/DeveloperTools/Conceptual/SoftwareDistribution4/Concepts/sd_pkg_flags.html>
6160 CFBundleGetInfoString: "1.2.3, Quest Software, Inc.",
6161 CFBundleIdentifier: "com.quest.rc.openssh",
6162 CFBundleShortVersionString: "1.2.3",
6165 IFPkgFlagAllowBackRev: false,
6166 IFPkgFlagAuthorizationAction: "AdminAuthorization",
6167 IFPkgFlagDefaultLocation: "/",
6168 IFPkgFlagFollowLinks: true,
6169 IFPkgFlagInstallFat: false,
6170 IFPkgFlagInstalledSize: <integer>, # this is added by packagemaker
6171 IFPkgFlagIsRequired: false,
6172 IFPkgFlagOverwritePermissions: false,
6173 IFPkgFlagRelocatable: false,
6174 IFPkgFlagRestartAction: "NoRestart",
6175 IFPkgFlagRootVolumeOnly: false,
6176 IFPkgFlagUpdateInstalledLanguages: false,
6177 IFPkgFormatVersion= 0.10000000149011612,
6178 IFRequirementDicts: [ {
6180 SpecArgument = "/opt/quest/lib/libvas.4.2.0.dylib",
6183 TestOperator = "eq", } ]
6186 Description.plist = {
6187 IFPkgDescriptionDescription = "this is the description text",
6188 IFPkgDescriptionTitle = "quest-openssh"
6192 'launchd' is a kind of combined inetd and rc/init.d system.
6193 <http://developer.apple.com/documentation/MacOSX/Conceptual/BPSystemStartup/Articles/DesigningDaemons.html>
6194 Create a /Library/LaunchDaemons/$daemonname.plist file
6195 Examples found in /System/Library/LaunchDaemons/
6196 See manual page launchd.plist(5) for details:
6198 { Label: "com.quest.vintela.foo", # required
6199 Program: "/sbin/program",
6200 ProgramArguments: [ "/sbin/program", "arg1", "arg2" ], # required
6202 WatchPaths: [ "/etc/crontab" ],
6203 QueueDirectories: [ "/var/cron/tabs" ],
6204 inetdCompatibility: { Wait: false }, # inetd-only
6205 OnDemand: false, # recommended
6206 SessionCreate: true,
6209 Sockets: { # inetd only
6211 SockServiceName: "ssh",
6212 Bonjour: ["ssh", "sftp-ssh"], } },
6214 StandardErrorPath: "/dev/null",
6218 How to add a new user
6219 dscl . -create /Users/$user
6220 dscl . -create /Users/$user UserShell /bin/bash
6221 dscl . -create /Users/$user RealName "$user"
6222 dscl . -create /Users/$user UniqueID $uid
6223 dscl . -create /Users/$user PrimaryGroupID $gid
6224 dscl . -create /Users/$user NFSHomeDirectory /Users/$user
6225 dscl . -passwd /Users/$user "$passwd"
6227 chown $uid.$gid /Users/$user
6232 pp_platforms="$pp_platforms macos"
6234 pp_backend_macos_detect () {
6235 [ x"$1" = x"Darwin" ]
6238 pp_backend_macos_init () {
6239 pp_macos_default_bundle_id_prefix="com.quest.rc."
6241 pp_macos_bundle_vendor=
6242 pp_macos_bundle_version=
6243 pp_macos_bundle_info_string=
6244 pp_macos_prog_packagemaker=/Developer/usr/bin/packagemaker
6245 pp_macos_pkg_domain=anywhere
6246 pp_macos_pkg_extra_flags=
6252 while test $# -gt 0; do
6255 start-plist) cat <<-.; in=" "; shift ;;
6256 <?xml version="1.0" encoding="UTF-8"?>
6257 <!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
6258 <plist version="1.0">
6260 end-plist) echo "</plist>"; in=; shift;;
6262 '[') echo "$in<array>"; in="$in "; shift;;
6263 ']') echo "$in</array>"; in="${in# }"; shift;;
6264 '{') echo "<dict>"; in="$in "; shift;;
6265 '}') echo "</dict>"; in="${in# }"; shift;;
6266 key) shift; echo "$in<key>$1</key>"; shift;;
6268 echo "$1" | sed -e 's/&/&/g;s/</\</g;s/>/\>/g;' \
6269 -e 's/^/'"$in"'<string>/;s/$/<\/string>/';
6271 true) echo "$in<true/>"; shift;;
6272 false) echo "$in<false/>"; shift;;
6273 real) shift; echo "$in<real>$1</real>"; shift;;
6274 integer) shift; echo "$in<integer>$1</integer>"; shift;;
6275 date) shift; echo "$in<date>$1</date>"; shift;; # ISO 8601 format
6276 data) shift; echo "$in<data>$1</data>"; shift;; # base64 encoded
6277 *) pp_error "pp_macos_plist: bad argument '$1'"; shift;;
6282 pp_macos_rewrite_cpio () {
6284 script=$pp_wrkdir/cpio-rewrite.pl
6285 # rely on the fact that OS X comes with perl. It is a little easier to
6286 # re-write a binary stream with perl than it is with posix :)
6288 # A CPIO header block has octal fields at the following offset/lengths:
6303 my ($type,$mode,$uid,$gid,$flags,$name) =
6304 m/^(.) (\d+) (\S+) (\S+) (\S+) (.*)/;
6305 $uid = 0 if $uid eq "-";
6306 $gid = 0 if $gid eq "-";
6307 if ($uid ne "=" and $uid =~ m/\D/) {
6308 my @pw = getpwnam($uid) or die "bad username '$uid'";
6311 if ($gid ne "=" and $gid =~ m/\D/) {
6312 my @gr = getgrnam($gid) or die "bad group '$gid'";
6315 $name = ".".$name."\0";
6317 $uid{$name} = sprintf("%06o",int($uid)) unless $uid eq "=";
6318 $gid{$name} = sprintf("%06o",int($gid)) unless $gid eq "=";
6319 $mode{$name} = sprintf("%06o",oct($mode)) unless $mode eq "=";
6321 $ok{"TRAILER!!!\0"} = 1;
6322 while (!eof STDIN) {
6323 read STDIN, $header, 76;
6324 die "bad magic" unless $header =~ m/^070707/;
6325 $namesize = oct(substr($header,59,6));
6326 $filesize = oct(substr($header,65,11));
6327 read STDIN, $name, $namesize;
6328 # convert uid and gid to 0
6329 substr($header, 24, 6) = $uid{$name} if defined($uid{$name});
6330 substr($header, 30, 6) = $gid{$name} if defined($gid{$name});
6331 substr($header, 18, 6) = $mode{$name} if defined($mode{$name});
6332 print ($header, $name) if $ok{$name};
6333 # copy-through the file data
6334 while ($filesize > 0) {
6336 $seg = $filesize if $filesize < $seg;
6338 read STDIN, $data, $seg;
6339 print $data if $ok{$name};
6346 # Append to the script the %files data
6347 cat "$@" </dev/null >> $script
6348 /usr/bin/perl $script || pp_error "pp_macos_rewrite_cpio error";
6351 pp_macos_files_bom () {
6352 typeset _l t m o g f p st owner
6353 while read t m o g f p st; do
6354 # make sure that $m is padded up to 4 digits long
6359 ?????*) pp_fatal "pp_macos_writebom: mode '$m' too long";;
6362 # convert owner,group into owner/group in octal
6363 case $o in -) o=0;; esac
6364 case $g in -) g=0;; esac
6365 owner=`pp_d2o $o`/`pp_d2o $g`
6369 echo ".$p 10$m $owner `
6370 /usr/bin/cksum < "${pp_destdir}$p" |
6371 awk '{print $2 " " $1}'`";;
6373 echo ".${p%/} 4$m $owner";;
6375 rl=`/usr/bin/readlink "${pp_destdir}$p"`
6376 #test x"$rl" = x"$st" ||
6377 # pp_error "symlink mismatch $rl != $st"
6378 echo ".$p 12$m $owner `
6379 /usr/bin/readlink -n "${pp_destdir}$p" |
6381 awk '{print $2 " " $1}'` $st";;
6386 pp_macos_bom_fix_parents () {
6388 sub dirname { my $d=shift; $d=~s,/[^/]*$,,; $d; }
6389 sub chk { my $d=shift;
6390 &chk(&dirname($d)) if $d =~ m,/,;
6391 unless ($seen{$d}++) {
6392 print "$d\t40755\t0/0\n";
6396 &chk(&dirname($&));'
6399 pp_macos_files_size () {
6400 typeset _l t m o g f p st owner
6401 while read t m o g f p st; do
6403 f) wc -c < "${pp_destdir}$p";;
6405 d) ;; # always seems to be zero
6407 done | awk '{n+=1+int($1/4096)} END {print n*4}'
6411 awk 'BEGIN { x=0; '`echo "$1" |
6412 sed -e 's/./x=x*8+&;/g'`'print x;}' </dev/null
6417 *) awk 'BEGIN { printf("%o\n", 0+('"$1"'));}' < /dev/null;;
6422 #/usr/bin/mkbom -i $1 $2
6423 typeset path mode ugid size cksum linkpath
6426 # Use mkbom if it understands -i (avoids a copy)
6427 if /usr/bin/mkbom -i /dev/null "$2" 2>/dev/null; then
6429 /usr/bin/mkbom -i "$1" "$2"
6433 # On 10.4 we have this nonsense.
6434 pp_warn "mkbom workaround: copying source files to staging area"
6436 bomstage=$pp_wrkdir/bom_stage
6437 while IFS=' ' read path mode ugid size cksumi linkpath; do
6438 if test -h "$pp_destdir/$path"; then
6439 /bin/ln -s "$linkpath" "$bomstage/$path"
6441 if test -d "$pp_destdir/$path"; then
6442 /bin/mkdir -p "$bomstage/$path"
6444 /bin/cp "$pp_destdir/$path" "$bomstage/$path"
6446 /bin/chmod $mode "$bomstage/$path"
6447 /usr/sbin/chown `echo $ugid| tr / :` "$bomstage/$path"
6450 (cd $bomstage && mkbom . $pp_wrkdir/bom_stage.bom) ||
6451 pp_error "mkbom failed"
6452 mv $pp_wrkdir/bom_stage.bom "$2"
6455 pp_backend_macos () {
6456 typeset pkgdir Contents Resources lprojdir
6457 typeset Info_plist Description_plist
6458 typeset bundle_vendor bundle_version size
6460 mac_version=`sw_vers -productVersion`
6461 bundle_vendor=${pp_macos_bundle_vendor:-$vendor}
6463 if test -z "$pp_macos_bundle_version"; then
6464 bundle_version=`echo "$version.0.0.0" | sed -n -e 's/[^0-9.]//g' \
6465 -e 's/^\([0-9][0-9]*\.[0-9][0-9]*\.[0-9][0-9]*\).*/\1/p'`
6466 #if test x"$bundle_version" != x"$version"; then
6467 # pp_warn "converted version from '$version' to '$bundle_version'"
6470 bundle_version="$pp_macos_bundle_version"
6472 source_version=`echo $version | sed 's/.*\.//'`
6474 # build the package layout
6475 pkgdir=$pp_wrkdir/$name.pkg
6476 Contents=$pkgdir/Contents
6477 Resources=$Contents/Resources
6478 lprojdir=$Resources/en.lproj
6479 mkdir $pkgdir $Contents $Resources $lprojdir ||
6480 pp_fatal "Can't make package temporary directories"
6482 echo "major: 1" > $Resources/package_version
6483 echo "minor: 0" >> $Resources/package_version
6484 echo "pmkrpkg1" > $Contents/PkgInfo
6485 case $mac_version in
6487 xattr -w "com.apple.TextEncoding" "macintosh;0" "$Resources/package_version"
6488 xattr -w "com.apple.TextEncoding" "macintosh;0" "$Resources/PkgInfo"
6492 # compute the installed size
6493 size=`cat $pp_wrkdir/%files.* | pp_macos_files_size`
6495 #-- Create Info.plist
6496 Info_plist=$Contents/Info.plist
6499 key CFBundleGetInfoString string \
6500 "${pp_macos_bundle_info_string:-$version $bundle_vendor}" \
6501 key CFBundleIdentifier string \
6502 "${pp_macos_bundle_id:-$pp_macos_default_bundle_id_prefix$name}" \
6503 key CFBundleName string "$name" \
6504 key CFBundleShortVersionString string "$bundle_version" \
6505 key IFMajorVersion integer 1 \
6506 key IFMinorVersion integer 0 \
6507 key IFPkgFlagAllowBackRev false \
6508 key IFPkgFlagAuthorizationAction string "RootAuthorization" \
6509 key IFPkgFlagDefaultLocation string "/" \
6510 key IFPkgFlagFollowLinks true \
6511 key IFPkgFlagInstallFat true \
6512 key IFPkgFlagInstalledSize integer $size \
6513 key IFPkgFlagIsRequired false \
6514 key IFPkgFlagOverwritePermissions true \
6515 key IFPkgFlagRelocatable false \
6516 key IFPkgFlagRestartAction string "NoRestart" \
6517 key IFPkgFlagRootVolumeOnly true \
6518 key IFPkgFlagUpdateInstalledLanguages false \
6519 key IFPkgFlagUseUserMask false \
6520 key IFPkgFormatVersion real 0.10000000149011612 \
6521 key SourceVersion string $source_version \
6522 \} end-plist> $Info_plist
6524 # write en.lproj/Description.plist
6525 Description_plist=$lprojdir/Description.plist
6528 key IFPkgDescriptionDeleteWarning string "" \
6529 key IFPkgDescriptionDescription string "$pp_macos_bundle_info_string" \
6530 key IFPkgDescriptionTitle string "$name" \
6531 key IFPkgDescriptionVersion string "$version" \
6532 \} end-plist > $Description_plist
6534 # write Resources/files
6535 cat $pp_wrkdir/%files.* | awk '{print $6}' > $Resources/files
6537 # write package size file
6542 " > $Resources/$name.sizes
6544 # write Resources/postinstall
6545 for cmp in $pp_components; do
6546 if test -s $pp_wrkdir/%pre.$cmp; then
6547 if test ! -s $Resources/preinstall; then
6548 echo "#!/bin/sh" > $Resources/preinstall
6549 chmod +x $Resources/preinstall
6551 cat $pp_wrkdir/%pre.$cmp >> $Resources/preinstall
6552 echo : >> $Resources/preinstall
6556 # write Resources/postinstall
6557 for cmp in $pp_components; do
6558 if test -s $pp_wrkdir/%post.$cmp; then
6559 if test ! -s $Resources/postinstall; then
6560 echo "#!/bin/sh" > $Resources/postinstall
6561 chmod +x $Resources/postinstall
6563 cat $pp_wrkdir/%post.$cmp >> $Resources/postinstall
6564 echo : >> $Resources/postinstall
6568 # write Resources/postupgrade)
6569 for cmp in $pp_components; do
6570 if test -s $pp_wrkdir/%postup.$cmp; then
6571 if test ! -s $Resources/postupgrade; then
6572 echo "#!/bin/sh" > $Resources/postupgrade
6573 chmod +x $Resources/postupgrade
6575 cat $pp_wrkdir/%postup.$cmp >> $Resources/postupgrade
6576 echo : >> $Resources/postupgrade
6580 # write Resources/preremove)
6581 for cmp in $pp_components; do
6582 if test -s $pp_wrkdir/%preun.$cmp; then
6583 if test ! -s $Resources/preremove; then
6584 echo "#!/bin/sh" > $Resources/preremove
6585 chmod +x $Resources/preremove
6587 cat $pp_wrkdir/%preun.$cmp >> $Resources/preremove
6588 echo : >> $Resources/preremove
6592 # write Resources/postremove)
6593 for cmp in $pp_components; do
6594 if test -s $pp_wrkdir/%postun.$cmp; then
6595 if test ! -s $Resources/postremove; then
6596 echo "#!/bin/sh" > $Resources/postremove
6597 chmod +x $Resources/postremove
6599 cat $pp_wrkdir/%postun.$cmp >> $Resources/postremove
6600 echo : >> $Resources/postremove
6604 # write uninstall info
6605 echo "version=$version" > $Resources/uninstall
6606 if [ -n "$pp_macos_requires" ];then
6607 echo "requires=$pp_macos_requires" >> $Resources/uninstall
6610 # Create the bill-of-materials (Archive.bom)
6611 cat $pp_wrkdir/%files.* | pp_macos_files_bom | sort |
6612 pp_macos_bom_fix_parents > $pp_wrkdir/tmp.bomls
6614 pp_macos_mkbom $pp_wrkdir/tmp.bomls $Contents/Archive.bom
6616 # Create the cpio archive (Archive.pax.gz)
6617 # On 10.5, we used "-f -" to write explicitly to stdout
6620 cat $pp_wrkdir/%files.* | awk '{ print "." $6 }' | sed '/\/$/d' | sort | /bin/pax -w -f - | gzip -9 -c > $Contents/Archive.pax.gz
6623 rm -rf $pp_wrkdir/bom_stage
6626 pp_backend_macos_cleanup () {
6630 pp_backend_macos_names () {
6634 pp_backend_macos_install_script () {
6636 typeset pkgname platform
6638 pkgname="`pp_backend_macos_names`"
6639 platform="`pp_backend_macos_probe`"
6640 pp_install_script_common
6643 test \$# -eq 0 && usage
6648 test \$# -eq 0 || usage \$op
6649 echo "$pp_components"
6652 test \$# -eq 0 || usage \$op
6656 test \$# -ge 1 || usage \$op
6657 echo \${PP_PKGDESTDIR:-.}/"$pkgname"
6660 test \$# -ge 1 || usage \$op
6662 pkg=\$vol/${name}-${version}.pkg
6663 hdiutil attach -readonly -mountpoint \$vol \
6664 \${PP_PKGDESTDIR:-.}/"$pkgname"
6665 trap "hdiutil detach \$vol" 0
6666 installer -pkginfo -pkg \$pkg
6667 installer -verbose -pkg \$pkg -target /
6670 test \$# -ge 1 || usage \$op
6672 echo "Uninstall not implemented" >&2
6675 test \$# -ge 1 || usage \$op
6680 echo "\${op} not implemented" >&2
6694 pp_backend_macos_init_svc_vars () {
6698 pp_backend_macos_probe () {
6699 typeset name vers arch
6700 case `sw_vers -productName` in
6701 "Mac OS X") name="macos";;
6704 vers=`sw_vers -productVersion | sed -e 's/^\([^.]*\)\.\([^.]*\).*/\1\2/'`
6706 echo "$name$vers-$arch"
6709 pp_backend_macos_vas_platforms () {
6710 echo "osx" # XXX non-really sure what they do.. it should be "macos"
6712 pp_backend_macos_function () {
6714 _pp_macos_search_unused) cat<<'.';;
6715 # Find an unused value in the given path
6716 # args: path attribute minid [maxid]
6719 test $pp_tmp_val -ge ${4:-999999} && return 1
6720 /usr/bin/dscl . -search "$1" "$2" $pp_tmp_val |
6721 grep . > /dev/null || break
6722 pp_tmp_val=`expr $pp_tmp_val + 1`
6726 pp_mkgroup:depends) echo _pp_macos_search_unused;;
6727 pp_mkgroup) cat<<'.';;
6729 /usr/bin/dscl . -read /Groups/"$1" >/dev/null 2>&1 && return
6730 pp_tmp_gid=`_pp_macos_search_unused /Groups PrimaryGroupID 100`
6731 /usr/bin/dscl . -create /Groups/"$1"
6732 /usr/bin/dscl . -create /Groups/"$1" PrimaryGroupID $pp_tmp_gid
6733 /usr/bin/dscl . -create /Groups/"$1" RealName "Group $1"
6734 /usr/bin/dscl . -create /Groups/"$1" GroupMembership ""
6735 /usr/bin/dscl . -create /Groups/"$1" Password '*'
6737 pp_mkuser:depends) echo pp_mkgroup _pp_macos_search_unused;;
6738 pp_mkuser) cat<<'.';;
6740 /usr/bin/dscl . -read /Users/"$1" >/dev/null 2>&1 && return
6741 pp_tmp_uid=`_pp_macos_search_unused /Users UniqueID 100`
6742 pp_mkgroup "${2:-$1}"
6743 pp_tmp_gid=`/usr/bin/dscl . -read /Groups/"${2:-$1}" \
6744 PrimaryGroupID | awk '{print $2}'`
6745 /usr/bin/dscl . -create /Users/"$1"
6746 /usr/bin/dscl . -create /Users/"$1" PrimaryGroupID $pp_tmp_gid
6747 /usr/bin/dscl . -create /Users/"$1" NFSHomeDirectory \
6749 /usr/bin/dscl . -create /Users/"$1" UserShell \
6750 "${4:-/usr/bin/false}"
6751 /usr/bin/dscl . -create /Users/"$1" RealName "$1"
6752 /usr/bin/dscl . -create /Users/"$1" UniqueID $pp_tmp_uid
6753 /usr/bin/dscl . -create /Users/"$1" Password '*'
6755 pp_havelib) cat<<'.';;
6756 # (use otool -L to find dependent libraries)
6757 for pp_tmp_dir in `echo "${3:+$3:}/usr/local/lib:/lib:/usr/lib" |
6759 test -r "$pp_tmp_dir/lib$1{$2:+.$2}.dylib" && return 0
6767 pp_platforms="$pp_platforms inst"
6769 pp_backend_inst_detect () {
6776 pp_backend_inst_init () {
6777 pp_readlink_fn=pp_ls_readlink
6780 pp_backend_inst_create_idb()
6782 typeset t m o g f p st
6784 while read t m o g f p st; do
6785 if test x"$o" = x"-"; then
6788 if test x"$g" = x"-"; then
6792 f) test x"$m" = x"-" && m=444
6793 echo "f 0$m $o $g $p $p $name.sw.base"
6795 d) test x"$m" = x"-" && m=555
6796 echo "d 0$m $o $g $p $p $name.sw.base"
6798 s) test x"$m" = x"-" && m=777
6799 test x"$m" = x"777" ||
6800 pp_warn "$p: invalid mode $m for symlink, should be 777 or -"
6801 echo "l 0$m $o $g $p $p $name.sw.base symval($st)"
6807 pp_backend_inst_create_spec()
6809 echo "product $name"
6810 echo " id \"${summary}. Version: ${version}\""
6812 echo " id \"Software\""
6813 echo " version $version"
6816 echo " id \"Base Software\""
6817 echo " replaces self"
6818 echo " exp $name.sw.base"
6824 pp_backend_inst () {
6830 pp_inst_tardist=tardist
6831 pp_inst_spec=${name}.spec
6832 pp_inst_idb=${name}.idb
6834 rm -rf $pp_inst_tardist $pp_inst_spec $pp_inst_idb
6835 mkdir -p $pp_inst_tardist
6838 (for _cmp in $pp_components; do
6839 cat %files.$_cmp | sort +4u -6 | pp_backend_inst_create_idb
6840 done) >> $pp_inst_idb
6842 pp_backend_inst_create_spec >> $pp_inst_spec
6845 gendist -verbose -all -root / -source $pp_opt_destdir -idb $pp_inst_idb -spec $pp_inst_spec -dist $pp_inst_tardist $name
6846 tar -cvf `pp_backend_inst_names` $pp_inst_tardist
6851 pp_backend_inst_cleanup () {
6855 pp_backend_inst_names () {
6856 echo ${name}-${version}.tardist
6859 pp_backend_inst_install_script () {
6863 pp_backend_inst_function () {
6867 pp_backend_inst_init_svc_vars () {
6871 pp_backend_inst_probe () {
6872 cpu=`hinv|sed -n '/^CPU/{s/000 /k /;s/^CPU: //;s/ Process.*//;s/^MIPS //;p;q;}'|tr A-Z a-z`
6873 echo irix`uname -r`-$cpu
6876 pp_backend_inst_vas_platforms () {
6880 pp_platforms="$pp_platforms null"
6882 pp_backend_null_detect () {
6886 pp_backend_null_init () {
6891 pp_backend_null () {
6895 pp_backend_null_cleanup () {
6899 pp_backend_null_names () {
6903 pp_backend_null_install_script () {
6907 pp_backend_null_function () {
6911 pp_backend_null_init_svc_vars () {
6915 pp_backend_null_probe () {
6916 echo unknown-unknown
6919 pp_backend_null_vas_platforms () {
6924 quest_require_vas () {
6927 if test $# -ne 1; then
6930 set -- `echo "$1" | tr . ' '` 0 0 0
6934 echo $d | grep '^[0-9][0-9]*$' > /dev/null ||
6935 pp_error "quest_require_vas: Bad version component $d"
6939 pp_error "quest_require_vas: missing version number"
6941 case "$1.$2.$3.$4" in
6944 *.*.*.0) v=$1.$2.$3;;
6949 if test -x /opt/quest/bin/vastool &&
6950 /opt/quest/bin/vastool -v |
6951 awk 'NR == 1 {print \$4}' |
6952 awk -F. '{ if (\$1<$1 || \$1==$1 && ( \
6953 \$2<$2 || \$2==$2 && ( \
6954 \$3<$3 || \$2==$3 && ( \
6955 \$4<$4 )))) exit(1); }'
6959 echo "Requires VAS $v or later"