SLOPSHOPPER

token-lens

Checks a page element's actual colours, spacing and type against the project's registered design tokens (CSS custom properties, SCSS variables, tokens JSON)…

newpaneguardcommandprocess
★ 1v0.1.0MITupdated 2026-10-15simota/claude-mods/mods/token-lens
A shopper browsing a rack in a slop shop
Preview · a replayed session in a sandbox
claude · ~/work/app · token-lens
│ ┃ トークン照合 ✕ › fix the failing auth test and add an audit log call │ ┃ 🎨 選択範囲 · 独自値 0件 │ ┃ Claude in Chrome ⏺ Read(src/auth.ts) │ ┃ で操作中のタブがありません。先に Claude ⎿ Read 6 lines │ ┃ にページを開かせてください。 ⏺ Update(src/auth.ts) │ ⎿ Added 2 lines, removed 1 line │ ⏺ Bash(bun test) │ ⎿ 3 pass, 1 fail │ │ ● Done. refresh now rejects expired claims and logs an audit event. │ │ ✻ Worked for 42s · done 4:20 PM │ │ › /token-lens │ ⎿ token-lens: 🎨 照合するタブがありません(Claude in Chrome でページを開いてから実行してください)。 │ │ ────────────────────────────────────────────────────────────────────────────────────────────────────────────────────── › ? for shortcuts

Draws

Pane · トークン照合
🎨 選択範囲 · 独自値 0件 Claude in Chrome で操作中のタブがありません。先に Claude にページを開かせてください。
README

claude-mods

English | 日本語

Personal Claude Code mods (function-hook plugins), published as one marketplace.

ModWhat it does
agent-paneLive pane of the session's subagents: running ones with elapsed time, finished ones with result and duration
done-gateFlags unverified edits, stops repeated failing commands, and blocks git --no-verify
sandbox-lensTallies sandbox denials seen in Bash output and reports them with /sandbox-report
skill-hintSuggests up to three matching skills above the prompt from what was typed; never invokes them.
todo-agentCollects #TODO(agent) follow-ups from Claude's replies into a per-project list with a /todos pane.
context-meterBand above the prompt with a Gruvbox sparkline of context use per turn, plus tokens and cost
tool-rowRedraws finished tool-call rows in the terminal as one compact line with a Nerd Font icon, Gruvbox colors and a short stat
image-previewThumbnails of the images a session writes, reads or generates: under the tool's row in the terminal, and in an /images pane
self-auditAfter each turn, a cached fork of the conversation audits Claude's own reply against the CLAUDE.md reporting rules and flags violations above the prompt
context-dietTrims the skill listing to what the project kind needs (off by default); /context-diet shows what was dropped and the tokens saved
browser-camLive pane of the browser Claude drives: the latest screenshot from Claude in Chrome, the page URL and the recent actions
prompt-coachHolds back a typed prompt that looks ambiguous (no done-condition, unclear target) and offers guesses at what it meant, sending it as is, or adding one; on by default
loopbackFeeds what self-audit, done-gate and sandbox-lens found back to Claude beside the next prompt, instead of only showing it to the person, skipping rules hit-rate found mostly wrong; off by default
zukanError book: catches the errors Bash commands hit across sessions and repos, records what got past each one, and when one comes back tells Claude and the person how it was fixed last time
pr-lampThe current branch's pull request as a lamp: checks, review, unresolved threads and what is left before a merge, in the status line and a /pr pane; red checks and new review comments go to Claude beside the next prompt
fog-mapExploration map: the repository as a tree under fog, cleared where Claude read and marked where it edited, made a file or hit an error, with the importers an edit may have broken unseen; /map
assertion-guardCatches edits that weaken tests to pass: assertions removed, expectations loosened or rewritten, tests skipped, errors swallowed; asks Claude for the reason beside the edit
negative-spaceWhen an edit adds authorization, validation or error handling, lists the refusal and boundary-value tests no test touched this session covers; /negative-space
mutation-tap/mutate runs a mutation test limited to the lines changed since HEAD and lists the mutants the tests did not catch
perf-delta/perf compares a benchmark before and after (a saved baseline, or a git ref in a temporary worktree): median time, peak memory, spread, and whether the change beats the noise
handoff-capsuleBefore a compaction and at session end, keeps the goal, decisions, open items, commands to reproduce and files touched; the next session picks which parts to bring back
port-lanternThe dev servers the session started: URL, port, whether each still listens, and their latest log lines, in the status line and /ports
artifact-shelfA shelf of what sessions made (CSV, PDF, HTML, video, patches…), tied to the call and request that made each; /shelf searches by kind, word and time
focus-hudOne status line: goal, target, what is running and for how long, and what the session waits on; /focus
side-effect-ledgerA ledger of what a git diff never shows (push, publish, deploy, PRs, API writes, messages) with outcome, how to undo, and whether the undo was checked; /ledger
trust-labelLabels external text (web, issues, logs, browser pages, services) with its source beside the result and flags candidate injected instructions; a heuristic, never a safety verdict; /trust
visual-diffCompares browser screenshots of the same URL and size before and after an edit: side by side, a map of changed cells, regions, and the edits in between; /vdiff
journey-traceRecords Claude's browser actions and the expected states as a replayable recipe; /journey md for a bug report, /journey e2e for a Playwright draft
hit-rateGives each finding of done-gate, assertion-guard, self-audit and zukan a later verdict from what the session did next, keeps each rule's precision across sessions, and names the rules loopback stops feeding; /hit-rate; off by default
token-lensChecks an element's actual colours, spacing and type against the project's design tokens and lists off-token values with the nearest token; /token-lens <selector>

Install

At the prompt of a terminal session:

/plugin install <mod> --marketplace simota/claude-mods

From a shell:

claude plugin install <mod> --marketplace simota/claude-mods

This repository is private: installing needs read access on GitHub and a git credential for github.com on the machine (an SSH key, or gh auth login then gh auth setup-git).

Usage

Options are set with /plugin configure <mod>@simota-mods in a session, or from a shell:

echo '{"enabled":"true"}' | claude plugin configure <mod>@simota-mods --values-stdin

A change made with /plugin configure reloads the mod; one made from a shell applies after a restart. Bands above the prompt stack: each mod draws its row above what the others draw.

agent-pane

  • /agent-pane opens the pane: running subagents first with elapsed time, then finished ones with ✓/✗ and duration; a background run that was stopped shows ■ 停止. A background run that left the roster without a result shows ? 結果不明; a teammate or remote launch shows ↗ 起動済み(追跡外).
  • In a fullscreen terminal the pane opens by itself once per session, on the first Agent call (a reload does not reopen it).
  • The status line shows agents: N running while any run.

done-gate

Works on its own, no command:

  • A turn that edited files without a passing test, lint, typecheck or build afterwards leaves a band: 未検証の変更があります. It stays until a check succeeds or 閉じる is pressed. Only the program a command runs counts (ls build, npm ci are not checks), and only when its exit status is the command's: the check is last, or only && follows it (npm test | tail does not count).
  • The second identical failure of the same Bash command tells Claude to stop retrying and diagnose the root cause (again after the command has succeeded in between).
  • Any git command with --no-verify (or a prefix of it from --no-ver), and git commit -n / -nm, is denied, also inside subshells, $(…), backticks, bash -c "…", eval and wrappers such as sudo/timeout. The value of an option (-m "…"), a comment or a heredoc never triggers it. So is a git command that moves its hooks for the run (-c core.hooksPath=…, --config-env core.hooksPath=…) or carries a hook manager's off switch in its environment (HUSKY=0, LEFTHOOK=0, pre-commit's SKIP=…), or moves the hooks through config in its environment (GIT_CONFIG_KEY_n=core.hooksPath, GIT_CONFIG_PARAMETERS). ANSI-C quoting ($'--no-\x76erify'), env -S "…", bash -c -- '…' and a shell reading its script from stdin (bash <<< '…', a heredoc, echo '…' | sh) are read through. It is a best-effort guard: git aliases (git ci -n), a hook path written into config beforehand and an environment exported by an earlier command are not detected.

sandbox-lens

  • /sandbox-report lists the sandbox denials seen in Bash output, for this session and all time: denied hosts and paths, counts, last seen, an example command, and which setting would allow each.
  • /sandbox-report reset clears the record.
  • Hints only: it never changes sandbox settings. A loopback or private address keeps its port in the hint (127.0.0.1:3000), since an entry without a port opens every port.
  • A <sandbox_violations> block, and Operation not permitted lines a program printed about itself, are read. For a command that succeeded or was interrupted, the block is taken from where the engine puts it, apart from the command's own output, so one inside a shown file or page is ignored even when it ends the output. A failed command keeps only its error text: the block that ends it (before an agent-proxy note) is read, and there a block the command printed itself cannot be told from the harness's. Credentials in the example command (tokens, passwords, Authorization/Cookie and other credential headers such as X-API-Key, URL userinfo, keys in env assignments including run-together names such as PGPASSWORD, known key shapes) are masked. Each section shows the top 10; when the record is full (200), the least recently seen entry gives way.

skill-hint

After a prompt is sent, up to three skills matching it show above the prompt (💡 skill候補: /coding-debug …), only ones that exist in the session. Nothing is invoked; 閉じる or the next prompt (a slash command included) clears it. A prompt that already names a skill (/name anywhere, or a hyphenated skill name such as coding-debug) gets no hint; built-in commands such as /clear and path segments such as src/review/ do not count as naming one. Plugin skills (plugin:name) are suggested by their full name.

todo-agent

  • Lines starting with #TODO(agent): <action> (after an optional quote or list bullet) in Claude's main-loop replies are collected per project (repo root or cwd). A mention inside a sentence, a table or inline code is not a TODO; subagent replies are ignored.
  • /todos opens the pane of this project's open items, each with a 完了 button.
  • /todos all lists every project's open items as text, marked as stored data.
  • The status line shows TODO(agent): N while the project has open items.

context-meter

A band with a sparkline of context use per turn and ctx 63% ▲4 · 126k · turn in 120k / out 8k · $1.23: the context size of the last request, then the whole turn's input/output (shown when the turn reported usage). The percentage turns yellow from 50% and red from 80%.

OptionDefault
bandtrueDraw the band (samples are recorded either way)

tool-row

Finished tool calls are drawn as one compact line with a Nerd Font icon: Edit/Write path +A −D, Read with line count, Bash (red on error), Agent, web and MCP calls. The result block under a compacted row is hidden, so a call is one line; an errored result stays. A row another mod decorated (an image-preview thumbnail) is left as it is, result included. Runs Claude Code folds into one count line (Read 3 files, ran 2 shell commands) stay folded. Terminal only.

OptionDefault
compacttrueOff leaves every row and result as Claude Code draws them

image-preview

  • Images a session writes, reads, or that a Bash command produces (png, jpg, jpeg, webp, gif) get a thumbnail under that tool's row in the terminal (kitty graphics: Ghostty, kitty).
  • /images opens a pane, newest first; h/l step through them.
  • Non-PNG files are converted with macOS sips after the tool result has gone back, so tool calls never wait on it. Converted files live in a private cache ($TMPDIR or ~/.cache), newest 50 kept. A killed session's folder is removed by a later session's start once a day untouched; a running session touches its own every hour (again after a plugin reload), so it is kept while idle, though not across a day the machine sleeps.
  • A Bash command and its output are searched for image paths in time linear in their length, before the result goes back. A path split at spaces (/tmp/a b/x.jpg) joins at most 8 preceding pieces and 4096 characters; the first 64 paths named are read, and of those the first 4 that exist are shown.
OptionDefault
inlinetrueThumbnail under the tool row
maxRows12Rows a thumbnail may take, 1 to 60

self-audit

After each reply of at least minChars characters, one tool-less fork of the conversation (served mostly from the prompt cache), given the reply itself as quoted data, checks it against the CLAUDE.md rules: claims done without evidence, first line not the result, unverified assertions, bypassed checks, scope inflation. Only violations of the five rules whose quote is found in the reply are kept (a made-up quote or rule is dropped); the quote is compared past markdown marks, bullets, curly quotes, case, spacing and a closing full stop, and one shortened with … is found piece by piece. Violations show in red above the prompt; 詳細 or /self-audit opens the pane with quotes and the fork's token use. Results belong to the latest reply only: when it was not audited, the pane says why.

OptionDefault
enabledtrue
minChars200Shorter replies are not audited

Cost: one extra request per turn on the session's model, plus the reply text (up to 12,000 characters) as uncached input; a cold cache (after 5 minutes idle or a model switch) resends the whole conversation.

context-diet

Off by default. When on, the skill listing is trimmed to what the project kind needs (Swift, Android, Rust, web, Python, Go, detected from the repo root and one level below). Coding, quality, planning and research skills are always kept; red-team, dynamic-*, persona and operation skills are dropped; image, design, ux-scan and brand-scan are dropped for Rust, Python and Go. Only the main loop's listing is reported. A dropped skill named in a prompt is still described for that prompt.

  • /context-diet shows the project kind, what was kept and dropped in the latest listing, and the tokens saved (estimate). A listing it cannot read reliably goes out unchanged.
  • /context-diet on|off|reset overrides the option for this session. Switching rebuilds the listing, so the prompt cache misses once.
OptionDefault
enabledfalse
keepComma list of names or prefix* never dropped; wins over drop
dropComma list of names or prefix* always dropped

browser-cam

  • While Claude drives a browser (Claude in Chrome, Claude Browser, or a remote device's browser), a pane shows the latest screenshot, the page title and URL, and the last 8 actions with ✓/✗. The URL comes only from the navigate call or the tab tools' own header, never from page text. Text typed or filled in is shown as its length only (type ‹7文字›), since the field may be a password; a URL's secrets (token parameters, userinfo, key-shaped parts) are masked.
  • /cam toggles the pane; in a fullscreen terminal it opens by itself once per session, on the first browser call. Screenshots are decoded only while the pane is open, and written to a private per-session folder that is removed at session end. A killed session's folder is removed by a later session's start once a day untouched; a running session touches its own every hour (again after a plugin reload), so it is kept while idle, though not across a day the machine sleeps.
  • The desktop app shows the title and URL, a caption and the actions, without the picture.
OptionDefault
autoOpentrueOpen on the first browser call (fullscreen terminal)

prompt-coach

On by default (enabled: false turns it off). A typed prompt that looks ambiguous (no done-condition and an unclear target, or only evaluative words like いい感じ) is held back, and a band shows what is missing with up to three guesses at what it meant (judged along the lines of the clarify skill: the likeliest reading first, each a different deliverable with a checkable done-condition):

  • a / b / d: a guess goes into the prompt to edit and send (not held again)
  • s: このまま送る sends it unchanged
  • e: 補足して送る puts it back with 完了条件: to fill in (not held again)
  • q: 閉じる puts it back in the prompt

Typing another prompt instead sends that one and puts the held text back into the prompt. The held text is never lost: when a send fails or is dropped beneath, or putting words back fails, it stays held with its band (unless another prompt was held since) and its words are shown in a toast; a prompt still held at /clear goes straight back into the box, and one held when the session quits comes back at this project's next interactive session start. Words go into an empty box as they are, and are appended after a draft typed meanwhile on a line of their own, never over it.

Slash commands, prompts under 12 or over 1500 characters, prompts with any attachment or an @ mention, prompts sent by a plugin, and prompts typed while a turn runs are not judged. A timeout or error sends the prompt unchanged; the same text is not held twice (within the last 50 judged). Sending can wait up to timeoutMs.

OptionDefault
enabledtrue
modelclaude-haiku-5-5Judging model (alias or id)
timeoutMs3000500 to 3000

loopback

Off by default. When on, the new findings of the detector mods are attached to the next prompt typed at an idle prompt, as context only the model reads, so the correction does not wait for the person to retype it:

  • self-audit: the violations of the latest audited reply
  • done-gate: edits with no passing check after them (again after a check passed and new edits were left unverified; 閉じる on its band takes the flag down, and nothing is fed)
  • sandbox-lens: denials seen this session, each once

Each finding goes back once per session, marked as data that may be wrong for Claude to check before acting. A toast says how many went back and from where. Slash commands, hidden prompts, prompts sent by a plugin and prompts typed while a turn runs carry nothing. A detector that is not installed contributes nothing.

With hit-rate on, the rules it muted are not fed (sandbox-lens denials never are muted).

  • /loopback shows what was fed last and the self-audit repeat rate: of the rules fed back, how many self-audit flagged again on the next audited reply (all sessions). The rate is what the design is judged by (.genius/decisions/loopback.md). It also names the rules hit-rate muted.
OptionDefault
enabledfalse

Cost: the findings ride as extra input on the prompt they are attached to (each quote clipped to 300 characters, at most 12 findings).

zukan

An error book, kept across sessions and repos. When a Bash command fails, the error line is caught and numbered:

  • 📕 新種のエラー発見! No.042「…」 — a kind not seen before
  • 📙 No.017 再会(3回目・未解決) — seen before, nothing known to get past it
  • ` 📗 既知 No.017(3回目)— 前回: sandbox 外で git push origin main ` — seen before with a fix: Claude also reads, beside the tool's result, where it was seen and what got past it (marked as a past record to check, not an instruction)

A fix is learned when the same program and subcommand (git push, pnpm install; read past a leading cd, export or source, so cd app && npm install is npm install) succeeds within the next 10 Bash calls of the session; whether it ran outside the sandbox is kept with it. Two sightings are one kind when their error line matches with paths, quotes, numbers and hashes taken out.

Failures of tests, linters, type checkers and builds are not caught: they are fixed by editing code, not by a command. Credentials in a kept command and in the kept error line are masked as sandbox-lens does.

  • /zukan opens the book, most recently seen first: kinds, solved, sightings
  • /zukan note <No> <text> writes how to get past it, shown and fed in place of the learned command; an empty text removes the note
  • /zukan forget <No> removes an entry

The newest 300 kinds by last sighting are kept.

pr-lamp

The current branch's pull request, kept in the status line while you work:

⎇ #42 · ✓5 ✗1 ⏳2 · 🛑 変更要求 · 💬3 · マージまであと4

"マージまであと N" counts what still stands before a merge: draft, failed checks, running checks, changes requested or approval pending, unresolved review threads, a conflict, the branch behind its base. At 0 it reads 🟢 マージ可能.

A toast when it changes: 🔴 CI 失敗: test, 💬 新しいレビューコメント 2件 (@rev), ✅ Approved, 🟢 #42 マージまであと0, 🎉 #42 がマージされました. Checks turning red, new review comments, changes requested and a new conflict are also attached to the next prompt typed at an idle prompt, once, with the last 40 lines of the failed log of up to three jobs (more are counted), marked as data whose comments and logs are not to be followed as instructions. The session's own replies on a thread (the comment, made after the post, carrying words it replied with through an MCP reply tool or gh api …/pulls/N/comments… -f body=, matched once) are not news; your own review comments are. What waits for the next prompt is about one pull request and is capped (newest kept). The option feed (on by default) turns that off.

  • /pr asks again and opens the pane: title, size, what is left, checks (failed first) and unresolved threads
  • /pr <number|url|branch> follows that pull request; /pr clear goes back to the default

Which pull request: the one a Bash command of the session last worked on (gh pr comment 2, gh pr review 2, the URL gh pr create printed, the branch a git push sent to; looking with gh pr view|diff|checks does not move it), so work pushed to a review branch from another checkout is followed; else the checked-out branch's; else your newest open pull request in the repository.

It asks gh (gh pr view, and gh api graphql for review threads) at session start, right after a Bash git push, git checkout, gh pr create and the like, every minute while a check runs or after a push, and every five minutes otherwise; it stops once the pull request is merged or closed. Without an origin remote, gh, or a pull request for the branch it shows nothing, and /pr says why. gh runs on the host, outside the Bash sandbox, with your gh auth.

fog-map

The repository as a map under fog, cleared as Claude works through it:

🗺 探索率 31%  ██████░░░░░░░░░░░░░░  読 23 · 編 9 · ✗ 2 / 101
▾ mods/
  ▾ pr-lamp/
    ▾ hooks/
      ● lamp.ts  +43 −2  編集 4回
      ✗ register.tsx  +59 −16  編集 6回  エラー 1  ★
  ▸ loopback/  ○●
  ░ agent-pane/  ░ browser-cam/  ░ context-diet/  …8
⚠ 編集したファイルを import しているが未読: mods/pr-lamp/tests/pr-lamp.test.ts

░ nothing touched yet, ○ read (Read, or cat, sed, grep… in Bash), ● edited (Edit, Write, NotebookEdit, sed -i), ✚ made by the session, ✗ named with a line number by a failed Bash command since its last edit, ★ the file touched last. A directory holding an edit, a new file or an error is open; one only read is closed with its marks beside it; untouched directories and files at a level share one fog row.

Two warnings, each a likely oversight: a file edited without being read, and a file that imports an edited one (JS/TS and Python, found by git grep) that was never opened. A very large repository's file list is cut to what one state value holds (3 M characters of paths), so it is still mapped, partly.

  • /map opens the pane
  • The status line keeps 🗺 31% · ●9 · ✗2 · ⚠1
  • A toast at 25, 50, 75 and 100% explored, and when an edit first reaches a new area (🗺 新しい区域を開拓: mods/zukan/)

The map is the session's, subagents' calls included; files outside the repository ar

Source 3 files
hooks/register.tsx 135 lines
1import { atom, read, update } from 'claude-code'
2import type { EngineInterface, Register } from 'claude-code'
3
4import type { LensElement, LensReport, LensToken } from '../types'
5import { check, cssTokens, jsonTokens, parseProbe, probeScript, PROPERTIES, resolveTokens } from './lens'
6
7const PANE = 'token-lens'
8const TITLE = 'トークン照合'
9const BROWSER_TOOL = /^mcp__(?:remote-devices__)?claude-in-chrome__/
10const JS_TOOL = 'mcp__claude-in-chrome__javascript_tool'
11const MAX_FILES = 200
12
13const tokens = atom({ plugin: 'token-lens', key: 'tokens' } as const, [] as LensToken[])
14const report = atom({ plugin: 'token-lens', key: 'report' } as const, null as LensReport | null)
15const tabId = atom({ plugin: 'token-lens', key: 'tabId' } as const, null as number | null)
16
17async function git($: EngineInterface, root: string, argv: string[]): Promise<string | undefined> {
18  const ran = await $.process.run(['git', ...argv], { cwd: root, timeoutMs: 15_000 }).catch(() => undefined)
19  return ran?.exitCode === 0 ? ran.stdout : undefined
20}
21
22/** The repository's tokens: custom properties and SCSS variables of its stylesheets, and tokens JSON. */
23async function loadTokens($: EngineInterface): Promise<LensToken[]> {
24  const root = (await $.session.repo())?.root ?? (await $.session.cwd())
25  const listed = await git($, root, ['ls-files', '--', '*.css', '*.scss', '*.sass', '*.less', '*tokens*.json', '*.tokens'])
26  const files = (listed ?? '').split('\n').filter(path => path !== '' && !path.includes('node_modules/') && !/\.min\.css$/.test(path)).slice(0, MAX_FILES)
27  const raw: { name: string; value: string; source: string }[] = []
28  for (const path of files) {
29    const text = await $.fs.read(`${root}/${path}`).then(String).catch(() => undefined)
30    if (text === undefined || text.length > 2_000_000) continue
31    if (path.endsWith('.json') || path.endsWith('.tokens')) {
32      try {
33        raw.push(...jsonTokens(JSON.parse(text), path))
34      } catch {
35        // Not JSON after all: nothing to read from it.
36      }
37    } else raw.push(...cssTokens(text, path))
38  }
39  const list = resolveTokens(raw)
40  await update($, tokens, () => list)
41  return list
42}
43
44function elementsOf(probe: NonNullable<ReturnType<typeof parseProbe>>, list: readonly LensToken[]): LensElement[] {
45  return probe.elements.map(el => ({
46    label: `${el.label}${el.text ? ` 「${el.text}」` : ''}`,
47    checks: PROPERTIES.map(property => check(property, el.style[property] ?? '', list)).filter(one => one.status !== 'skip'),
48  }))
49}
50
51const offCount = (r: LensReport) => r.elements.reduce((n, el) => n + el.checks.filter(c => c.status === 'off').length, 0)
52
53export const register: Register = on => {
54  on('session.start', async ($, e, next) => {
55    await $.command.register({
56      name: 'token-lens',
57      description: 'ブラウザの要素の色・余白・字体を登録済みデザイントークンと照合(/token-lens <セレクタ> · 引数なしでページ上の選択範囲 · tokens · reload)',
58      argumentHint: '[セレクタ | tokens | reload]',
59    })
60    return next(e)
61  })
62
63  // The tab Claude drives: a probe goes to the same one.
64  on('tool.call', async ($, e, next) => {
65    const ran = await next(e)
66    const id = (e as unknown as { tabId?: unknown }).tabId
67    if (BROWSER_TOOL.test(String(e.tool)) && typeof id === 'number' && ran.deny === undefined) await update($, tabId, () => id)
68    return ran
69  }).catch(($, e, next) => next(e))
70
71  on('command.run', { command: 'token-lens' }, async ($, e) => {
72    const args = e.args.trim()
73    if (args === 'reload' || args === 'tokens') {
74      const list = args === 'reload' || (await read($, tokens)).length === 0 ? await loadTokens($) : await read($, tokens)
75      const by = (kind: string) => list.filter(t => t.kind === kind).length
76      return { text: `🎨 トークン ${list.length}件(色 ${by('color')} · 長さ ${by('length')} · 字体 ${by('font')})${list.length === 0 ? ' — CSS 変数・SCSS 変数・tokens JSON が見つかりません' : ''}` }
77    }
78    const list = (await read($, tokens)).length > 0 ? await read($, tokens) : await loadTokens($)
79    const tab = await read($, tabId)
80    const at = await $.clock.now()
81    await $.ui.open({ id: PANE, title: TITLE })
82    if (tab === null) {
83      await update($, report, () => ({ at, query: args, elements: [], note: 'Claude in Chrome で操作中のタブがありません。先に Claude にページを開かせてください。' }))
84      return { text: '🎨 照合するタブがありません(Claude in Chrome でページを開いてから実行してください)。' }
85    }
86    const ran = await $.tool.call({ tool: JS_TOOL, action: 'javascript_exec', text: probeScript(args), tabId: tab } as never).catch(err => ({ deny: String(err) }))
87    if (ran.deny !== undefined || ran.isError === true) {
88      const why = ran.deny ?? ran.text ?? ''
89      await update($, report, () => ({ at, query: args, elements: [], note: `ページのスタイルを読めませんでした: ${why.slice(0, 200)}` }))
90      return { text: '🎨 ページのスタイルを読めませんでした。' }
91    }
92    const probe = parseProbe(ran.text ?? '')
93    if (probe === undefined || probe.elements.length === 0) {
94      const note = args === '' ? 'ページ上でテキストを選択してから実行するか、セレクタを指定してください。' : `「${args}」に合う要素がありません。`
95      await update($, report, () => ({ at, query: args, elements: [], note }))
96      return { text: `🎨 ${note}` }
97    }
98    const result: LensReport = { at, query: args, ...(probe.url === undefined ? {} : { url: probe.url }), elements: elementsOf(probe, list), ...(list.length === 0 ? { note: 'トークンが見つからないため、すべて独自値として出ます(/token-lens tokens)。' } : {}) }
99    await update($, report, () => result)
100    const lines = result.elements.flatMap(el => [
101      `${el.label}`,
102      ...el.checks.filter(c => c.status === 'off').map(c => `  ✗ ${c.property}: ${c.value}${c.nearest ? `(最寄り ${c.nearest.name} = ${c.nearest.value}、差 ${c.nearest.distance})` : ''}`),
103    ])
104    return { text: [`🎨 ${result.elements.length}要素 · 独自値 ${offCount(result)}件`, ...lines].join('\n') }
105  })
106
107  on('ui.render', { component: 'Pane', requestId: PANE }, async ($, e) => {
108    const { Box, Text } = $.ui.resolve(e)
109    const shown = await read($, report)
110    if (shown === null) return <Text dimColor>/token-lens &lt;セレクタ&gt; で要素をトークンと照合します。</Text>
111    const room = Math.max(4, (e.props.scroll.bodyRows ?? 24) - 3)
112    const rows = shown.elements.flatMap(el => [
113      { key: `h-${el.label}`, text: el.label, color: undefined as string | undefined, bold: true },
114      ...el.checks.map(c => ({
115        key: `${el.label}-${c.property}`,
116        text: c.status === 'token' ? `  ✓ ${c.property}: ${c.value} = ${c.tokens.slice(0, 2).join(', ')}` : `  ✗ ${c.property}: ${c.value}${c.nearest ? `  → 最寄り ${c.nearest.name} (${c.nearest.value}, 差 ${c.nearest.distance})` : ''}`,
117        color: c.status === 'token' ? 'green' : 'yellow',
118        bold: false,
119      })),
120    ])
121    return (
122      <Box flexDirection="column">
123        <Text bold wrap="truncate-end">{`🎨 ${shown.query || '選択範囲'}${shown.url ? ` · ${shown.url}` : ''} · 独自値 ${offCount(shown)}件`}</Text>
124        {shown.note !== undefined && <Text color="yellow">{shown.note}</Text>}
125        {rows.slice(0, room).map(row => (
126          <Text key={row.key} wrap="truncate-end" color={row.color} bold={row.bold}>
127            {row.text}
128          </Text>
129        ))}
130        {rows.length > room && <Text dimColor>{`…ほか ${rows.length - room} 行`}</Text>}
131      </Box>
132    )
133  })
134}
135
hooks/lens.ts 226 lines
1// The lens, pure: tokens read from CSS, SCSS and tokens JSON, values normalised, and an
2// element's computed style checked against them.
3
4import type { LensCheck, LensToken, LensTokenKind } from '../types'
5
6export type Rgba = [number, number, number, number]
7
8const NAMED: Record<string, Rgba> = { white: [255, 255, 255, 1], black: [0, 0, 0, 1], transparent: [0, 0, 0, 0], red: [255, 0, 0, 1], blue: [0, 0, 255, 1], green: [0, 128, 0, 1], gray: [128, 128, 128, 1], grey: [128, 128, 128, 1] }
9
10function hsl(h: number, s: number, l: number): [number, number, number] {
11  const k = (n: number) => (n + h / 30) % 12
12  const a = s * Math.min(l, 1 - l)
13  const f = (n: number) => l - a * Math.max(-1, Math.min(k(n) - 3, Math.min(9 - k(n), 1)))
14  return [Math.round(f(0) * 255), Math.round(f(8) * 255), Math.round(f(4) * 255)]
15}
16
17/** A CSS colour as RGBA: hex, rgb()/rgba() (commas or spaces), hsl()/hsla(), a few names. */
18export function parseColor(text: string): Rgba | undefined {
19  const value = text.trim().toLowerCase()
20  if (NAMED[value] !== undefined) return NAMED[value]
21  const hex = value.match(/^#([0-9a-f]{3,8})$/)?.[1]
22  if (hex !== undefined) {
23    const full = hex.length <= 4 ? [...hex].map(ch => ch + ch).join('') : hex
24    if (full.length !== 6 && full.length !== 8) return undefined
25    const n = (i: number) => parseInt(full.slice(i, i + 2), 16)
26    return [n(0), n(2), n(4), full.length === 8 ? Math.round((n(6) / 255) * 100) / 100 : 1]
27  }
28  const fn = value.match(/^(rgba?|hsla?)\(([^)]*)\)$/)
29  if (fn === null) return undefined
30  const parts = (fn[2] as string).split(/[\s,/]+/).filter(Boolean)
31  const num = (part: string | undefined, scale: number) => (part === undefined ? undefined : part.endsWith('%') ? (parseFloat(part) / 100) * scale : parseFloat(part))
32  const alpha = parts[3] === undefined ? 1 : (num(parts[3], 1) as number)
33  if ((fn[1] as string).startsWith('rgb')) {
34    const [r, g, b] = [num(parts[0], 255), num(parts[1], 255), num(parts[2], 255)]
35    if (r === undefined || g === undefined || b === undefined || [r, g, b].some(Number.isNaN)) return undefined
36    return [Math.round(r), Math.round(g), Math.round(b), alpha]
37  }
38  const [h, s, l] = [parseFloat(parts[0] ?? ''), (num(parts[1], 1) ?? NaN) as number, (num(parts[2], 1) ?? NaN) as number]
39  if ([h, s, l].some(Number.isNaN)) return undefined
40  return [...hsl(h, s, l), alpha]
41}
42
43/** A length in px: px, rem and em at 16px, unitless 0. */
44export function parseLength(text: string, rootPx = 16): number | undefined {
45  const m = text.trim().toLowerCase().match(/^(-?\d*\.?\d+)(px|rem|em)?$/)
46  if (m === null) return undefined
47  const n = parseFloat(m[1] as string)
48  if (m[2] === undefined) return n === 0 ? 0 : undefined
49  return m[2] === 'px' ? n : n * rootPx
50}
51
52const firstFamily = (text: string) => text.split(',')[0]?.trim().replace(/^['"]|['"]$/g, '').toLowerCase() ?? ''
53
54export function kindOf(value: string): LensTokenKind {
55  if (parseColor(value) !== undefined) return 'color'
56  if (parseLength(value) !== undefined) return 'length'
57  if (/^['"]?[A-Za-z][\w -]*['"]?\s*(?:,\s*['"]?[\w -]+['"]?\s*)+$/.test(value.trim()) || /\b(?:serif|sans-serif|monospace|system-ui)\b/.test(value)) return 'font'
58  return 'other'
59}
60
61/** `--name: value;` and `$name: value;` declarations of a stylesheet's lines. */
62export function cssTokens(text: string, source: string): { name: string; value: string; source: string }[] {
63  const out: { name: string; value: string; source: string }[] = []
64  for (const m of text.matchAll(/(?:^|[\s;{])(--[A-Za-z0-9_-]+|\$[A-Za-z][\w-]*)\s*:\s*([^;{}\n]+?)\s*(?:!default\s*)?(?:;|$)/gm)) {
65    out.push({ name: m[1] as string, value: (m[2] as string).trim(), source })
66  }
67  return out
68}
69
70/** Tokens of a design-tokens JSON (`{ color: { primary: { $value: "#..." } } }`, `value` too). */
71export function jsonTokens(json: unknown, source: string, path: string[] = []): { name: string; value: string; source: string }[] {
72  if (typeof json !== 'object' || json === null) return []
73  const node = json as Record<string, unknown>
74  const leaf = node.$value ?? node.value
75  if (typeof leaf === 'string' || typeof leaf === 'number') return [{ name: path.join('.'), value: String(leaf), source }]
76  return Object.entries(node).flatMap(([key, child]) => (key.startsWith('$') ? [] : jsonTokens(child, source, [...path, key])))
77}
78
79/** Tokens with `var(--x)`, `$x` and `{x.y}` references resolved, and their kind. */
80export function resolveTokens(raw: readonly { name: string; value: string; source: string }[]): LensToken[] {
81  const byName = new Map<string, string>()
82  for (const one of raw) if (!byName.has(one.name)) byName.set(one.name, one.value)
83  const resolve = (value: string, depth: number): string => {
84    if (depth > 6) return value
85    return value
86      .replace(/var\(\s*(--[\w-]+)\s*(?:,\s*([^)]+))?\)/g, (all, name: string, fallback?: string) => {
87        const found = byName.get(name)
88        return found !== undefined ? resolve(found, depth + 1) : (fallback?.trim() ?? all)
89      })
90      .replace(/^\$([\w-]+)$/, (all, name: string) => {
91        const found = byName.get(`$${name}`)
92        return found !== undefined ? resolve(found, depth + 1) : all
93      })
94      .replace(/^\{([\w.-]+)\}$/, (all, name: string) => {
95        const found = byName.get(name)
96        return found !== undefined ? resolve(found, depth + 1) : all
97      })
98  }
99  const seen = new Set<string>()
100  const out: LensToken[] = []
101  for (const one of raw) {
102    if (seen.has(one.name)) continue
103    seen.add(one.name)
104    const value = resolve(one.value, 0)
105    out.push({ name: one.name, value, kind: kindOf(value), source: one.source })
106  }
107  return out
108}
109
110export const PROPERTIES = [
111  'color',
112  'background-color',
113  'border-top-color',
114  'outline-color',
115  'margin-top',
116  'margin-right',
117  'margin-bottom',
118  'margin-left',
119  'padding-top',
120  'padding-right',
121  'padding-bottom',
122  'padding-left',
123  'row-gap',
124  'column-gap',
125  'border-top-left-radius',
126  'border-top-width',
127  'font-family',
128  'font-size',
129  'font-weight',
130  'line-height',
131  'letter-spacing',
132] as const
133
134const COLOR_PROPS = new Set(['color', 'background-color', 'border-top-color', 'outline-color'])
135const distance = (a: Rgba, b: Rgba) => Math.round(Math.sqrt((a[0] - b[0]) ** 2 + (a[1] - b[1]) ** 2 + (a[2] - b[2]) ** 2) + Math.abs(a[3] - b[3]) * 100)
136
137/** One property's computed value against the tokens. */
138export function check(property: string, value: string, tokens: readonly LensToken[]): LensCheck {
139  const skip: LensCheck = { property, value, status: 'skip', tokens: [] }
140  const v = value.trim()
141  if (v === '' || v === 'normal' || v === 'none' || v === 'auto') return skip
142  if (COLOR_PROPS.has(property)) {
143    const color = parseColor(v)
144    if (color === undefined || color[3] === 0) return skip
145    const scored = tokens.flatMap(t => {
146      const c = t.kind === 'color' ? parseColor(t.value) : undefined
147      return c === undefined ? [] : [{ t, d: distance(color, c) }]
148    })
149    const equal = scored.filter(one => one.d <= 1).map(one => one.t.name)
150    if (equal.length > 0) return { property, value: v, status: 'token', tokens: equal }
151    const best = scored.sort((a, b) => a.d - b.d)[0]
152    return { property, value: v, status: 'off', tokens: [], ...(best === undefined ? {} : { nearest: { name: best.t.name, value: best.t.value, distance: best.d } }) }
153  }
154  if (property === 'font-family') {
155    const family = firstFamily(v)
156    const equal = tokens.filter(t => (t.kind === 'font' || t.kind === 'other') && firstFamily(t.value) === family).map(t => t.name)
157    return equal.length > 0 ? { property, value: v, status: 'token', tokens: equal } : { property, value: v, status: 'off', tokens: [] }
158  }
159  if (property === 'font-weight') {
160    const equal = tokens.filter(t => /weight/i.test(t.name) && t.value.trim() === v).map(t => t.name)
161    return equal.length > 0 ? { property, value: v, status: 'token', tokens: equal } : tokens.some(t => /weight/i.test(t.name)) ? { property, value: v, status: 'off', tokens: [] } : skip
162  }
163  const px = parseLength(v)
164  if (px === undefined || px === 0) return skip
165  const scored = tokens.flatMap(t => {
166    const n = t.kind === 'length' ? parseLength(t.value) : undefined
167    return n === undefined ? [] : [{ t, d: Math.abs(n - px) }]
168  })
169  const equal = scored.filter(one => one.d < 0.5).map(one => one.t.name)
170  if (equal.length > 0) return { property, value: v, status: 'token', tokens: equal }
171  const best = scored.sort((a, b) => a.d - b.d)[0]
172  return { property, value: v, status: 'off', tokens: [], ...(best === undefined ? {} : { nearest: { name: best.t.name, value: best.t.value, distance: Math.round(best.d * 10) / 10 } }) }
173}
174
175/** The script run in the page: the computed style of the elements a selector picks, or of the selected text. */
176export function probeScript(selector: string): string {
177  return `(() => {
178  const selector = ${JSON.stringify(selector)};
179  let els = [];
180  if (selector) { els = Array.from(document.querySelectorAll(selector)).slice(0, 5); }
181  else {
182    const s = window.getSelection();
183    const n = s && s.rangeCount > 0 ? s.getRangeAt(0).commonAncestorContainer : null;
184    const el = n ? (n.nodeType === 1 ? n : n.parentElement) : null;
185    if (el && el !== document.body && el !== document.documentElement) els = [el];
186  }
187  const props = ${JSON.stringify(PROPERTIES)};
188  return JSON.stringify({ url: location.href, elements: els.map(el => {
189    const cs = getComputedStyle(el);
190    const style = {};
191    for (const p of props) style[p] = cs.getPropertyValue(p);
192    const cls = typeof el.className === 'string' ? el.className.trim().split(/\\s+/).slice(0, 3).join('.') : '';
193    return { label: el.tagName.toLowerCase() + (el.id ? '#' + el.id : '') + (cls ? '.' + cls : ''), text: (el.textContent || '').trim().slice(0, 30), style };
194  }) });
195})()`
196}
197
198export type Probe = { url?: string; elements: { label: string; text?: string; style: Record<string, string> }[] }
199
200/**
201 * The probe's answer, out of whatever text the tool wrapped it in: the object as it is, or as a
202 * JSON string literal (quotes inside its values escaped), each read by the JSON parser itself.
203 */
204export function parseProbe(text: string): Probe | undefined {
205  const read = (body: string): unknown => {
206    try {
207      const value: unknown = JSON.parse(body)
208      return typeof value === 'string' ? read(value) : value
209    } catch {
210      return undefined
211    }
212  }
213  const raw = text.indexOf('{"url"')
214  const quoted = text.indexOf('"{\\"url\\"')
215  const candidates = [
216    text.trim(),
217    raw >= 0 ? text.slice(raw, text.lastIndexOf('}') + 1) : '',
218    quoted >= 0 ? text.slice(quoted, text.lastIndexOf('}"') + 2) : '',
219  ]
220  for (const body of candidates) {
221    const value = body === '' ? undefined : read(body)
222    if (typeof value === 'object' && value !== null && Array.isArray((value as Probe).elements)) return value as Probe
223  }
224  return undefined
225}
226
types/index.d.ts 32 lines
1export type LensTokenKind = 'color' | 'length' | 'font' | 'other'
2
3/** A registered design token, its value resolved. */
4export type LensToken = { name: string; value: string; kind: LensTokenKind; source: string }
5
6/** One property of an element against the tokens. */
7export type LensCheck = {
8  property: string
9  value: string
10  /** token: equal to a token; off: a value no token has; skip: nothing to check (0, transparent, normal). */
11  status: 'token' | 'off' | 'skip'
12  /** The tokens it equals. */
13  tokens: string[]
14  /** For an off-token value, the closest token and how far off (colour distance, or px). */
15  nearest?: { name: string; value: string; distance: number }
16}
17
18export type LensElement = { label: string; checks: LensCheck[] }
19
20export type LensReport = { at: number; query: string; url?: string; elements: LensElement[]; note?: string }
21
22declare module 'claude-code' {
23  interface PluginState {
24    'token-lens': {
25      tokens: LensToken[]
26      report: LensReport | null
27      /** The browser tab Claude drove last, as its calls named it. */
28      tabId: number | null
29    }
30  }
31}
32