X-Git-Url: http://gitweb.pimeys.fr/?a=blobdiff_plain;f=mails%2Ffilter_dirs.sh;fp=mails%2Ffilter_dirs.sh;h=1aa7070a337f3a6752ad38cf3d399b10e28f4d59;hb=0f0e567cc06e822f75971af29680be3d8e0867fa;hp=0000000000000000000000000000000000000000;hpb=5adc8d9819f83e3e0e8a97797d5fad23a5bc61a0;p=scripts-20-100.git

diff --git a/mails/filter_dirs.sh b/mails/filter_dirs.sh
new file mode 100755
index 0000000..1aa7070
--- /dev/null
+++ b/mails/filter_dirs.sh
@@ -0,0 +1,49 @@
+#! /bin/bash
+## Retrie des dossiers de mails
+## Librement adapté de la version de Harry
+
+
+RCFILE="$HOME/.procmail/rc/main"
+
+#cd $HOME/Mail
+
+for mydir in $@
+do
+d=$(basename "$mydir")
+if [[ "$mydir" != "./.Sent" ]]
+then
+echo "entering directory $d"
+
+
+[ -d "$d/cur" ] || exit 1
+
+for f in $(find "$d/cur")
+do
+#    echo "file $f"
+    if [[ -f $f ]] && [[ $(cat $f | formail -X date | wc -l) != "0" ]]; then
+#        echo "filtering mail"
+        formail -s procmail $RCFILE < "$f" #&&
+#        echo "removing mail" &&
+#        rm "$f"
+#    else
+#        echo "is not a mail"
+    fi
+done
+
+#[ -d "$d/new" ] || exit 1
+
+#for f in $(find "$d/new")
+#do
+#    echo "file $f"
+#    if [[ -f $f ]] && [[ $(cat $f | formail -X date | wc -l) != "0" ]]; then
+#        echo "marking as read"
+#        mv "$f" "$d/cur/$(basename \"$f\":2,Sa)"
+#    else
+#        echo "is not a mail"
+#    fi
+#done
+#
+#[ "$(ls -A $d/new)" ] || [ "$(ls -A $d/cur)" ] || [ "$(ls -A $d/tmp)" ] || mv "$d" "bkp$d"
+#
+fi
+done