#!/bin/sh

set -eu


mkmaildir()
{
    mkdir "$1" "$1/cur" "$1/tmp" "$1/new"
}

mkmail()
{
    cat > "$1/tmp/newmail"
    local sum=$(md5sum "$1/tmp/newmail" | awk '{ print $1 }')
    mv "$1/tmp/newmail" "$1/new/$sum"
}

mkdir maildirs mboxes
mkmaildir maildirs/foo 
mkmaildir maildirs/bar

mkmail maildirs/foo <<EOF
From: foo
To: bar
Subject: yo
Received: from example.com (lists.example.com [10.0.0.1])
        (using TLSv1 with cipher DHE-RSA-AES256-SHA (256/256 bits))
        (No client certificate requested)
        by pieni.net (Postfix) with ESMTPS id E2ACD23344
        for <liw@liw.fi>; Mon,  7 Jan 2013 09:49:29 +0100 (CET)
Date: Mon,  7 Jan 2013 09:49:29 +0100 (CET)

Hello, there.
EOF


mkmail maildirs/bar <<EOF
From: foo
To: bar
Subject: plugh
Received: from example.com (lists.example.com [10.0.0.1])
        (using TLSv1 with cipher DHE-RSA-AES256-SHA (256/256 bits))
        (No client certificate requested)
        by pieni.net (Postfix) with ESMTPS id E2ACD23344
        for <liw@liw.fi>; Mon,  7 Jan 2012 09:49:29 +0100 (CET)
Date: Mon,  7 Jan 2012 09:49:29 +0100 (CET)

Hi.
EOF


touch mboxes/2012.mbox.xz