summaryrefslogtreecommitdiff
path: root/internal/mailer/mailer.go
blob: 4ec11ac94a2f3b66da6686df2e9bd20c1a983625 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
package mailer

import (
	"context"
	"crypto/tls"
	"errors"
	"fmt"
	"log/slog"
	"net"
	"net/smtp"
	"strings"
	"time"
)

type Message struct {
	ID        string
	Recipient string
	Subject   string
	Body      string
}

type Queue interface {
	ClaimMail(context.Context) (Message, bool, error)
	MarkMailSent(context.Context, string) error
	MarkMailFailed(context.Context, string, error) error
}

type SMTPConfig struct {
	Address     string
	Username    string
	Password    string
	FromName    string
	FromAddress string
	TLSMode     string
	DialTimeout time.Duration
}

type Sender struct {
	config SMTPConfig
}

func NewSender(config SMTPConfig) (*Sender, error) {
	if strings.TrimSpace(config.Address) == "" || strings.TrimSpace(config.FromAddress) == "" {
		return nil, errors.New("SMTP address and from address are required")
	}
	if config.DialTimeout <= 0 {
		config.DialTimeout = 10 * time.Second
	}
	return &Sender{config: config}, nil
}

func (s *Sender) Send(ctx context.Context, message Message) error {
	host, _, err := net.SplitHostPort(s.config.Address)
	if err != nil {
		return fmt.Errorf("parse SMTP address: %w", err)
	}
	dialer := net.Dialer{Timeout: s.config.DialTimeout}
	var conn net.Conn
	if s.config.TLSMode == "tls" {
		conn, err = tls.DialWithDialer(&dialer, "tcp", s.config.Address, &tls.Config{MinVersion: tls.VersionTLS12, ServerName: host})
	} else {
		conn, err = dialer.DialContext(ctx, "tcp", s.config.Address)
	}
	if err != nil {
		return fmt.Errorf("connect SMTP: %w", err)
	}
	defer conn.Close()
	client, err := smtp.NewClient(conn, host)
	if err != nil {
		return fmt.Errorf("open SMTP client: %w", err)
	}
	defer client.Close()
	if s.config.TLSMode == "starttls" {
		if ok, _ := client.Extension("STARTTLS"); !ok {
			return errors.New("SMTP server does not support required STARTTLS")
		}
		if err := client.StartTLS(&tls.Config{MinVersion: tls.VersionTLS12, ServerName: host}); err != nil {
			return fmt.Errorf("start SMTP TLS: %w", err)
		}
	}
	if s.config.Username != "" {
		if ok, _ := client.Extension("AUTH"); !ok {
			return errors.New("SMTP server does not support authentication")
		}
		if err := client.Auth(smtp.PlainAuth("", s.config.Username, s.config.Password, host)); err != nil {
			return fmt.Errorf("authenticate SMTP: %w", err)
		}
	}
	if err := client.Mail(s.config.FromAddress); err != nil {
		return fmt.Errorf("set SMTP sender: %w", err)
	}
	if err := client.Rcpt(message.Recipient); err != nil {
		return fmt.Errorf("set SMTP recipient: %w", err)
	}
	w, err := client.Data()
	if err != nil {
		return fmt.Errorf("start SMTP body: %w", err)
	}
	from := s.config.FromAddress
	if name := cleanHeader(s.config.FromName); name != "" {
		from = fmt.Sprintf("%s <%s>", name, s.config.FromAddress)
	}
	body := strings.ReplaceAll(message.Body, "\r\n", "\n")
	body = strings.ReplaceAll(body, "\n", "\r\n")
	_, writeErr := fmt.Fprintf(w, "From: %s\r\nTo: %s\r\nSubject: %s\r\nMIME-Version: 1.0\r\nContent-Type: text/plain; charset=UTF-8\r\nContent-Transfer-Encoding: 8bit\r\n\r\n%s\r\n",
		from, cleanHeader(message.Recipient), cleanHeader(message.Subject), body)
	closeErr := w.Close()
	if writeErr != nil {
		return fmt.Errorf("write SMTP body: %w", writeErr)
	}
	if closeErr != nil {
		return fmt.Errorf("finish SMTP body: %w", closeErr)
	}
	if err := client.Quit(); err != nil {
		return fmt.Errorf("finish SMTP session: %w", err)
	}
	return nil
}

func cleanHeader(value string) string {
	value = strings.ReplaceAll(value, "\r", "")
	return strings.ReplaceAll(value, "\n", "")
}

type Worker struct {
	queue  Queue
	sender *Sender
	logger *slog.Logger
}

func NewWorker(queue Queue, sender *Sender, logger *slog.Logger) *Worker {
	if logger == nil {
		logger = slog.Default()
	}
	return &Worker{queue: queue, sender: sender, logger: logger}
}

func (w *Worker) Run(ctx context.Context) {
	ticker := time.NewTicker(3 * time.Second)
	defer ticker.Stop()
	for {
		w.drain(ctx)
		select {
		case <-ctx.Done():
			return
		case <-ticker.C:
		}
	}
}

func (w *Worker) drain(ctx context.Context) {
	for i := 0; i < 20 && ctx.Err() == nil; i++ {
		message, ok, err := w.queue.ClaimMail(ctx)
		if err != nil {
			w.logger.Warn("mail_outbox_claim_failed", "error", err)
			return
		}
		if !ok {
			return
		}
		if err := w.sender.Send(ctx, message); err != nil {
			_ = w.queue.MarkMailFailed(ctx, message.ID, err)
			w.logger.Warn("mail_delivery_failed", "message_id", message.ID, "error", err)
			continue
		}
		if err := w.queue.MarkMailSent(ctx, message.ID); err != nil {
			w.logger.Warn("mail_outbox_complete_failed", "message_id", message.ID, "error", err)
		}
	}
}