Return to uucproute CVS log

Up to [Research Unix] / researchv10no / cmd / nupas / config / 112clients

Annotation of researchv10no/cmd/nupas/config/112clients/uucproute, revision 1.1

1.1     ! root        1: #!/bin/sh -p
        !             2: PATH=/bin:/usr/bin:/usr/lib/upas; export PATH
        !             3: sender=$1;shift
        !             4: system=$1;shift
        !             5: sys=`cat /etc/whoami`
        !             6: 
        !             7: # save the mail
        !             8: cat > /tmp/ur$$
        !             9: 
        !            10: #
        !            11: # Try smtp via datakit.  Mail to a!b!c from d!e!f will be
        !            12: # transformed into mail to c@b from f%e@d
        !            13: # 
        !            14: netname=`egrep ".*/.*/$system\$" /usr/lib/asd/destinations`
        !            15: case $netname in
        !            16: "") ;;
        !            17: *)  tosmtp -u $sender dk!$system!smtp $* < /tmp/ur$$ && rm -f /tmp/ur$$ && exit 0
        !            18:     ;;
        !            19: esac
        !            20: 
        !            21: #
        !            22: # finally try old faithful.  Queuing is only done by uucp.
        !            23: #
        !            24: uux - -a "$sender" "$system!rmail" "($*)" < /tmp/ur$$ && rm -f /tmp/ur$$ && exit 0
        !            25: 
        !            26: # get gateway system
        !            27: gateway=`cat /usr/lib/upas/gateway`
        !            28: case $gateway in
        !            29: "") gateway=research ;;
        !            30: esac
        !            31: 
        !            32: # let the gateway figure it out
        !            33: temp=
        !            34: for i in $*; do temp="$temp $system!$i"; done
        !            35: tosmtp -u $sender dk!$gateway!smtp $temp < /tmp/ur$$ && rm -f /tmp/ur$$ && exit 0
        !            36: uux - -a "$sender" "$gateway!rmail" "($temp)" </tmp/ur$$
        !            37: rv=$?
        !            38: rm -f /tmp/ur$$
        !            39: exit $rv

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