Files
LambdaMail/services/protocols/internal/presentation/imap/backend.go
T

476 lines
14 KiB
Go

package imappresentation
import (
"bufio"
"bytes"
"context"
"errors"
"github.com/emersion/go-imap/v2"
"github.com/emersion/go-imap/v2/imapserver"
"github.com/emersion/go-message/textproto"
"lambdamail/protocols/internal/application/port"
"lambdamail/protocols/internal/application/usecase"
)
// session adapts imapserver.Session to ImapSessionUseCase.
type session struct {
useCase *usecase.ImapSessionUseCase
mailboxID string
selectedFolder *port.ImapFolderRecord
tracker *imapserver.SessionTracker
}
// NewSession is the imapserver.Options.NewSession callback.
func NewSession(_ *imapserver.Conn, uc *usecase.ImapSessionUseCase) (imapserver.Session, *imapserver.GreetingData, error) {
return &session{useCase: uc}, &imapserver.GreetingData{}, nil
}
func toIMAPError(err error) error {
switch {
case errors.Is(err, usecase.ErrAuthFailed):
return imapserver.ErrAuthFailed
case errors.Is(err, usecase.ErrNoSuchFolder):
return &imap.Error{Type: imap.StatusResponseTypeNo, Text: "No such mailbox"}
default:
return &imap.Error{Type: imap.StatusResponseTypeNo, Text: "Internal error"}
}
}
func (s *session) Close() error {
if s.tracker != nil {
s.tracker.Close()
s.tracker = nil
}
return nil
}
func (s *session) Login(username, password string) error {
mailboxID, err := s.useCase.Login(context.Background(), username, password)
if err != nil {
return toIMAPError(err)
}
s.mailboxID = mailboxID
return nil
}
func (s *session) Select(mailbox string, _ *imap.SelectOptions) (*imap.SelectData, error) {
rec, err := s.useCase.SelectFolder(context.Background(), s.mailboxID, mailbox)
if err != nil {
return nil, toIMAPError(err)
}
if s.tracker != nil {
s.tracker.Close()
s.tracker = nil
}
s.selectedFolder = rec
if tm := s.useCase.GetTrackerManager(); tm != nil {
s.tracker = tm.GetTracker(rec.ID, rec.NumMessages).NewSession()
}
return &imap.SelectData{
NumMessages: rec.NumMessages,
UIDNext: imap.UID(rec.UIDNext),
UIDValidity: rec.UIDValidity,
HighestModSeq: rec.HighestModSeq,
}, nil
}
func (s *session) Unselect() error {
if s.tracker != nil {
s.tracker.Close()
s.tracker = nil
}
s.selectedFolder = nil
return nil
}
func (s *session) Status(mailbox string, options *imap.StatusOptions) (*imap.StatusData, error) {
rec, err := s.useCase.SelectFolder(context.Background(), s.mailboxID, mailbox)
if err != nil {
return nil, toIMAPError(err)
}
data := &imap.StatusData{Mailbox: mailbox}
if options.NumMessages {
n := rec.NumMessages
data.NumMessages = &n
}
if options.UIDNext {
data.UIDNext = imap.UID(rec.UIDNext)
}
if options.UIDValidity {
data.UIDValidity = rec.UIDValidity
}
if options.HighestModSeq {
data.HighestModSeq = rec.HighestModSeq
}
return data, nil
}
func (s *session) Poll(w *imapserver.UpdateWriter, allowExpunge bool) error {
if s.tracker == nil {
return nil
}
return s.tracker.Poll(w, allowExpunge)
}
func (s *session) Idle(w *imapserver.UpdateWriter, stop <-chan struct{}) error {
if s.tracker == nil {
return nil
}
return s.tracker.Idle(w, stop)
}
func (s *session) List(w *imapserver.ListWriter, ref string, patterns []string, options *imap.ListOptions) error {
recs, err := s.useCase.ListFolders(context.Background(), s.mailboxID)
if err != nil {
return toIMAPError(err)
}
for _, rec := range matchFolders(recs, ref, patterns) {
if err := w.WriteList(&imap.ListData{Mailbox: rec.Name, Delim: '/'}); err != nil {
return err
}
}
return nil
}
// matchFolders filters recs down to those whose name matches at least one of
// patterns (relative to ref), using the same wildcard semantics as the LIST
// command (imapserver.MatchList: '*' matches any characters including the
// hierarchy delimiter, '%' matches any characters except the delimiter).
// Extracted from List so the matching/filtering logic can be unit-tested
// directly, since *imapserver.ListWriter cannot be constructed outside a
// live imapserver.Conn.
func matchFolders(recs []port.ImapFolderRecord, ref string, patterns []string) []port.ImapFolderRecord {
var out []port.ImapFolderRecord
for _, rec := range recs {
for _, pattern := range patterns {
if imapserver.MatchList(rec.Name, '/', ref, pattern) {
out = append(out, rec)
break
}
}
}
return out
}
// numSetIter walks every message in the selected folder in UID order,
// yielding its 1-based sequence number alongside it, and reports whether
// numSet contains that message (matching imapmemserver's own reference
// pattern of iterating known messages and calling NumSet.Contains, rather
// than trying to resolve "*" ranges ourselves).
func (s *session) numSetIter(numSet imap.NumSet, messages []port.MessageRecord, f func(seqNum uint32, msg port.MessageRecord)) {
if numSet == nil {
return
}
for i, msg := range messages {
seqNum := uint32(i) + 1
var contains bool
switch set := numSet.(type) {
case imap.SeqSet:
contains = set.Contains(seqNum)
case *imap.SeqSet:
if set != nil {
contains = set.Contains(seqNum)
}
case imap.UIDSet:
contains = set.Contains(imap.UID(msg.UID))
case *imap.UIDSet:
if set != nil {
contains = set.Contains(imap.UID(msg.UID))
}
}
if contains {
f(seqNum, msg)
}
}
}
func (s *session) Fetch(w *imapserver.FetchWriter, numSet imap.NumSet, options *imap.FetchOptions) error {
if s.selectedFolder == nil {
return &imap.Error{Type: imap.StatusResponseTypeNo, Text: "No mailbox selected"}
}
messages, err := s.useCase.FetchMessages(context.Background(), s.selectedFolder.ID)
if err != nil {
return toIMAPError(err)
}
var fetchErr error
s.numSetIter(numSet, messages, func(seqNum uint32, msg port.MessageRecord) {
if fetchErr != nil {
return
}
if options.ChangedSince > 0 && msg.ModSeq <= options.ChangedSince {
return
}
respWriter := w.CreateMessage(seqNum)
fetchErr = s.writeFetchResponse(respWriter, msg, options)
})
return fetchErr
}
func (s *session) writeFetchResponse(w *imapserver.FetchResponseWriter, msg port.MessageRecord, options *imap.FetchOptions) error {
w.WriteUID(imap.UID(msg.UID))
if options.Flags {
flags := make([]imap.Flag, len(msg.Flags))
for i, f := range msg.Flags {
flags[i] = imap.Flag(f)
}
w.WriteFlags(flags)
}
if options.InternalDate {
w.WriteInternalDate(msg.ReceivedAt)
}
if options.RFC822Size {
w.WriteRFC822Size(msg.SizeBytes)
}
needsRaw := options.Envelope || options.BodyStructure != nil || len(options.BodySection) > 0 || len(options.BinarySection) > 0
if needsRaw {
raw, err := s.useCase.ReadBlob(context.Background(), msg.BlobID)
if err != nil {
return err
}
if options.Envelope {
header, err := textproto.ReadHeader(bufio.NewReader(bytes.NewReader(raw)))
if err != nil {
return err
}
w.WriteEnvelope(imapserver.ExtractEnvelope(header))
}
if options.BodyStructure != nil {
w.WriteBodyStructure(imapserver.ExtractBodyStructure(bytes.NewReader(raw)))
}
for _, bs := range options.BodySection {
buf := imapserver.ExtractBodySection(bytes.NewReader(raw), bs)
wc := w.WriteBodySection(bs, int64(len(buf)))
_, writeErr := wc.Write(buf)
closeErr := wc.Close()
if writeErr != nil {
return writeErr
}
if closeErr != nil {
return closeErr
}
}
}
return w.Close()
}
// expungeUIDs marks messages expunged: when requireDeleted is true, every
// message in the selected folder carrying \Deleted (used by EXPUNGE, per RFC
// 3501); when false, every message matched by uids regardless of flags (used
// by MOVE, per RFC 6851 - "MOVE is not required to use the \Deleted flag to
// mark messages", precisely so a client doesn't have to flag-then-expunge).
// It tells the use case to mark the matched UIDs expunged, and returns their
// sequence numbers in descending order (so callers can report EXPUNGE
// responses without a removal invalidating the sequence numbers of messages
// reported afterward - matches go-imap/v2's own imapmemserver reference
// behavior). Shared by Expunge and Move, which each write their own EXPUNGE
// responses against their own writer type (*imapserver.ExpungeWriter vs
// *imapserver.MoveWriter): both types embed an unexported *imapserver.Conn
// field set only by the imapserver package itself, so neither can be
// constructed outside a live connection, and Move cannot simply delegate to
// Expunge's full method.
func (s *session) expungeUIDs(uids *imap.UIDSet, requireDeleted bool) ([]uint32, error) {
if s.selectedFolder == nil {
return nil, &imap.Error{Type: imap.StatusResponseTypeNo, Text: "No mailbox selected"}
}
messages, err := s.useCase.FetchMessages(context.Background(), s.selectedFolder.ID)
if err != nil {
return nil, toIMAPError(err)
}
var toExpunge []uint32
var seqNums []uint32
for i, msg := range messages {
seqNum := uint32(i) + 1
if uids != nil && !uids.Contains(imap.UID(msg.UID)) {
continue
}
if requireDeleted {
hasDeleted := false
for _, f := range msg.Flags {
if imap.Flag(f) == imap.FlagDeleted {
hasDeleted = true
break
}
}
if !hasDeleted {
continue
}
}
toExpunge = append(toExpunge, msg.UID)
seqNums = append(seqNums, seqNum)
}
if len(toExpunge) == 0 {
return nil, nil
}
if err := s.useCase.Expunge(context.Background(), s.selectedFolder.ID, toExpunge); err != nil {
return nil, toIMAPError(err)
}
// Reverse in place: descending sequence-number order.
for i, j := 0, len(seqNums)-1; i < j; i, j = i+1, j-1 {
seqNums[i], seqNums[j] = seqNums[j], seqNums[i]
}
return seqNums, nil
}
func (s *session) Expunge(w *imapserver.ExpungeWriter, uids *imap.UIDSet) error {
seqNums, err := s.expungeUIDs(uids, true)
if err != nil {
return err
}
if tm := s.useCase.GetTrackerManager(); tm != nil && s.selectedFolder != nil {
for _, seqNum := range seqNums {
tm.NotifyExpunge(s.selectedFolder.ID, seqNum)
}
}
// w is nil in unit tests that only assert the use-case call, since
// *imapserver.ExpungeWriter has no exported constructor and can only be
// built by a live *imapserver.Conn (same constraint as *ListWriter -
// see matchFolders' doc comment above). The real imapserver package
// never passes a nil writer.
if w == nil {
return nil
}
for _, seqNum := range seqNums {
if err := w.WriteExpunge(seqNum); err != nil {
return err
}
}
return nil
}
func (s *session) Copy(numSet imap.NumSet, dest string) (*imap.CopyData, error) {
if s.selectedFolder == nil {
return nil, &imap.Error{Type: imap.StatusResponseTypeNo, Text: "No mailbox selected"}
}
destFolder, err := s.useCase.SelectFolder(context.Background(), s.mailboxID, dest)
if err != nil {
return nil, &imap.Error{Type: imap.StatusResponseTypeNo, Code: imap.ResponseCodeTryCreate, Text: "No such destination mailbox"}
}
messages, err := s.useCase.FetchMessages(context.Background(), s.selectedFolder.ID)
if err != nil {
return nil, toIMAPError(err)
}
var uids []uint32
s.numSetIter(numSet, messages, func(_ uint32, msg port.MessageRecord) {
uids = append(uids, msg.UID)
})
copied, err := s.useCase.CopyMessages(context.Background(), s.selectedFolder.ID, uids, destFolder.ID)
if err != nil {
return nil, toIMAPError(err)
}
var sourceUIDs, destUIDs imap.UIDSet
for _, c := range copied {
sourceUIDs.AddNum(imap.UID(c.SourceUID))
destUIDs.AddNum(imap.UID(c.DestUID))
}
if tm := s.useCase.GetTrackerManager(); tm != nil {
tm.NotifyNumMessages(destFolder.ID, destFolder.NumMessages+uint32(len(copied)))
}
return &imap.CopyData{UIDValidity: destFolder.UIDValidity, SourceUIDs: sourceUIDs, DestUIDs: destUIDs}, nil
}
// Move copies numSet into dest (reusing Copy's logic), reports the COPYUID
// data, then expunges the just-copied source messages (RFC 6851: MOVE is
// COPY + EXPUNGE-of-the-moved-messages-only, atomically from the client's
// point of view). It deliberately does NOT call s.Expunge: that method
// writes against *imapserver.ExpungeWriter, a different concrete type from
// the *imapserver.MoveWriter this method receives, even though both expose a
// method named WriteExpunge - so Move writes its own EXPUNGE responses
// through its own writer, sharing only the expungeUIDs marking logic.
func (s *session) Move(w *imapserver.MoveWriter, numSet imap.NumSet, dest string) error {
copyData, err := s.Copy(numSet, dest)
if err != nil {
return err
}
if w != nil {
if err := w.WriteCopyData(copyData); err != nil {
return err
}
}
// MOVE does not require \Deleted (RFC 6851): expunge exactly the
// UIDs Copy just copied, regardless of their flags.
seqNums, err := s.expungeUIDs(&copyData.SourceUIDs, false)
if err != nil {
return err
}
if tm := s.useCase.GetTrackerManager(); tm != nil && s.selectedFolder != nil {
for _, seqNum := range seqNums {
tm.NotifyExpunge(s.selectedFolder.ID, seqNum)
}
}
// w is nil in unit tests that only assert the use-case call, mirroring
// Expunge's nil-writer accommodation above.
if w == nil {
return nil
}
for _, seqNum := range seqNums {
if err := w.WriteExpunge(seqNum); err != nil {
return err
}
}
return nil
}
func (s *session) Store(w *imapserver.FetchWriter, numSet imap.NumSet, flags *imap.StoreFlags, options *imap.StoreOptions) error {
if s.selectedFolder == nil {
return &imap.Error{Type: imap.StatusResponseTypeNo, Text: "No mailbox selected"}
}
var op port.FlagOp
switch flags.Op {
case imap.StoreFlagsAdd:
op = port.FlagOpAdd
case imap.StoreFlagsDel:
op = port.FlagOpDel
case imap.StoreFlagsSet:
op = port.FlagOpSet
}
flagNames := make([]string, len(flags.Flags))
for i, f := range flags.Flags {
flagNames[i] = string(f)
}
var unchangedSince uint64
if options != nil {
unchangedSince = options.UnchangedSince
}
messages, err := s.useCase.FetchMessages(context.Background(), s.selectedFolder.ID)
if err != nil {
return toIMAPError(err)
}
var storeErr error
s.numSetIter(numSet, messages, func(seqNum uint32, msg port.MessageRecord) {
if storeErr != nil {
return
}
updated, err := s.useCase.SetFlags(context.Background(), s.selectedFolder.ID, msg.UID, op, flagNames, unchangedSince)
if err != nil {
storeErr = toIMAPError(err)
return
}
if updated {
if tm := s.useCase.GetTrackerManager(); tm != nil {
tm.NotifyMessageFlags(s.selectedFolder.ID, seqNum, msg.UID, flagNames, s.tracker)
}
}
})
if storeErr != nil {
return storeErr
}
if !flags.Silent {
return s.Fetch(w, numSet, &imap.FetchOptions{Flags: true, UID: true})
}
return nil
}