Move a folder by dragging it

Reparenting a folder meant the Folders settings page, or nothing at all.
The tree already accepted messages dropped onto a folder, so folders now
travel the same way: drag one onto another to nest it, or onto the
Folders heading to bring it back to the top level.

The heading says "Drop here for the top level" while a folder is in
flight, because an unlabelled strip of heading is not a discoverable
target. The row being dragged fades, the row under the pointer is
outlined, and only rows that would accept the drop light up.

Four drops are refused: a folder onto itself, into its own subtree,
onto the parent it already has, and any folder the server gave a role,
which is not draggable in the first place. The subtree case is the one
that matters -- it would orphan the branch -- and it checks the whole
subtree rather than the immediate children.

Whether a drop is legal has to be known during dragover, when
dataTransfer.getData is blocked, so the tree remembers what is being
dragged rather than asking the drag.

The move goes through updateMailbox, so the filter rules pointing at the
folder follow it, and the target folder is expanded afterwards so the
folder can be seen where it landed.

web/src/lib/__tests__/folderMove.test.ts

@@ -0,0 +1,69 @@
+import { describe, expect, it } from "vitest";
+import { canDropFolder, descendantIds, movable } from "../folderMove";
+import type { Id, Mailbox } from "@/jmap/types";
+
+const mb = (id: string, name: string, parentId: string | null, role: Mailbox["role"] = null): Mailbox =>
+  ({ id, name, parentId, role, sortOrder: 0, totalEmails: 0, unreadEmails: 0, totalThreads: 0, unreadThreads: 0, isSubscribed: true, myRights: {} as Mailbox["myRights"] });
+
+/**  root ── Work ── Clients ── EU
+ *        └─ Archive (role)
+ *        └─ Inbox   (role)                                          */
+const tree: Record<Id, Mailbox> = Object.fromEntries([
+  mb("inbox", "Inbox", null, "inbox"),
+  mb("arch", "Archive", null, "archive"),
+  mb("work", "Work", null),
+  mb("clients", "Clients", "work"),
+  mb("eu", "EU", "clients"),
+  mb("news", "Newsletters", null),
+].map((m) => [m.id, m]));
+
+describe("movable", () => {
+  it("refuses folders the server gave a role", () => {
+    expect(movable(tree.inbox!)).toBe(false);
+    expect(movable(tree.arch!)).toBe(false);
+    expect(movable(tree.work!)).toBe(true);
+  });
+});
+
+describe("descendantIds", () => {
+  it("finds the whole subtree, not just the children", () => {
+    expect([...descendantIds(tree, "work")].sort()).toEqual(["clients", "eu"]);
+    expect([...descendantIds(tree, "eu")]).toEqual([]);
+  });
+});
+
+describe("canDropFolder", () => {
+  it("allows a plain move into another folder", () => {
+    expect(canDropFolder(tree, "news", "work")).toBe(true);
+    expect(canDropFolder(tree, "eu", "news")).toBe(true);
+  });
+
+  it("allows a move into a role folder, which may hold subfolders", () => {
+    expect(canDropFolder(tree, "news", "arch")).toBe(true);
+  });
+
+  it("refuses to move a folder into itself or its own subtree", () => {
+    expect(canDropFolder(tree, "work", "work")).toBe(false);
+    expect(canDropFolder(tree, "work", "clients")).toBe(false);
+    expect(canDropFolder(tree, "work", "eu")).toBe(false); // grandchild, not just child
+  });
+
+  it("refuses a move to the parent it already has", () => {
+    expect(canDropFolder(tree, "clients", "work")).toBe(false);
+  });
+
+  it("refuses to move a role folder anywhere", () => {
+    expect(canDropFolder(tree, "inbox", "work")).toBe(false);
+    expect(canDropFolder(tree, "arch", null)).toBe(false);
+  });
+
+  it("handles the root: allowed from a parent, refused when already there", () => {
+    expect(canDropFolder(tree, "eu", null)).toBe(true);
+    expect(canDropFolder(tree, "news", null)).toBe(false);
+  });
+
+  it("refuses a target that does not exist", () => {
+    expect(canDropFolder(tree, "news", "gone")).toBe(false);
+    expect(canDropFolder(tree, "gone", "work")).toBe(false);
+  });
+});

web/src/lib/folderMove.ts

@@ -0,0 +1,47 @@
+import type { Id, Mailbox } from "@/jmap/types";
+
+/**
+ * A folder can be moved unless the server gave it a role. Inbox, Sent, Trash and
+ * the rest are structural, and the server refuses to reparent them anyway --
+ * better not to offer the drag at all.
+ */
+export function movable(m: Mailbox): boolean {
+  return !m.role || m.role === "subscribed";
+}
+
+/** Every folder beneath this one, so a folder cannot be dropped inside itself. */
+export function descendantIds(mailboxes: Record<Id, Mailbox>, id: Id): Set<Id> {
+  const out = new Set<Id>();
+  const all = Object.values(mailboxes);
+  let frontier = new Set<Id>([id]);
+  // Depth is bounded by the server's own mailbox depth limit; the guard is only
+  // here so a cycle in the data cannot spin forever.
+  for (let depth = 0; depth < 20 && frontier.size; depth++) {
+    const next = new Set<Id>();
+    for (const m of all) {
+      if (m.parentId && frontier.has(m.parentId) && !out.has(m.id)) {
+        out.add(m.id);
+        next.add(m.id);
+      }
+    }
+    frontier = next;
+  }
+  return out;
+}
+
+/**
+ * Whether `draggedId` may be dropped on `targetId`, where null means the root.
+ *
+ * Four ways it cannot: the folder is not movable at all, it is being dropped on
+ * itself, into its own subtree — which would orphan the branch — or onto the
+ * parent it already has, which would be a no-op dressed up as a move.
+ */
+export function canDropFolder(mailboxes: Record<Id, Mailbox>, draggedId: Id, targetId: Id | null): boolean {
+  const dragged = mailboxes[draggedId];
+  if (!dragged || !movable(dragged)) return false;
+  if (targetId === null) return dragged.parentId != null;
+  if (targetId === draggedId) return false;
+  if (dragged.parentId === targetId) return false;
+  if (!mailboxes[targetId]) return false;
+  return !descendantIds(mailboxes, draggedId).has(targetId);
+}