#!/bin/bash

# Extract relevant information from new emails from the specified
# account. Can be useful for notifications.

for i in $(find $1 -path '*/INBOX*?new/*'); do
    awk '
        BEGIN {
            subject = "Subject: <empty>"
        }
        /^[^ \t]/ {
            from_block = 0
        }
        /^[ \t]+/ && from_block {
            sub(/^[ \t]+/, "")
            sub(/=\?.*\?=/, "")
            from = from $0
        }
        /^Date:/ {
            date = $0
        }
        /^From:/ {
            sub(/=\?.*\?=/, "")
            from = $0
            from_block = 1
        }
        /^Subject:/ {
            subject = $0
        }
        END {
            print " "
            print date
            print from
            print subject
        }
    ' "$i"
done