Add Claude Opus 4.7 support

Opus 4.7 returns 400 when sent thinking: {type: "enabled", budget_tokens: N}.
Introduce anthropic-v2-variants with adaptive thinking, display: "summarized",
and the new xhigh effort level. A hidden "default" variant ensures Opus 4.7
always gets adaptive thinking even when no variant is explicitly selected.

- Add anthropic-v2-variants with default/low/medium/high/xhigh/max
- Add variantsByModel regex for opus-4-7
- Add claude-opus-4-7 to default models and web search support
- Fall back to "default" variant in extra-payload-considering-variant
- Add selectable-variant-names helper to filter internal variants from UI

🤖 Generated with [eca](https://eca.dev)

Co-Authored-By: eca-agent <git@eca.dev>

Author: ericdallo

CHANGELOG.md

@@ -4,6 +4,7 @@
 
 - Auto allow ask_user tool by default.
 - Fix chat titles becoming empty when conversation history contains thinking blocks (Anthropic).
+- Add Claude Opus 4.7 support with adaptive thinking, `xhigh` effort level, and summarized thinking display.
 
 ## 0.127.0
 

src/eca/config.clj

@@ -17,11 +17,11 @@
    [clojure.string :as string]
    [clojure.walk :as walk]
    [eca.features.agents :as agents]
-   [rewrite-json.core :as rj]
    [eca.interpolation :as interpolation]
    [eca.logger :as logger]
    [eca.messenger :as messenger]
-   [eca.shared :as shared :refer [multi-str]])
+   [eca.shared :as shared :refer [multi-str]]
+   [rewrite-json.core :as rj])
   (:import
    [java.io File]))
 
@@ -64,6 +64,14 @@
    "high" {:output_config {:effort "high"} :thinking {:type "adaptive"}}
    "max" {:output_config {:effort "max"} :thinking {:type "adaptive"}}})
 
+(def ^:private anthropic-v2-variants
+  {"default" {:thinking {:type "adaptive" :display "summarized"}}
+   "low" {:output_config {:effort "low"} :thinking {:type "adaptive" :display "summarized"}}
+   "medium" {:output_config {:effort "medium"} :thinking {:type "adaptive" :display "summarized"}}
+   "high" {:output_config {:effort "high"} :thinking {:type "adaptive" :display "summarized"}}
+   "xhigh" {:output_config {:effort "xhigh"} :thinking {:type "adaptive" :display "summarized"}}
+   "max" {:output_config {:effort "max"} :thinking {:type "adaptive" :display "summarized"}}})
+
 (def ^:private initial-config*
   {:providers {"openai" {:api "openai-responses"
                          :url "${env:OPENAI_API_URL:https://api.openai.com}"
@@ -79,7 +87,8 @@
                             :key "${env:ANTHROPIC_API_KEY}"
                             :requiresAuth? true
                             :models {"claude-sonnet-4-6" {}
-                                     "claude-opus-4-6" {}}}
+                                     "claude-opus-4-6" {}
+                                     "claude-opus-4-7" {}}}
                "github-copilot" {:api "openai-chat"
                                  :url "${env:GITHUB_COPILOT_API_URL:https://api.githubcopilot.com}"
                                  :key nil ;; not supported, requires login auth
@@ -172,6 +181,7 @@
               :shellCommand {:summaryMaxLength 35}
               :outputTruncation {:lines 2000 :sizeKb 50}}
    :variantsByModel {".*sonnet[-._]4[-._]6|opus[-._]4[-._][56]" {:variants anthropic-variants}
+                     ".*opus[-._]4[-._]7" {:variants anthropic-v2-variants}
                      ".*gpt[-._]5(?:[-._](?:2|4)(?!\\d)|[-._]3[-._]codex)" {:variants openai-variants
                                                                             :excludeProviders ["github-copilot"]}}
    :mcpTimeoutSeconds 60
@@ -243,6 +253,13 @@
         (when (seq filtered)
           filtered)))))
 
+(defn selectable-variant-names
+  "Returns sorted variant names suitable for UI display, excluding internal-only
+           variants like \"default\" which are applied automatically."
+  [variants]
+  (when (seq variants)
+    (vec (sort (remove #{"default"} (keys variants))))))
+
 (def ^:private fallback-agent "code")
 
 (defn primary-agent-names

src/eca/features/tools/agent.clj

@@ -103,7 +103,7 @@
                                             (let [provider (subs full-model 0 idx)
                                                   model (subs full-model (inc idx))
                                                   user-variants (get-in config [:providers provider :models model :variants])]
-                                              (keys (config/effective-model-variants config provider model user-variants)))))))
+                                              (config/selectable-variant-names (config/effective-model-variants config provider model user-variants)))))))
                               (into (sorted-set)))]
         (when (seq all-variants)
           (vec all-variants))))))
@@ -118,8 +118,7 @@
               model (subs full-model (inc idx))
               user-variants (get-in config [:providers provider :models model :variants])
               variants (config/effective-model-variants config provider model user-variants)]
-          (when (seq variants)
-            (vec (sort (keys variants)))))))))
+          (config/selectable-variant-names variants))))))
 
 (defn ^:private spawn-agent
   "Handler for the spawn_agent tool.

src/eca/handlers.clj

@@ -33,8 +33,7 @@
               model (subs full-model (inc idx))
               user-variants (get-in config [:providers provider :models model :variants])
               variants (config/effective-model-variants config provider model user-variants)]
-          (when (seq variants)
-            (vec (sort (keys variants)))))))))
+          (config/selectable-variant-names variants))))))
 
 (defn ^:private select-variant
   "Returns the variant to select: the agent's configured variant if it exists

src/eca/llm_api.clj

@@ -154,9 +154,12 @@
 (defn ^:private extra-payload-considering-variant
   "Resolves the effective extra-payload by merging extraPayload with variant payload.
    Variant values take priority over extraPayload on clashing keys.
-   When reason? is false, strips provider-specific reasoning keys from the result."
+   When reason? is false, strips provider-specific reasoning keys from the result.
+   Falls back to a \"default\" variant when no explicit variant is selected."
   [model-config variant {:keys [api]} reason?]
-  (let [variant-payload (get-in model-config [:variants variant])
+  (let [variant-payload (or (get-in model-config [:variants variant])
+                            (when (nil? variant)
+                              (get-in model-config [:variants "default"])))
         extra-payload (:extraPayload model-config)
         merged (if variant-payload
                  (shared/deep-merge extra-payload variant-payload)

src/eca/models.clj

@@ -74,13 +74,15 @@
     "anthropic/claude-opus-4.1"
     "anthropic/claude-opus-4.5"
     "anthropic/claude-opus-4.6"
+    "anthropic/claude-opus-4-6"
     "anthropic/claude-haiku-4.5"
     "anthropic/claude-sonnet-4-5-20250929"
     "anthropic/claude-sonnet-4-20250514"
     "anthropic/claude-opus-4-20250514"
     "anthropic/claude-opus-4-1-20250805"
     "anthropic/claude-opus-4-5-20251101"
-    "anthropic/claude-opus-4-6"
+    "anthropic/claude-opus-4.7"
+    "anthropic/claude-opus-4-7"
     "anthropic/claude-haiku-4-5-20251001"})
 
 (defn ^:private all