Annotation of 43BSD/contrib/mh/miscellany/mtrenv/bin/distf, revision 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.