Add 'm-sync' and 'getpw' scripts

m-sync is a wrapper around m-pop that filters headers with m-filter.

2 files changed, 24 insertions, 0 deletions

diff --git a/src/getpw b/src/getpw
new file mode 100755
index 0000000..8115716
--- /dev/null
+++ b/src/getpw
@@ -0,0 +1,10 @@
+#!/bin/sh
+
+# getpw -- read password
+
+printf 'Enter password: ' > /dev/tty
+stty -f /dev/tty -echo
+read PASSWORD < /dev/tty
+stty -f /dev/tty echo
+echo > /dev/tty
+echo "$PASSWORD"
diff --git a/src/m-sync b/src/m-sync
new file mode 100755
index 0000000..d4653d8
--- /dev/null
+++ b/src/m-sync
@@ -0,0 +1,14 @@
+#!/bin/sh
+
+# m-sync -- retrieve mail
+
+# Edit this script to your own preferences.
+
+USERNAME=john@ankarstrom.se
+PASSWORD=`./getpw`
+export USERNAME PASSWORD
+
+mkfifo mbox.i.in
+m-filter < mbox.i.in >> mbox.i &
+m-pop -m mbox -i mbox.i -j mbox.i.in
+rm mbox.i.in