Rychle stahovani posty

[Martin `MJ' Mares]

Zdravim,

> Proto by mě zajímalo, zda neexistuje nějaké jiné rychlejší řešení.
> Já to teď řeším tak, ze se natelnetuji na stroj kde mám poštu,
> zkopíruji si svuj mailbox do $HOME, původní smažu, zagzipuji
> a pomocí ftp stáhnu. Na svém stroji pak jednoduše přidám do mailboxu.

   Ja pouzivam nasledujici scriptiky:

~/bin/Mget na lokalnim stroji:

#!/bin/sh

set -e
HOSTS="atrey.karlin.mff.cuni.cz"
case "$1" in
	""|-*)	PATT="*" ;;
	*)	PATT="*$1*" ; shift ;;
esac

for HOST in $HOSTS ; do
	case $HOST in
		$PATT)	echo "Fetching mail from $HOST..."
			ssh -C $HOST "bin/Msend $@" >>~/Mail/incoming.tmp
			echo 'Syncing...'
			sync
			echo 'Cleaning mail...'
			ssh $HOST 'rm Mail/outgoing.tmp'
			;;
	esac
done

if [ -f ~/Mail/incoming.tmp ] ; then
	echo 'Distributing...'
	formail -s procmail <~/Mail/incoming.tmp
	echo 'Cleaning up...'
	sync
	rm ~/Mail/incoming.tmp
else
	echo 'No mail to process.'
fi
echo 'Done.'

A ~/bin/Msend na stroji vzdalenem:

#!/bin/sh

set -e
umask 077
lockfile -l 1024 -ml
cat $MAIL >>~/Mail/outgoing.tmp
>$MAIL
lockfile -mu
if [ -z "$1" ] ; then
	for a in ~/Mail/*_list ; do
		if [ -f $a ] ; then
			lockfile -l 1024 $a.lock
			cat $a >>~/Mail/outgoing.tmp
			rm $a
			rm -f $a.lock
		fi
	done
else
	echo >&2 "Omitting mailing lists."
fi
ls -l ~/Mail/outgoing.tmp | awk '{ print $5; }' >&2
cat ~/Mail/outgoing.tmp

				Have a nice fortnight
-- 
Martin `MJ' Mares   <mj na ucw.cz>   http://atrey.karlin.mff.cuni.cz/~mj/
Faculty of Math and Physics, Charles University, Prague, Czech Rep., Earth
"Hex dump:  Where witches put used curses..."