home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume22 / auth-utils / part01 / tam / tamd < prev    next >
Encoding:
Text File  |  1990-04-29  |  542 b   |  19 lines
  1. #!/bin/sh
  2. # tamd version 1.0, 4/23/90.
  3. # Placed into the public domain by Daniel J. Bernstein.
  4. # Requires u@h2u, flock.
  5. TAMDIR=/usr/spool/tam; export TAMDIR
  6. TO="`/usr/ucb/head -1 | tr -d ./`"; export TO
  7. if [ ! -w "$TAMDIR/$TO" ]
  8. then echo "TAM ERROR: $TO: No such user"; exit 2
  9. fi
  10. if printenv REMOTE | u@h2u | grep -s .
  11. then echo ""
  12. else echo "TAM ERROR: Unauthenticated"; exit 1
  13. fi
  14. flock "$TAMDIR/$TO" sh -c \
  15.   'exec >> "$TAMDIR/$TO";
  16.    echo "Received-From: $REMOTE via $PROTO";
  17.    echo "Received-Date: `date`";
  18.    sed "s+^+>+"; echo ">"'
  19.