prompt-cache-control

1/**
2 * prompt-cache-control — Claude Mod (EARLY ACCESS)
3 *
4 * A prompt-cache meter for Claude Code. Every main-loop request reports how
5 * many prompt tokens the cache served (`cache_read_input_tokens`), wrote
6 * (`cache_creation_input_tokens`) and sent uncached (`input_tokens`); this mod
7 * keeps those per request and per turn, counts down to the moment the cache
8 * lapses, and says what to do about it: keep going, /compact or /clear.
9 *
10 *   - `turn.step` reads each main-loop request's usage (subagents have their
11 *     own prefixes and are left out)
12 *   - `$.clock.every(1000)` redraws the countdown, and only while its text
13 *     changes: an idle, expired session costs nothing
14 *   - a row above the prompt (the AbovePrompt component), an optional status
15 *     line entry, and `/cache`, a pane with one row per turn
16 *
17 * The lifetime is counted from the start of the request that last wrote or read
18 * the cache, as Anthropic documents it. Which lifetime Claude Code asked for
19 * follows its documented rules (see decideTtl in ./cache.ts): FORCE_PROMPT_CACHING_5M,
20 * CLAUDE_CODE_PROMPT_CACHE_TTL, the promptCacheTtl setting, ENABLE_PROMPT_CACHING_1H,
21 * then the account (1 hour on a Claude subscription, 5 minutes otherwise). The
22 * API names the TTL of a write but the mod API passes on only the token counts,
23 * so the mod also watches the gaps between requests (a hit after more than 5
24 * minutes proves 1 hour; see observeTtl). `ttl: "5m" | "1h"` pins it.
25 *
26 * Needs CLAUDE_CODE_ENABLE_FUNCTION_HOOKS=1 (Claude Code >= 2.1.259).
27 *
28 * Options (pluginConfigs["prompt-cache-control@skills-dir"].options):
29 *   ttl: "auto" | "5m" | "1h"   cache lifetime (default auto)
30 *   warnSeconds: number         countdown threshold for the warning (default 60)
31 *   compactAtTokens: number     prompt size that makes an expired cache suggest /compact (default 100000)
32 *   band: boolean               row above the prompt (default true; always off on a Maestri terminal, MAESTRI_TERMINAL_ID set)
33 *   status: boolean             entry under the prompt (default false)
34 *   toast: boolean              toasts near expiry: at warnSeconds, then 10, 3, 2 and 1 s (default true)
35 */
36import type { EngineInterface, Register } from 'claude-code'
37import {
38  advise,
39  COUNTDOWN_MARKS,
40  bar,
41  byTurn,
42  fit,
43  fmtClock,
44  fmtTokens,
45  hitRatio,
46  isCachingDisabled,
47  accountOf,
48  decideTtl,
49  observeTtl,
50  lifeColor,
51  lifeRatio,
52  nextToastMark,
53  positive,
54  promptTokens,
55  remainingMs,
56  rowRatio,
57  segments,
58} from './cache.ts'
59import type { Account, Advice, CacheEnv, Sample, Ttl } from './cache.ts'
60
61const PANE = 'cache'
62const COMMAND = 'cache'
63const KEEP = 200
64// below this a lapsed cache costs too little to interrupt anyone about
65const TOAST_MIN_TOKENS = 20_000
66
67let samples: Sample[] = []
68let ttl: Ttl = '5m'
69let baseTtl: Ttl = '5m'
70let pinned = false
71let observed: Ttl | undefined
72let setting: unknown
73let account: Account = 'other'
74let ttlSource = 'default'
75let envSource = 'default'
76let env: CacheEnv = {}
77let timer: { cancel: () => void } | undefined
78let lastKey = ''
79let toastedFor = 0
80let toastLevel = Infinity
81let isPaneOpen = false
82// on a Maestri terminal the band is noise: /cache is the only surface there
83let onMaestri = false
84
85type Policy = { warnMs: number; compactAtTokens: number }
86
87function current(policy: Policy, now: number) {
88  const last = samples[samples.length - 1]
89  const prev = samples[samples.length - 2]
90  const disabled = last ? isCachingDisabled(last.model, env) : isCachingDisabled('', env)
91  const advice: Advice = advise(last, prev, { ttl, ...policy }, now, disabled)
92  const left = last ? remainingMs(last, ttl, now) : 0
93  return { last, advice, left }
94}
95
96const COLOR: Record<Advice['kind'], string | undefined> = {
97  warm: 'green',
98  soon: 'yellow',
99  expired: 'red',
100  miss: 'red',
101  off: undefined,
102  cold: undefined,
103  uncached: undefined,
104}
105
106function shortLine(policy: Policy, now: number): string {
107  const { last, advice, left } = current(policy, now)
108  if (!last || advice.kind === 'off') return `cache: ${advice.text}`
109  const clock = left > 0 ? ` · ${fmtClock(left)}` : ''
110  return `cache ${Math.round(hitRatio(last) * 100)}%${clock}`
111}
112
113// the promptCacheTtl setting, from the settings files that can carry it (local over project over user)
114async function readSetting($: EngineInterface): Promise<unknown> {
115  const home = await $.env.get('HOME').catch(() => undefined)
116  const cwd = await $.session.cwd().catch(() => undefined)
117  const files = [cwd && `${cwd}/.claude/settings.local.json`, cwd && `${cwd}/.claude/settings.json`, home && `${home}/.claude/settings.json`]
118  for (const file of files) {
119    if (!file) continue
120    try {
121      const value = JSON.parse(await $.fs.read(file)).promptCacheTtl
122      if (value === '5m' || value === '1h') return value
123    } catch {
124      // missing or unreadable: the next file
125    }
126  }
127  return undefined
128}
129
130export const register: Register = (on, options) => {
131  const policy: Policy = {
132    warnMs: positive(options.warnSeconds, 60) * 1000,
133    compactAtTokens: positive(options.compactAtTokens, 100_000),
134  }
135  const showBand = options.band !== false
136  const showStatus = options.status === true
137  const wantToast = options.toast !== false
138
139  on('session.start', async ($, e, next) => {
140    const r = await next(e)
141    samples = []
142    lastKey = ''
143    toastedFor = 0
144    const none = () => undefined
145    env = {
146      enable1h: await $.env.get('ENABLE_PROMPT_CACHING_1H').catch(none),
147      force5m: await $.env.get('FORCE_PROMPT_CACHING_5M').catch(none),
148      ttlVar: await $.env.get('CLAUDE_CODE_PROMPT_CACHE_TTL').catch(none),
149      disableAll: await $.env.get('DISABLE_PROMPT_CACHING').catch(none),
150      disableHaiku: await $.env.get('DISABLE_PROMPT_CACHING_HAIKU').catch(none),
151      disableSonnet: await $.env.get('DISABLE_PROMPT_CACHING_SONNET').catch(none),
152      disableOpus: await $.env.get('DISABLE_PROMPT_CACHING_OPUS').catch(none),
153    }
154    onMaestri = !!(await $.env.get('MAESTRI_TERMINAL_ID').catch(none))
155    pinned = options.ttl === '5m' || options.ttl === '1h'
156    observed = undefined
157    setting = await readSetting($)
158    account = accountOf((await $.session.usage().catch(() => undefined))?.rateLimits ?? [])
159    const choice = decideTtl(options.ttl, env, setting, account)
160    baseTtl = choice.ttl
161    ttl = baseTtl
162    envSource = choice.source
163    ttlSource = envSource
164
165    await $.command
166      .register({
167        name: COMMAND,
168        description: 'Prompt-cache usage per turn and the time left before it lapses (stop closes)',
169        argumentHint: '[stop]',
170        immediate: true,
171      })
172      .catch(err => $.ui.log(`prompt-cache-control: /${COMMAND} not registered: ${err}`))
173    $.ui.log(`prompt-cache-control loaded: ${ttl} cache (${ttlSource}), /${COMMAND} opens the table`, { to: 'debug' })
174
175    timer?.cancel()
176    timer = $.clock.every(1000, () => {
177      const now = Date.now()
178      const { last, advice, left } = current(policy, now)
179      const key = `${advice.kind}|${advice.text}|${left > 0 ? fmtClock(left) : ''}`
180      if (key !== lastKey) {
181        lastKey = key
182        if (showStatus) $.ui.status(shortLine(policy, now))
183        $.ui.invalidate('ui.render')
184      }
185      if (wantToast && last && left > 0 && promptTokens(last) >= TOAST_MIN_TOKENS) {
186        if (toastedFor !== last.startedAt) {
187          toastedFor = last.startedAt
188          toastLevel = Infinity
189        }
190        // the first toast comes at warnSeconds, then 10, 3, 2 and 1 seconds; a late tick skips to the newest one
191        const secs = Math.ceil(left / 1000)
192        const mark = nextToastMark(secs, policy.warnMs / 1000, toastLevel)
193        if (mark !== undefined) {
194          toastLevel = mark
195          const tail = secs <= COUNTDOWN_MARKS[0] ? 'send a message now' : `send a message to keep ${fmtTokens(promptTokens(last))} tokens warm`
196          $.ui.toast(`cache expires in ${secs >= 60 ? fmtClock(left) : `${secs}s`}: ${tail}`)
197        }
198      }
199    })
200    return r
201  })
202
203  on('session.end', async ($, e, next) => {
204    // /clear starts a new conversation in the same process: its cache is a new one
205    if (e.reason === 'clear') {
206      samples = []
207      lastKey = ''
208      toastedFor = 0
209      observed = undefined
210      ttl = baseTtl
211      ttlSource = envSource
212      $.ui.invalidate('ui.render')
213      return next(e)
214    }
215    timer?.cancel()
216    timer = undefined
217    return next(e)
218  })
219
220  // each main-loop request: what the cache did with it
221  on('turn.step', async function* ($, e, next) {
222    if (e.agentId) return yield* next(e)
223    const startedAt = Date.now()
224    const r = yield* next(e)
225    if (r.usage) {
226      samples.push({
227        turnId: e.turnId,
228        index: e.index,
229        model: r.usage.model || e.model,
230        startedAt,
231        read: r.usage.cache_read_input_tokens,
232        write: r.usage.cache_creation_input_tokens,
233        fresh: r.usage.input_tokens,
234        output: r.usage.output_tokens,
235      })
236      if (samples.length > KEEP) samples = samples.slice(-KEEP)
237      if (!pinned) {
238        // the account can change under a session: a subscription running out of plan usage moves to usage credits
239        account = accountOf((await $.session.usage().catch(() => undefined))?.rateLimits ?? [])
240        const choice = decideTtl(options.ttl, env, setting, account)
241        baseTtl = choice.ttl
242        envSource = choice.source
243        if (observed === undefined) {
244          ttl = baseTtl
245          ttlSource = envSource
246        }
247        const seen = observeTtl(samples[samples.length - 2], samples[samples.length - 1], observed)
248        if (seen !== observed) {
249          observed = seen
250          ttl = seen ?? baseTtl
251          ttlSource = `observed from request timing; ${envSource} said ${baseTtl}`
252          $.ui.log(`prompt-cache-control: cache lifetime is ${ttl} (${ttlSource})`, { to: 'debug' })
253        }
254      }
255      lastKey = ''
256      if (showStatus) $.ui.status(shortLine(policy, Date.now()))
257      $.ui.invalidate('ui.render')
258    }
259    return r
260  })
261
262  on('command.run', { command: COMMAND }, async ($, e) => {
263    if (e.args.trim().toLowerCase() === 'stop') {
264      await $.ui.close({ id: PANE }).catch(() => undefined)
265      isPaneOpen = false
266      return { text: 'cache table closed' }
267    }
268    isPaneOpen = true
269    await $.ui.open({ id: PANE, title: 'cache', focus: true })
270    $.ui.invalidate('ui.render')
271    const { advice } = current(policy, Date.now())
272    return { text: `${ttl} cache (${ttlSource}) · ${advice.text} · /${COMMAND} stop closes` }
273  })
274
275  on('ui.close', async ($, e, next) => {
276    if (e.id !== PANE) return next(e)
277    isPaneOpen = false
278    return next(e)
279  })
280
281  on('ui.press', async ($, e, next) => {
282    if (e.plugin !== $.plugin.name || e.requestId !== PANE) return next(e)
283    if (e.element === 'close') await $.ui.close({ id: PANE }).catch(() => undefined)
284    return next(e)
285  })
286
287  on('ui.render', { component: 'AbovePrompt' }, async ($, e, next) => {
288    if (!showBand || onMaestri || e.props.hasSurvey || isPaneOpen) return next(e)
289    const { last, advice, left } = current(policy, Date.now())
290    if (!last && advice.kind !== 'off') return next(e)
291    const { Box, Text } = $.ui.resolve(e)
292    const columns = e.viewport?.columns ?? 100
293    const color = COLOR[advice.kind]
294
295    if (!last) return <Text dimColor>{fit(`cache: ${advice.text}`, columns)}</Text>
296
297    const ratio = hitRatio(last)
298    const wide = columns >= 90
299    return (
300      <Box flexDirection="row" columnGap={1}>
301        <Text bold color={color}>{advice.kind === 'warm' ? '●' : advice.kind === 'soon' ? '▲' : advice.kind === 'off' || advice.kind === 'cold' || advice.kind === 'uncached' ? '○' : '✖'}</Text>
302        <Text bold color="cyan">cache</Text>
303        <Text color={color}>{bar(ratio, wide ? 10 : 6)}</Text>
304        <Text bold>{`${Math.round(ratio * 100)}%`}</Text>
305        {wide ? (
306          <>
307            <Text color="green">{`read ${fmtTokens(last.read)}`}</Text>
308            <Text color="yellow">{`wrote ${fmtTokens(last.write)}`}</Text>
309            <Text color="cyan">{`new ${fmtTokens(last.fresh)}`}</Text>
310          </>
311        ) : (
312          <Text dimColor>{`${fmtTokens(promptTokens(last))} tok`}</Text>
313        )}
314        {advice.kind !== 'uncached' && advice.kind !== 'off' && (
315          <Text bold color={left > 0 ? lifeColor(left, ttl, policy.warnMs) : 'red'}>{left > 0 ? `⏱ ${fmtClock(left)}` : '⏱ 0:00'}</Text>
316        )}
317        <Text dimColor wrap="truncate-end">{`${ttl} · ${advice.text}`}</Text>
318      </Box>
319    )
320  })
321
322  on('ui.render', { component: 'Pane' }, async ($, e, next) => {
323    if (e.requestId !== PANE) return next(e)
324    const { Box, Text, Button } = $.ui.resolve(e)
325    const width = Math.max(30, e.props.bodyColumns - 1)
326    // HTML collapses runs of spaces and trims a text's ends; a no-break space keeps them
327    const sp = (t: string) => (e.surface === 'terminal' ? t : t.replace(/ /g, ' '))
328    const now = Date.now()
329    const { last, advice, left } = current(policy, now)
330    const all = byTurn(samples)
331    const counting = !!last && advice.kind !== 'uncached' && advice.kind !== 'off'
332    // the countdown goes green, then yellow, then red as the cache runs out
333    const clockColor = counting ? lifeColor(left, ttl, policy.warnMs) : undefined
334    const stateColor = advice.kind === 'expired' || advice.kind === 'miss' ? 'red' : (clockColor ?? COLOR[advice.kind])
335    const hitColor = (pct: number) => (pct >= 80 ? 'green' : pct >= 40 ? 'yellow' : 'red')
336    // solid bars are filled Boxes, not block characters, so HTML draws no seams between cells
337    const solid = (key: string, parts: [number, string | undefined][]) => (
338      <Box key={key} flexDirection="row" height={1} flexShrink={0}>
339        {parts.map(([w, c], i) => (w > 0 ? <Box key={`${key}:${i}`} width={w} height={1} flexShrink={0} backgroundColor={c} /> : null))}
340      </Box>
341    )
342    const cell = (key: string, w: number, text: string, c?: string, bold = false) => (
343      <Box key={key} width={w} flexShrink={0} justifyContent="flex-end">
344        <Text color={c} bold={bold} dimColor={!c}>{sp(text)}</Text>
345      </Box>
346    )
347
348    const barW = Math.min(width, 40)
349    const life = lifeRatio(left, ttl)
350    const lifeFilled = Math.round(life * barW)
351    const [sr, sw, sn] = last ? segments(last.read, last.write, last.fresh, barW) : [0, 0, 0]
352    const rows = all.slice(-Math.max(3, (e.viewport?.rows ?? 24) - 16))
353    const icon = advice.kind === 'warm' ? '●' : advice.kind === 'soon' ? '▲' : advice.kind === 'expired' || advice.kind === 'miss' ? '✖' : '○'
354
355    return (
356      <Box flexDirection="column">
357        <Box key="title" flexDirection="row" columnGap={1}>
358          <Text bold color="cyan">{sp('⚡ PROMPT CACHE')}</Text>
359          <Text dimColor>{sp(`· ${ttl} lifetime (${ttlSource})`)}</Text>
360        </Box>
361
362        <Box key="clock" flexDirection="column" marginTop={1}>
363          <Text bold color={clockColor}>{sp(counting ? `⏱ ${left > 0 ? fmtClock(left) : '0:00'}` : '⏱ --:--')}</Text>
364          {counting ? (
365            <Box flexDirection="row" columnGap={1}>
366              {solid('life', [[lifeFilled, clockColor], [barW - lifeFilled, 'gray']])}
367              <Text dimColor>{sp(`${Math.round(life * 100)}%`)}</Text>
368            </Box>
369          ) : null}
370        </Box>
371
372        <Box key="advice" marginTop={1} flexDirection="column">
373          <Text bold color={stateColor}>{sp(`${icon} ${advice.text}`)}</Text>
374          {last ? <Text dimColor>{sp(fit(`${last.model} · prompt ${fmtTokens(promptTokens(last))} tokens`, width))}</Text> : null}
375        </Box>
376
377        {last ? (
378          <Box key="stack" flexDirection="column" marginTop={1}>
379            <Box flexDirection="row" columnGap={1}>
380              {solid('stack', [[sr, 'green'], [sw, 'yellow'], [sn, 'cyan']])}
381              <Text bold color={hitColor(Math.round(hitRatio(last) * 100))}>{sp(`${Math.round(hitRatio(last) * 100)}% hit`)}</Text>
382            </Box>
383            <Box flexDirection="row" columnGap={2}>
384              <Text color="green">{sp(`■ read ${fmtTokens(last.read)}`)}</Text>
385              <Text color="yellow">{sp(`■ wrote ${fmtTokens(last.write)}`)}</Text>
386              <Text color="cyan">{sp(`■ new ${fmtTokens(last.fresh)}`)}</Text>
387            </Box>
388          </Box>
389        ) : null}
390
391        <Box key="table" flexDirection="column" marginTop={1}>
392          <Box key="head" flexDirection="row" columnGap={1}>
393            {cell('h:turn', 4, 'turn', 'cyan', true)}
394            {cell('h:steps', 5, 'steps', 'cyan', true)}
395            {cell('h:read', 6, 'read', 'green', true)}
396            {cell('h:wrote', 6, 'wrote', 'yellow', true)}
397            {cell('h:new', 5, 'new', 'cyan', true)}
398            {cell('h:hit', 4, 'hit', 'magenta', true)}
399          </Box>
400          {rows.length === 0 ? <Text dimColor>{sp('no requests yet')}</Text> : null}
401          {rows.map((row, i) => {
402            const n = all.length - rows.length + i + 1
403            const pct = Math.round(rowRatio(row) * 100)
404            return (
405              <Box key={`t:${row.turnId}`} flexDirection="row" columnGap={1}>
406                {cell(`c:turn:${row.turnId}`, 4, String(n))}
407                {cell(`c:steps:${row.turnId}`, 5, String(row.steps))}
408                {cell(`c:read:${row.turnId}`, 6, fmtTokens(row.read), 'green')}
409                {cell(`c:wrote:${row.turnId}`, 6, fmtTokens(row.write), 'yellow')}
410                {cell(`c:new:${row.turnId}`, 5, fmtTokens(row.fresh), 'cyan')}
411                {cell(`c:hit:${row.turnId}`, 4, `${pct}%`, hitColor(pct), true)}
412              </Box>
413            )
414          })}
415        </Box>
416
417        <Box key="foot" marginTop={1} flexDirection="column">
418          <Button key="close" label="close" onPress={() => {}} />
419          <Box key="legend" marginTop={1} flexDirection="column">
420            <Text color="green">{sp('■ read: served by the cache')}</Text>
421            <Text color="yellow">{sp('■ wrote: new cache entry')}</Text>
422            <Text color="cyan">{sp('■ new: sent uncached')}</Text>
423          </Box>
424        </Box>
425      </Box>
426    )
427  })
428}
429

1/**
2 * cache.ts — the pure half of prompt-cache-control: no `$`, no engine.
3 *
4 * What it models, from Anthropic's prompt-caching documentation:
5 *   - the cache lives 5 minutes by default, 1 hour when asked for; a read
6 *     refreshes the entry at no extra cost, and the lifetime is measured from
7 *     the START of the request that wrote or read it
8 *   - a request's prompt is `input_tokens` (uncached remainder) +
9 *     `cache_read_input_tokens` + `cache_creation_input_tokens`
10 *   - writes cost 1.25x base input for 5m and 2x for 1h; reads about 0.1x
11 *     (less on some models), so an expired cache on a large context is the
12 *     expensive moment
13 *   - a prefix change (model, effort/thinking settings, tool set, system
14 *     prompt) makes the next request write instead of read
15 *
16 * Claude Code's own switches (read from the environment):
17 *   ENABLE_PROMPT_CACHING_1H=1   ask for the 1-hour TTL
18 *   FORCE_PROMPT_CACHING_5M=1    force the 5-minute TTL, beating the above
19 *   DISABLE_PROMPT_CACHING=1     no caching; DISABLE_PROMPT_CACHING_{HAIKU,SONNET,OPUS}
20 *                                 turn it off for that model family only
21 */
22
23export type Ttl = '5m' | '1h'
24
25export type CacheEnv = {
26  enable1h?: string
27  force5m?: string
28  /** CLAUDE_CODE_PROMPT_CACHE_TTL: "5m" or "1h" for the main conversation */
29  ttlVar?: string
30  disableAll?: string
31  disableHaiku?: string
32  disableSonnet?: string
33  disableOpus?: string
34}
35
36/** One main-loop request, as the API reported it. */
37export type Sample = {
38  turnId: string
39  index: number
40  model: string
41  /** ms since the epoch when the request started: the cache's lifetime is counted from here */
42  startedAt: number
43  read: number
44  write: number
45  fresh: number
46  output: number
47}
48
49export type AdviceKind = 'off' | 'cold' | 'uncached' | 'warm' | 'soon' | 'expired' | 'miss'
50
51export type Advice = {
52  kind: AdviceKind
53  /** one sentence for the band */
54  text: string
55}
56
57export type Policy = {
58  ttl: Ttl
59  warnMs: number
60  compactAtTokens: number
61}
62
63export const isOn = (v: string | undefined) => v === '1' || v?.toLowerCase() === 'true'
64
65/** What the account is billed as, as far as the mod can tell. */
66export type Account = 'subscription' | 'credits' | 'other'
67
68export type TtlChoice = { ttl: Ttl; source: string }
69
70const asTtl = (v: unknown): Ttl | undefined => (v === '5m' || v === '1h' ? v : undefined)
71
72/**
73 * Which lifetime Claude Code asks for on the main conversation, in the order
74 * its documentation gives (https://code.claude.com/docs/en/prompt-caching,
75 * "Choose the TTL yourself"), after the mod's own `ttl` option:
76 *
77 *   FORCE_PROMPT_CACHING_5M, CLAUDE_CODE_PROMPT_CACHE_TTL, the promptCacheTtl
78 *   setting, ENABLE_PROMPT_CACHING_1H, then the default of the account: one
79 *   hour on a Claude subscription within its plan usage, five minutes on usage
80 *   credits, an API key or a cloud provider.
81 */
82export function decideTtl(option: unknown, env: CacheEnv, setting?: unknown, account?: Account): TtlChoice {
83  const pinned = asTtl(option)
84  if (pinned) return { ttl: pinned, source: 'the ttl option' }
85  if (isOn(env.force5m)) return { ttl: '5m', source: 'FORCE_PROMPT_CACHING_5M' }
86  const fromVar = asTtl(env.ttlVar)
87  if (fromVar) return { ttl: fromVar, source: 'CLAUDE_CODE_PROMPT_CACHE_TTL' }
88  const fromSetting = asTtl(setting)
89  if (fromSetting) return { ttl: fromSetting, source: 'the promptCacheTtl setting' }
90  if (isOn(env.enable1h)) return { ttl: '1h', source: 'ENABLE_PROMPT_CACHING_1H' }
91  if (account === 'subscription') return { ttl: '1h', source: 'Claude subscription default' }
92  if (account === 'credits') return { ttl: '5m', source: 'usage credits default' }
93  return { ttl: '5m', source: 'default' }
94}
95
96export const resolveTtl = (option: unknown, env: CacheEnv, setting?: unknown, account?: Account): Ttl =>
97  decideTtl(option, env, setting, account).ttl
98
99/**
100 * The account, from the rate-limit windows the last response reported: a
101 * five-hour or seven-day window means a Claude subscription, and one that is
102 * full means the next requests draw on usage credits. No window (an API key,
103 * a cloud provider, or no response yet) says nothing.
104 */
105export function accountOf(windows: readonly { kind: string; percentUsed: number }[]): Account {
106  const plan = windows.filter(w => w.kind === 'five_hour' || w.kind === 'seven_day')
107  if (plan.length === 0) return 'other'
108  return plan.some(w => w.percentUsed >= 100) ? 'credits' : 'subscription'
109}
110
111export function ttlMs(ttl: Ttl): number {
112  return ttl === '1h' ? 3_600_000 : 300_000
113}
114
115/** Caching switched off for this model by the environment. */
116export function isCachingDisabled(model: string, env: CacheEnv): boolean {
117  if (isOn(env.disableAll)) return true
118  const name = model.toLowerCase()
119  if (name.includes('haiku')) return isOn(env.disableHaiku)
120  if (name.includes('sonnet')) return isOn(env.disableSonnet)
121  if (name.includes('opus')) return isOn(env.disableOpus)
122  return false
123}
124
125export const promptTokens = (s: Sample) => s.read + s.write + s.fresh
126
127/** Share of the prompt the cache served, 0 to 1; 0 for an empty prompt. */
128export function hitRatio(s: Sample): number {
129  const total = promptTokens(s)
130  return total === 0 ? 0 : s.read / total
131}
132
133/** When the cache entry the sample touched lapses, ms since the epoch. */
134export const expiresAt = (s: Sample, ttl: Ttl) => s.startedAt + ttlMs(ttl)
135
136/** Zero for a request that read and wrote nothing: it created or refreshed no entry, so there is nothing to count down. */
137export function remainingMs(s: Sample, ttl: Ttl, now: number): number {
138  if (s.read + s.write === 0) return 0
139  return Math.max(0, expiresAt(s, ttl) - now)
140}
141
142/**
143 * Why a request that should have read the cache wrote it instead; undefined
144 * when it did not miss. A prompt that shrank is a /compact or /clear, not a
145 * miss, and the first request of a session has nothing to read.
146 */
147export function missReason(prev: Sample | undefined, cur: Sample, ttl: Ttl): string | undefined {
148  if (!prev) return undefined
149  const before = promptTokens(prev)
150  if (before === 0 || promptTokens(cur) < before * 0.7) return undefined
151  if (cur.read >= before * 0.5 || cur.write === 0) return undefined
152  if (cur.model !== prev.model) return `model changed (${prev.model} to ${cur.model})`
153  if (cur.startedAt - prev.startedAt > ttlMs(ttl)) return `the ${ttl} cache had lapsed`
154  return 'the prompt prefix changed (effort, tools, system prompt or CLAUDE.md)'
155}
156
157export function advise(last: Sample | undefined, prev: Sample | undefined, policy: Policy, now: number, disabled: boolean): Advice {
158  if (disabled) return { kind: 'off', text: 'prompt caching is off for this model (DISABLE_PROMPT_CACHING*)' }
159  if (!last) return { kind: 'cold', text: 'no request yet: the first one writes the cache' }
160  if (last.read + last.write === 0) {
161    return { kind: 'uncached', text: 'this request was not cached (prompt under the model minimum, or caching off)' }
162  }
163  const miss = missReason(prev, last, policy.ttl)
164  const left = remainingMs(last, policy.ttl, now)
165  const size = promptTokens(last)
166  if (left <= 0) {
167    const big = size >= policy.compactAtTokens
168    return {
169      kind: 'expired',
170      text: big
171        ? `expired: the next message rewrites ${fmtTokens(size)} tokens. /compact first, or /clear if the task is done`
172        : `expired: only ${fmtTokens(size)} tokens to rebuild, just keep going`,
173    }
174  }
175  if (left <= policy.warnMs) {
176    return { kind: 'soon', text: 'expires soon: any message refreshes it for free' }
177  }
178  if (miss) return { kind: 'miss', text: `cache missed: ${miss}` }
179  return { kind: 'warm', text: 'warm: keep going' }
180}
181
182export function fmtTokens(n: number): string {
183  if (n < 1000) return String(n)
184  if (n < 100_000) return `${(n / 1000).toFixed(1).replace(/\.0$/, '')}k`
185  if (n < 1_000_000) return `${Math.round(n / 1000)}k`
186  return `${(n / 1_000_000).toFixed(1).replace(/\.0$/, '')}M`
187}
188
189/** m:ss, or h:mm:ss from an hour up. */
190export function fmtClock(ms: number): string {
191  const total = Math.max(0, Math.ceil(ms / 1000))
192  const h = Math.floor(total / 3600)
193  const m = Math.floor((total % 3600) / 60)
194  const s = total % 60
195  const pad = (n: number) => String(n).padStart(2, '0')
196  return h > 0 ? `${h}:${pad(m)}:${pad(s)}` : `${m}:${pad(s)}`
197}
198
199export function bar(ratio: number, width: number): string {
200  const filled = Math.round(Math.min(1, Math.max(0, ratio)) * width)
201  return '█'.repeat(filled) + '░'.repeat(width - filled)
202}
203
204export type TurnRow = {
205  turnId: string
206  steps: number
207  read: number
208  write: number
209  fresh: number
210  output: number
211}
212
213/** Samples grouped by turn, oldest first, each turn's requests summed. */
214export function byTurn(samples: readonly Sample[]): TurnRow[] {
215  const rows: TurnRow[] = []
216  for (const s of samples) {
217    let row = rows[rows.length - 1]
218    if (!row || row.turnId !== s.turnId) {
219      row = { turnId: s.turnId, steps: 0, read: 0, write: 0, fresh: 0, output: 0 }
220      rows.push(row)
221    }
222    row.steps += 1
223    row.read += s.read
224    row.write += s.write
225    row.fresh += s.fresh
226    row.output += s.output
227  }
228  return rows
229}
230
231export const rowRatio = (r: TurnRow) => {
232  const total = r.read + r.write + r.fresh
233  return total === 0 ? 0 : r.read / total
234}
235
236export function fit(text: string, width: number): string {
237  return text.length <= width ? text : `${text.slice(0, Math.max(0, width - 1))}…`
238}
239
240export function positive(v: unknown, fallback: number): number {
241  return typeof v === 'number' && Number.isFinite(v) && v > 0 ? v : fallback
242}
243
244/** Share of the cache lifetime left, 0 to 1. */
245export function lifeRatio(leftMs: number, ttl: Ttl): number {
246  return Math.min(1, Math.max(0, leftMs / ttlMs(ttl)))
247}
248
249/**
250 * Widths of the three stacked-bar segments (read, wrote, new) over `width`
251 * cells: proportional, each non-empty part at least one cell, summing to width.
252 */
253export function segments(read: number, write: number, fresh: number, width: number): [number, number, number] {
254  const total = read + write + fresh
255  if (total === 0 || width <= 0) return [0, 0, 0]
256  const parts = [read, write, fresh]
257  const cells = parts.map(p => (p > 0 ? Math.max(1, Math.round((p / total) * width)) : 0))
258  let over = cells.reduce((a, b) => a + b, 0) - width
259  while (over !== 0) {
260    const i = over > 0 ? cells.indexOf(Math.max(...cells)) : parts.indexOf(Math.max(...parts))
261    cells[i] += over > 0 ? -1 : 1
262    over += over > 0 ? -1 : 1
263  }
264  return [cells[0], cells[1], cells[2]]
265}
266
267/** Seconds left at which a toast counts down after the one at the warning threshold. */
268export const COUNTDOWN_MARKS = [10, 3, 2, 1]
269
270/**
271 * The toast mark to fire now, or undefined. `level` is the mark last fired for
272 * this cache entry (Infinity before any); a late tick skips straight to the
273 * newest mark crossed, so a stalled clock never replays old ones.
274 */
275export function nextToastMark(secsLeft: number, warnSecs: number, level: number): number | undefined {
276  const marks = [warnSecs, ...COUNTDOWN_MARKS].filter(m => m <= warnSecs)
277  const due = marks.filter(m => secsLeft <= m && m < level)
278  return due.length ? Math.min(...due) : undefined
279}
280
281export type LifeColor = 'green' | 'yellow' | 'red'
282
283/** Countdown colour: green while there is plenty, yellow below 40% of the lifetime, red from the warning threshold down. */
284export function lifeColor(leftMs: number, ttl: Ttl, warnMs: number): LifeColor {
285  if (leftMs <= warnMs) return 'red'
286  return leftMs / ttlMs(ttl) <= 0.4 ? 'yellow' : 'green'
287}
288
289// requests are timed from their start, so a little slack keeps a hit that
290// landed just inside the lifetime from reading as proof of the longer one
291const SLACK_MS = 10_000
292
293/**
294 * What the traffic says about the cache lifetime, given the request before and
295 * `known`, what earlier requests already showed.
296 *
297 *   - a hit (the cache served at least half of the previous prompt) more than
298 *     5 minutes after the previous request began proves the 1-hour lifetime,
299 *     and nothing later undoes it: a miss afterwards is more likely a changed
300 *     prefix than a lapse
301 *   - a miss with the same model and a prompt that did not shrink, 5 minutes to
302 *     an hour after the previous request, says the entry lapsed: 5 minutes
303 *     (weaker: a changed prefix looks the same, so a later hit overrules it)
304 *
305 * Needed because the API names the TTL of a write (`cache_creation.ephemeral_*`)
306 * but Claude Code's mod API passes on only the four token counts.
307 */
308export function observeTtl(prev: Sample | undefined, cur: Sample, known: Ttl | undefined): Ttl | undefined {
309  if (!prev || prev.read + prev.write === 0 || cur.model !== prev.model) return known
310  const gap = cur.startedAt - prev.startedAt
311  const before = promptTokens(prev)
312  if (gap <= ttlMs('5m') + SLACK_MS) return known
313  if (cur.read >= before * 0.5) return '1h'
314  if (known === '1h') return known
315  const lapsed = cur.write > 0 && promptTokens(cur) >= before * 0.7 && gap < ttlMs('1h') + SLACK_MS
316  return lapsed ? '5m' : known
317}
318