Implement (most of) mailbox listing

1 files changed, 37 insertions, 0 deletions

diff --git a/worker/imap/list.go b/worker/imap/list.go
new file mode 100644
index 00000000..f6d3677a
--- /dev/null
+++ b/worker/imap/list.go
@@ -0,0 +1,37 @@
+package imap
+
+import (
+	"github.com/emersion/go-imap"
+
+	"git.sr.ht/~sircmpwn/aerc2/worker/types"
+)
+
+func (imapw *IMAPWorker) handleListDirectories(msg types.ListDirectories) {
+	mailboxes := make(chan *imap.MailboxInfo)
+	done := make(chan error, 1)
+	imapw.worker.Logger.Println("Listing mailboxes")
+	go func() {
+		done <- imapw.client.List("", "*", mailboxes)
+	}()
+	go func() {
+		for {
+			select {
+			case err := <-done:
+				if err != nil {
+					imapw.worker.PostMessage(types.Error{
+						Message: types.RespondTo(msg),
+						Error:   err,
+					}, nil)
+				} else {
+					imapw.worker.PostMessage(
+						types.Done{types.RespondTo(msg)}, nil)
+				}
+				return
+			case mbox := <-mailboxes:
+				if mbox != nil {
+					imapw.worker.Logger.Printf("%v\n", mbox.Name)
+				}
+			}
+		}
+	}()
+}