Files
email_agent/cmd/email-agent/main.go
Paperclip Builder 7ca888f0c6 Phase 5: reply drafts — template/LLM draft, edit, SMTP send (AUD-71)
Implements Phase 5 of AGENTS.md §11 (FR-8, FR-15):

- Message detail pane (GET /partials/message) with body, recommended
  action, reply identity, template picker, editable draft, and history.
- internal/reply: OmniRoute (OpenAI-compatible) chat client and a
  template-based draft generator. All non-JEV models go through
  OmniRoute (§10).
- internal/mailops: SMTP send over smtp.gmail.com:587 with STARTTLS and
  the app password, forcing IPv4 (§9); FR-15 reply identity (send as the
  arrived-at X-Pm-Original-To address, else "Sam Rolfe"); threading via
  In-Reply-To/References; -check-smtp safe verification; and a
  [Gmail]/Sent Mail thread check.
- Migration v5 stores messages.message_id_header and drafts.sent_at;
  mailfetch parses Message-ID.
- Send is user-triggered only: CSRF + UI confirm + confirm=yes guard,
  no auto-send, duplicate-send refused. A sent reply files the original
  under Replied-to/<address> and logs every step (FR-13).
- Tests for reply, mailops SMTP/identity/thread check, store drafts and
  migration v5, and the server draft/edit/send guards.
- docs/phase5-replies.md, README, .env.example, docker-compose updated.

Co-Authored-By: Paperclip <noreply@paperclip.ing>
2026-10-11 22:05:35 +11:00

221 lines
6.4 KiB
Go

// Command email-agent runs the Email Agent HTTP service.
package main
import (
"context"
"flag"
"fmt"
"log/slog"
"net/http"
"os"
"os/signal"
"syscall"
"time"
"gitea.lab.audasmedia.com.au/sam/email_agent/internal/classify"
"gitea.lab.audasmedia.com.au/sam/email_agent/internal/config"
"gitea.lab.audasmedia.com.au/sam/email_agent/internal/mailfetch"
"gitea.lab.audasmedia.com.au/sam/email_agent/internal/mailops"
"gitea.lab.audasmedia.com.au/sam/email_agent/internal/server"
"gitea.lab.audasmedia.com.au/sam/email_agent/internal/store"
"gitea.lab.audasmedia.com.au/sam/email_agent/internal/version"
)
func main() {
var (
showVersion = flag.Bool("version", false, "print version information and exit")
healthcheck = flag.Bool("healthcheck", false, "probe the local /health endpoint and exit")
fetchNow = flag.Bool("fetch", false, "run one Gmail IMAP scan and exit")
classifyNow = flag.Bool("classify", false, "classify pending messages with JEV and exit")
classifyAll = flag.Bool("classify-all", false, "re-classify every stored message with JEV and exit")
checkSMTP = flag.Bool("check-smtp", false, "verify the Gmail SMTP connection (IPv4 + STARTTLS + login) and exit; sends no mail")
)
flag.Parse()
if *showVersion {
fmt.Printf("email-agent %s (commit %s)\n", version.Version, version.Commit)
return
}
cfg, err := config.Load()
if err != nil {
fmt.Fprintf(os.Stderr, "config error: %v\n", err)
os.Exit(1)
}
logger := newLogger(cfg.LogLevel)
slog.SetDefault(logger)
if *healthcheck {
if err := probeHealth(cfg.Port); err != nil {
fmt.Fprintf(os.Stderr, "healthcheck failed: %v\n", err)
os.Exit(1)
}
return
}
if *fetchNow {
if err := runFetch(cfg, logger); err != nil {
fmt.Fprintf(os.Stderr, "fetch failed: %v\n", err)
os.Exit(1)
}
return
}
if *classifyNow || *classifyAll {
if err := runClassify(cfg, logger, *classifyAll); err != nil {
fmt.Fprintf(os.Stderr, "classify failed: %v\n", err)
os.Exit(1)
}
return
}
if *checkSMTP {
if err := runCheckSMTP(cfg, logger); err != nil {
fmt.Fprintf(os.Stderr, "smtp check failed: %v\n", err)
os.Exit(1)
}
fmt.Println("smtp check ok: ipv4 + starttls + auth (no mail sent)")
return
}
if err := run(cfg, logger); err != nil {
logger.Error("fatal", "error", err)
os.Exit(1)
}
}
func run(cfg *config.Config, logger *slog.Logger) error {
logger.Info("starting email-agent",
"version", version.Version,
"commit", version.Commit,
"env", cfg.Env,
)
if cfg.SessionSecret == "" && cfg.Password == "" {
logger.Warn("no EMAIL_AGENT_PASSWORD or EMAIL_AGENT_SESSION_SECRET set; login is disabled until one is configured")
}
ctx, stop := signal.NotifyContext(context.Background(), syscall.SIGINT, syscall.SIGTERM)
defer stop()
st, err := store.Open(ctx, cfg.DBPath)
if err != nil {
return fmt.Errorf("open store: %w", err)
}
defer func() {
if cerr := st.Close(); cerr != nil {
logger.Error("close store", "error", cerr)
}
}()
schemaVersion, err := st.SchemaVersion(ctx)
if err != nil {
return fmt.Errorf("read schema version: %w", err)
}
logger.Info("database ready", "path", st.Path(), "schema_version", schemaVersion)
srv, err := server.New(cfg, st, logger)
if err != nil {
return fmt.Errorf("build server: %w", err)
}
return srv.Run(ctx)
}
// runFetch performs a single IMAP scan and exits. It is the entry point n8n
// (FR-1) and manual operations use to trigger a sync without the HTTP UI.
func runFetch(cfg *config.Config, logger *slog.Logger) error {
if !cfg.GmailConfigured() {
return mailfetch.ErrNoCredentials
}
ctx, stop := signal.NotifyContext(context.Background(), syscall.SIGINT, syscall.SIGTERM)
defer stop()
st, err := store.Open(ctx, cfg.DBPath)
if err != nil {
return fmt.Errorf("open store: %w", err)
}
defer func() { _ = st.Close() }()
sum, err := mailfetch.NewFetcher(cfg, st, logger).Fetch(ctx)
if err != nil {
return err
}
fmt.Printf("fetched=%d stored=%d uidvalidity=%d since=%s\n",
sum.Fetched, sum.Stored, sum.UIDValidity, sum.Since.Format("2006-01-02"))
return nil
}
// runClassify classifies messages and exits. It is the n8n/CLI entry point for
// FR-3, separate from the HTTP service so a scheduled scan can be bounded and
// observed. all=true re-classifies every message, for use after the category
// list or rules change.
func runClassify(cfg *config.Config, logger *slog.Logger, all bool) error {
if !cfg.JEVConfigured() {
return classify.ErrNotConfigured
}
ctx, stop := signal.NotifyContext(context.Background(), syscall.SIGINT, syscall.SIGTERM)
defer stop()
st, err := store.Open(ctx, cfg.DBPath)
if err != nil {
return fmt.Errorf("open store: %w", err)
}
defer func() { _ = st.Close() }()
classifier := classify.NewClassifier(
classify.NewClient(cfg.JEVBaseURL, cfg.JEVAPIKey, cfg.JEVModel, logger),
st, logger, cfg.ClassifyConcurrency, cfg.ClassifyMaxMessages,
)
var sum classify.Summary
if all {
sum, err = classifier.RunAll(ctx)
} else {
sum, err = classifier.Run(ctx)
}
if err != nil {
return err
}
fmt.Printf("considered=%d classified=%d failed=%d remaining=%d model=%s rules_version=%d\n",
sum.Considered, sum.Classified, sum.Failed, sum.Remaining, sum.Model, sum.RulesVersion)
return nil
}
// runCheckSMTP verifies the Gmail submission path (IPv4 + STARTTLS + app
// password) without sending a message. It is the safe part of the Phase 5 send
// verification; the real send needs Sam's explicit approval.
func runCheckSMTP(cfg *config.Config, logger *slog.Logger) error {
if !cfg.GmailConfigured() {
return mailops.ErrNotConfigured
}
ctx, stop := signal.NotifyContext(context.Background(), syscall.SIGINT, syscall.SIGTERM)
defer stop()
return mailops.New(cfg, logger).CheckSMTP(ctx)
}
// probeHealth requests the local health endpoint. It exists so the container
// healthcheck does not need an external HTTP client in the image.
func probeHealth(port int) error {
client := &http.Client{Timeout: 3 * time.Second}
url := fmt.Sprintf("http://127.0.0.1:%d/health", port)
resp, err := client.Get(url)
if err != nil {
return err
}
defer resp.Body.Close()
if resp.StatusCode != http.StatusOK {
return fmt.Errorf("unexpected status %d from %s", resp.StatusCode, url)
}
return nil
}
func newLogger(level string) *slog.Logger {
var lvl slog.Level
if err := lvl.UnmarshalText([]byte(level)); err != nil {
lvl = slog.LevelInfo
}
handler := slog.NewJSONHandler(os.Stdout, &slog.HandlerOptions{Level: lvl})
return slog.New(handler)
}