Annotation of 43BSD/contrib/mh/miscellany/mtrenv/bin/distf, revision 1.1.1.1

1.1       root        1: : run this script through /bin/sh
                      2: : PATH=:/bin:/usr/bin:/usr/ucb:/usr/uci:/usr/uci/lib/mh; export PATH
                      3: case $LOCAL in
                      4:     "")  LOCAL="`rprompt %h`"
                      5:         export LOCAL ;;
                      6: esac
                      7: F="" H="" N=F T=+${LOCAL}$$
                      8: 
                      9: for A in $*
                     10: do
                     11:     case $A in
                     12:        -nov*)  N=F ;;
                     13: 
                     14:        -v*)    N=T ;;
                     15: 
                     16:        -*)     echo "distf: $A unknown" 1>&2
                     17:                exit 1 ;;
                     18: 
                     19:        +*|@*)  case $F in
                     20:                    "")  F=$A ;;
                     21:                    *)   echo "distf: only one folder at a time" 1>&2
                     22:                         exit 1 ;;
                     23:                esac ;;
                     24: 
                     25:        *)      case $H in
                     26:                    "")  H=$A ;;
                     27:                    *)   echo "distf: only one host at a time" 1>&2
                     28:                         exit 1 ;;
                     29:                esac ;;
                     30:     esac
                     31: done
                     32: 
                     33: case $F in
                     34:     "")  F=+outbox ;;
                     35: esac
                     36: case $H in
                     37:     "")         echo "usage: distf hostname [+folder]" 1>&2
                     38:         exit 1 ;;
                     39: esac
                     40: 
                     41: prf=/tmp/prf$$ ctx=/tmp/ctx$$
                     42: trap "rm -f $prf $ctx" 0 1 2 3 13 15
                     43: 
                     44: rm -f $prf
                     45: echo "MH-Sequences:" > $prf
                     46: cat ${MH-$HOME/.mh_profile} >> $prf
                     47: MH="$prf" ; export MH
                     48: 
                     49: rm -f $ctx
                     50: cp ${MHCONTEXT-`mhpath +`/context} $ctx
                     51: MHCONTEXT="$ctx" ; export MHCONTEXT
                     52: 
                     53: if mhpath $F all > /dev/null;
                     54:     then
                     55:        C="rcp -r `mhpath $F` $H:`rsh $H -n mhpath $T`"
                     56:        case $N in
                     57:            T)   echo $C ;;
                     58:        esac
                     59:        if $C;
                     60:        then
                     61:            case $N in
                     62:                F) C="rsh $H -n packit $T; rmf $T" ;;
                     63: 
                     64:                T) C="rsh $H -n packit -v $T; rmf $T"
                     65:                   echo $C ;;
                     66:            esac
                     67:            if $C;
                     68:            then
                     69:                C="rmm $F all"
                     70:                case $N in
                     71:                    T)   echo "rmm $F all" ;;
                     72:                esac
                     73:                if $C;
                     74:                then
                     75:                    exit 0;
                     76:                else
                     77:                    exit 1;
                     78:                fi
                     79:            else
                     80:                exit 1;
                     81:            fi
                     82:        else
                     83:            exit 1;
                     84:        fi
                     85:     else
                     86:        exit 1;
                     87: fi
                     88: 
                     89: exit 0

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.