Scripts mail-related

[scripts-20-100.git] / mails / filter_dirs.sh

diff --git a/mails/filter_dirs.sh b/mails/filter_dirs.sh
new file mode 100755 (executable)
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