@kecan0406/ttheme 1.2.1 → 1.2.3

package/dist/manifest.json

@@ -1,5 +1,5 @@
 {
-  "version": "1.2.1",
+  "version": "1.2.3",
   "gate": [
     {
       "rule": "foreground",

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@kecan0406/ttheme",
-  "version": "1.2.1",
+  "version": "1.2.3",
   "type": "module",
   "bin": {
     "ttheme": "bin/ttheme.js"
@@ -37,6 +37,7 @@
     "@material/material-color-utilities": "^0.4.0",
     "@types/bun": "^1.3.0",
     "@types/pngjs": "6.0.5",
+    "@xterm/headless": "6.0.0",
     "fast-string-width": "^3.0.2",
     "jpeg-js": "^0.4.4",
     "pngjs": "7.0.0",

package/shell/adapters/_bg.zsh

@@ -8,6 +8,8 @@ __tt_bg_saved() {
 
 __tt_bg_refresh() { : }
 
+__tt_bg_hide() { : }
+
 __tt_bg_lasting() { : }
 
 __tt_bg_frame() {
@@ -220,7 +222,7 @@ __tt_bg_write() {
     rm -f -- $dir/${bgtunef[$1]}
   else
     shape=$size
-    [[ $size == <20-100> && $pos != center ]] && ! __tt_bg_aligns && shape=window
+    [[ $size == <20-100> ]] && { [[ $pos != center ]] || __tt_bg_covers } && ! __tt_bg_aligns && shape=window
     case $shape in
       fill) img=${bgfill[$1]} fit=cover ;;
       100) img=$src ;;
@@ -320,6 +322,12 @@ __tt_pv_bg_show() {
   __tt_bg_at $id -1073741826 $(( at[1] - 1 )) $(( at[2] - 1 )) $at[3] $at[4] $at[5] $at[6] $at[7] $at[8]
 }
 
+__tt_bg_transmit() {
+  local REPLY
+  __tt_b64s "$2"
+  printf '\e_Ga=t,t=f,f=100,i=%d,q=2;%s\e\\' $1 "$REPLY"
+}
+
 __tt_bg_send() {
   local -i cost=0
   if [[ -n ${bgsent[$1]} ]]; then
@@ -329,8 +337,7 @@ __tt_bg_send() {
     bgsent[$1]=$(( ++bgnext + 2 )) bgcost[$1]=$cost
     (( bgbytes += cost ))
     bgorder+=("$1")
-    __tt_b64s "$1"
-    printf '\e_Ga=t,t=f,f=100,i=%d,q=2;%s\e\\' ${bgsent[$1]} "$REPLY"
+    __tt_bg_transmit ${bgsent[$1]} "$1"
     while (( ${#bgorder} > 1 && bgbytes > 134217728 )); do
       printf '\e_Ga=d,d=I,i=%d,q=2\e\\' ${bgsent[$bgorder[1]]}
       (( bgbytes -= bgcost[$bgorder[1]] ))
@@ -449,6 +456,7 @@ __tt_pv_bg_find() {
   [[ $applied == "$painted" ]] || { __tt_apply "$applied" && painted=$applied }
   __tt_pv_bg_commit $name
   __tt_pv_bg_close
+  __tt_bg_hide $name
   err=$(__tt_cli find $name 2>&1 >/dev/tty)
   rc=$?
   for var in ${(k)parameters[(I)TTHEME_FIND_*]}; do

package/shell/adapters/_osc.zsh

@@ -63,6 +63,12 @@ __tt_unpainted() { : }
 
 __tt_follows_focus() { return 1 }
 
+__tt_takes_default() { return 0 }
+
+__tt_follows_prompt() { return 1 }
+
+__tt_prompted() { : }
+
 __tt_pv_bg_open() { : }
 
 __tt_pv_bg_show() { : }

package/shell/adapters/_wired.zsh

@@ -52,4 +52,8 @@ __tt_pictured_ghostty() {
 
 __tt_pictured_iterm2() { __tt_cli image $1 tuned }
 
-__tt_bg_aligns() { (( ! ${TTHEME_TERMINALS[(Ie)iterm2]} )) }
+__tt_pictured_warp() { (( ${TTHEME_TERMINALS[(Ie)iterm2]} )) || __tt_cli image $1 tuned }
+
+__tt_bg_aligns() { (( ! ${TTHEME_TERMINALS[(Ie)iterm2]} && ! ${TTHEME_TERMINALS[(Ie)warp]} )) }
+
+__tt_bg_covers() { (( ${TTHEME_TERMINALS[(Ie)warp]} )) }

package/shell/adapters/alacritty.zsh

@@ -1 +1,3 @@
 __tt_keepable() { (( ${TTHEME_TERMINALS[(Ie)alacritty]} )) }
+
+__tt_follows_focus() { return 0 }

package/shell/adapters/iterm2.zsh

@@ -1,17 +1,35 @@
 source $TTHEME_HOME/adapters/_bg.zsh
 
 if (( ! ${+TTHEME_ITERM_SHOWN} )); then
-  typeset -gx TTHEME_ITERM_SHOWN=""
+  typeset -gx TTHEME_ITERM_SHOWN="" TTHEME_ITERM_DYED=0
   [[ $ITERM_PROFILE == 'ttheme · '* ]] && TTHEME_ITERM_SHOWN=${ITERM_PROFILE#ttheme · }
 fi
 
 __tt_keepable() { return 0 }
 
+__tt_follows_focus() { return 0 }
+
+__tt_takes_default() {
+  local REPLY was=$TTHEME_ITERM_SHOWN
+  (( ! TTHEME_ITERM_DYED )) || return 1
+  (( TTHEME_TMUX )) && was=$(tmux show -qv @ttheme_shown 2>/dev/null)
+  [[ $was == default ]] && return 0
+  [[ -z $was ]] && __tt_hear && [[ $REPLY == ${TTHEME_PALETTE[$TTHEME_STARTUP]%% *} ]] || return 1
+  TTHEME_ITERM_SHOWN=default
+  (( TTHEME_TMUX )) && tmux set -q @ttheme_shown default 2>/dev/null
+  return 0
+}
+
+__tt_worn() { [[ -z $1 ]] || TTHEME_ITERM_DYED=1 }
+
 __tt_pv_paint() {
   local -a p=(${=1})
   if (( ${#p} < 20 )); then
     __tt_out $'\e]110\e\\\e]111\e\\'
-  elif [[ $p[1] == - ]]; then
+    return 0
+  fi
+  TTHEME_ITERM_DYED=1
+  if [[ $p[1] == - ]]; then
     __tt_out $'\e]111\e\\\e]10;'$p[2]$'\e\\'
   else
     __tt_out $'\e]11;'$p[1]$'\e\\\e]10;'$p[2]$'\e\\'
@@ -34,7 +52,7 @@ __tt_shown() {
   [[ -r $dir/${${1/@/--}/\//--}.conf || ( -n $was && -r $dir/${${was/@/--}/\//--}.conf ) ]] || (( TTHEME_MUXED )) || return 1
   (( ${TTHEME_ORDER[(Ie)$1]} )) || return 1
   __tt_out $'\e]1337;SetProfile=ttheme · '$1$'\a'
-  TTHEME_ITERM_SHOWN=$1
+  TTHEME_ITERM_SHOWN=$1 TTHEME_ITERM_DYED=0
   (( TTHEME_TMUX )) && tmux set -q @ttheme_shown $1 2>/dev/null
   return 1
 }
@@ -44,7 +62,7 @@ __tt_unshown() {
   (( TTHEME_TMUX )) && was=$(tmux show -qv @ttheme_shown 2>/dev/null)
   [[ $1 != force && $was == "$want" ]] && return 0
   __tt_out $'\e]1337;SetProfile=\a'
-  TTHEME_ITERM_SHOWN=$want
+  TTHEME_ITERM_SHOWN=$want TTHEME_ITERM_DYED=0
   (( TTHEME_TMUX )) && tmux set -q @ttheme_shown "$want" 2>/dev/null
   return 0
 }

package/shell/adapters/konsole.zsh

@@ -6,6 +6,10 @@ __tt_unpainted() {
 
 __tt_keepable() { __tt_paints }
 
+__tt_takes_default() { __tt_osc_reset }
+
+__tt_follows_focus() { return 0 }
+
 __tt_scheme() {
   local -a p=(${=TTHEME_PALETTE[$1]})
   REPLY="ColorScheme=ttheme-${${1/@/--}/\//--};UseCustomCursorColor=true;customCursorColor=$p[3]"

package/shell/adapters/terminal-app.zsh

@@ -21,6 +21,8 @@ __tt_hear() {
 
 __tt_heard() { TTHEME_TERMINAL_BASE=$1 }
 
+__tt_takes_default() { return 1 }
+
 __tt_osc_reset() {
   [[ -n $TTHEME_TERMINAL_BASE ]] && __tt_osc_apply "$TTHEME_TERMINAL_BASE"
   unset TTHEME_PAINTED

package/shell/adapters/warp.zsh

@@ -1,5 +1,491 @@
-__tt_paints() { return 1 }
+source $TTHEME_HOME/adapters/_bg.zsh
+
+typeset -g TTHEME_WARP_SETTINGS=$HOME/.warp/settings.toml TTHEME_WARP_THEMES=$HOME/.warp/themes TTHEME_WARP_WORN=""
+typeset -g TTHEME_WARP_TABS=$TTHEME_STATE_DIR/warp TTHEME_WARP_DB="" TTHEME_WARP_ID="" TTHEME_WARP_LAST="" TTHEME_WARP_SEEN=""
+typeset -g TTHEME_WARP_SHOWING="" TTHEME_WARP_VIEW=""
+typeset -gi TTHEME_WARP_VIEWS=0 TTHEME_WARP_BUSY=0 TTHEME_WARP_FOLLOWS=-1 TTHEME_WARP_TICK=0
+typeset -ga TTHEME_WARP_LAID=()
+typeset -g TTHEME_WARP_SQL='with t as (select id, window_id, row_number() over (partition by window_id order by id) - 1 as ix from tabs) select lower(hex(p.uuid)) from app a join windows w on w.id = a.active_window_id join t on t.window_id = w.id and t.ix = w.active_tab_index join pane_nodes n on n.tab_id = t.id and n.is_leaf join pane_leaves l on l.pane_node_id = n.id and l.is_focused join terminal_panes p on p.id = n.id'
+if [[ $OSTYPE != darwin* ]]; then
+  TTHEME_WARP_SETTINGS=${XDG_CONFIG_HOME:-$HOME/.config}/warp-terminal/settings.toml
+  TTHEME_WARP_THEMES=${XDG_DATA_HOME:-$HOME/.local/share}/warp-terminal/themes
+fi
+
+zmodload -F zsh/files b:zf_rm b:zf_mkdir 2>/dev/null
+zmodload -F zsh/zselect b:zselect 2>/dev/null
+zmodload -F zsh/datetime p:EPOCHREALTIME 2>/dev/null
+
+__tt_paints() { __tt_warp_wired }
+
+__tt_warp_wired() { (( ${TTHEME_TERMINALS[(Ie)warp]} )) && [[ -r $TTHEME_WARP_SETTINGS ]] }
 
 __tt_unpainted() {
-  print -u2 "ttheme: Warp wears one theme app-wide and paints no tab background of its own — \`ttheme default <palette>\` puts one on every Warp window"
+  print -u2 "ttheme: Warp takes a palette only through the settings.toml init wires — wire it with \`npx @kecan0406/ttheme@latest init\`"
+}
+
+__tt_keepable() { return 0 }
+
+__tt_follows_prompt() { return 0 }
+
+__tt_prompted() {
+  emulate -L zsh ${=${options[xtrace]:#off}:+-o xtrace}
+  __tt_warp_publish
+  __tt_warp_follow
+  __tt_warp_follows || __tt_sync
+}
+
+__tt_hear() {
+  if [[ -n $TTHEME_PAINTED ]] && __tt_warp_wearing && [[ -n ${TTHEME_PALETTE[$REPLY]} ]]; then
+    REPLY=${TTHEME_PALETTE[$REPLY]%% *}
+  elif [[ -n $TTHEME_STARTUP && -n ${TTHEME_PALETTE[$TTHEME_STARTUP]} ]]; then
+    REPLY=${TTHEME_PALETTE[$TTHEME_STARTUP]%% *}
+  else
+    REPLY=""
+    return 1
+  fi
+}
+
+__tt_warp_value() {
+  setopt localoptions extendedglob
+  local file=ttheme-${${1/@/--}/\//--}
+  local -a pics=($TTHEME_WARP_THEMES/$file.[0-9a-f](#c8).yaml(Nom))
+  (( ${#pics} )) && file=${pics[1]:t:r}
+  REPLY="{ custom = { name = \"$1\", path = \"$file.yaml\" } }"
+}
+
+__tt_warp_read() {
+  setopt localoptions extendedglob
+  local f=$TTHEME_WARP_SETTINGS line
+  local -a at=(0 0)
+  integer i s=0
+  reply=() REPLY="" TTHEME_WARP_WORN=""
+  [[ -r $f ]] || return 1
+  reply=("${(@f)$(<$f)}")
+  for (( i = 1; i <= $#reply; i++ )); do
+    line=${reply[i]}
+    if (( s )); then
+      [[ $line == [[:space:]]#\[* ]] && break
+      [[ $line == theme[[:space:]]#=* ]] && { at=($s $i); break }
+    elif [[ $line == [[:space:]]#'[appearance.themes]'[[:space:]]# ]]; then
+      s=$i at=($s 0)
+    fi
+  done
+  TTHEME_WARP_LINES=($at)
+  (( at[2] )) && REPLY=${${reply[at[2]]#theme}##[[:space:]]#=[[:space:]]#}
+  [[ $REPLY == '{ custom = { name = "'*'", path = "ttheme-'* ]] && TTHEME_WARP_WORN=${${REPLY#*name = \"}%%\"*}
+  return 0
+}
+
+__tt_warp_set() {
+  local REPLY
+  local -a at reply TTHEME_WARP_LINES
+  __tt_warp_read || return 1
+  [[ $REPLY == "$1" ]] && return 0
+  if [[ $1 == *'path = "ttheme-'* && -z $TTHEME_WARP_WORN && ! -e $TTHEME_HOME/warp.base ]]; then
+    __tt_put $TTHEME_HOME/warp.base "$REPLY" || return 1
+  fi
+  [[ -e $TTHEME_WARP_SETTINGS.ttheme.bak ]] || __tt_put $TTHEME_WARP_SETTINGS.ttheme.bak "${reply[@]}"
+  at=($TTHEME_WARP_LINES)
+  if (( at[2] )); then
+    reply[at[2]]="theme = $1"
+  elif (( at[1] )); then
+    reply[at[1]]=("${reply[at[1]]}" "theme = $1")
+  else
+    reply+=("" "[appearance.themes]" "theme = $1")
+  fi
+  __tt_put $TTHEME_WARP_SETTINGS "${reply[@]}"
+}
+
+__tt_warp_wearing() {
+  local -a reply TTHEME_WARP_LINES
+  __tt_warp_read || return 1
+  REPLY=$TTHEME_WARP_WORN
+  [[ -n $REPLY ]]
+}
+
+__tt_warp_want() {
+  local pal=$1 view=$2 base=$TTHEME_HOME/warp.base
+  if [[ -n $pal && -n ${TTHEME_PALETTE[$pal]} ]]; then
+    if [[ -n $view && -r $TTHEME_WARP_THEMES/$view ]]; then
+      REPLY="{ custom = { name = \"$pal\", path = \"$view\" } }"
+    else
+      __tt_warp_value $pal
+    fi
+  elif [[ -n $TTHEME_STARTUP && -n ${TTHEME_PALETTE[$TTHEME_STARTUP]} ]]; then
+    __tt_warp_value $TTHEME_STARTUP
+  elif [[ -e $base ]]; then
+    REPLY=$(<$base)
+    [[ -n $REPLY ]] || REPLY='"dark"'
+  else
+    __tt_warp_wearing || return 1
+    REPLY='"dark"'
+  fi
+  return 0
+}
+
+__tt_warp_wear() {
+  local value=$1
+  local -a at
+  integer wait
+  if [[ $value == *'path = "ttheme-'* ]]; then
+    zstat -F %s.%N -A at +mtime -- $TTHEME_WARP_THEMES/${${value#*path = \"}%%\"*} 2>/dev/null || return 1
+    wait=$(( (0.26 - (EPOCHREALTIME - at[1])) * 100 ))
+    (( wait > 0 )) && zselect -t $wait
+  fi
+  __tt_warp_set "$value" || return 1
+  [[ $value == *'path = "ttheme-'* ]] || zf_rm -f -- $TTHEME_HOME/warp.base 2>/dev/null
+  return 0
+}
+
+__tt_warp_here() {
+  local fd f=$TTHEME_WARP_TABS/.active
+  [[ -r $f && -e $TTHEME_WARP_TABS/.follow && -n $WARP_TERMINAL_SESSION_UUID ]] || return 0
+  [[ "$(<$f)" == "$WARP_TERMINAL_SESSION_UUID" ]] && return 0
+  zsystem flock -t 0 -f fd $TTHEME_WARP_TABS/.follow 2>/dev/null || return 1
+  zsystem flock -u $fd
+  return 0
+}
+
+__tt_warp_publish() {
+  local id=$WARP_TERMINAL_SESSION_UUID f pal=$1 line REPLY
+  [[ ${#id} == 32 && -e $TTHEME_HOME ]] || return 0
+  if (( ! $# )); then
+    __tt_warp_tab
+    pal=$REPLY
+  fi
+  f=$TTHEME_WARP_TABS/$id line="$$ ${TTHEME_STARTUP:--} ${pal:--} ${2:--}"
+  [[ -r $f && "$(<$f)" == "$line" ]] && return 0
+  [[ -d $TTHEME_WARP_TABS ]] || zf_mkdir -p $TTHEME_WARP_TABS 2>/dev/null || return 0
+  __tt_put $f "$line" 2>/dev/null
+}
+
+__tt_warp_db() {
+  setopt localoptions extendedglob
+  local -a db
+  [[ -n $TTHEME_WARP_DB ]] && return 0
+  if [[ $OSTYPE == darwin* ]]; then
+    db=($HOME/Library/Group\ Containers/*.dev.warp/Library/Application\ Support/dev.warp.Warp-Stable/warp.sqlite(N) $HOME/Library/Application\ Support/dev.warp.Warp-Stable/warp.sqlite(N))
+  else
+    db=(${XDG_STATE_HOME:-$HOME/.local/state}/warp-terminal/warp.sqlite(N))
+  fi
+  TTHEME_WARP_DB=${db[1]}
+  [[ -n $TTHEME_WARP_DB ]]
+}
+
+__tt_warp_follows() {
+  setopt localoptions extendedglob
+  (( TTHEME_WARP_FOLLOWS < 0 )) || return $(( ! TTHEME_WARP_FOLLOWS ))
+  TTHEME_WARP_FOLLOWS=0
+  [[ -o interactive && $WARP_TERMINAL_SESSION_UUID == [0-9a-f](#c32) ]] && (( $+commands[sqlite3] )) && __tt_warp_db || return 1
+  TTHEME_WARP_FOLLOWS=1
+}
+
+__tt_warp_follow() {
+  local fd lock=$TTHEME_WARP_TABS/.follow
+  __tt_warp_follows || return 0
+  if [[ ! -e $lock ]]; then
+    [[ -d $TTHEME_WARP_TABS ]] || zf_mkdir -p $TTHEME_WARP_TABS 2>/dev/null || return 0
+    : >>| $lock 2>/dev/null || return 0
+  fi
+  zsystem flock -t 0 -f fd $lock 2>/dev/null || return 0
+  zsystem flock -u $fd
+  zsh -fc 'source $1; __tt_warp_follower' zsh $TTHEME_HOME/ttheme.zsh </dev/null >/dev/null 2>&1 &!
+}
+
+__tt_warp_active() {
+  setopt localoptions extendedglob
+  REPLY=$(sqlite3 -readonly -cmd '.timeout 300' $TTHEME_WARP_DB $TTHEME_WARP_SQL 2>/dev/null)
+  [[ $REPLY == [0-9a-f](#c32) ]]
+}
+
+__tt_warp_line() {
+  local pal=${3#-} view=${4#-}
+  [[ $2 != - && -z $TTHEME_STARTUP ]] && pal="" view=""
+  __tt_warp_want "$pal" "$view"
+}
+
+__tt_warp_tick() {
+  local line="" REPLY
+  local -a at
+  if zstat -F %s.%N -A at +mtime -- $TTHEME_WARP_DB-wal 2>/dev/null || zstat -F %s.%N -A at +mtime -- $TTHEME_WARP_DB 2>/dev/null; then
+    if [[ $at[1] != "$TTHEME_WARP_SEEN" ]]; then
+      TTHEME_WARP_SEEN=$at[1]
+      if __tt_warp_active && [[ $REPLY != "$TTHEME_WARP_ID" ]]; then
+        TTHEME_WARP_ID=$REPLY
+        __tt_put $TTHEME_WARP_TABS/.active $REPLY 2>/dev/null
+      fi
+    fi
+  fi
+  zstat -F %s.%N -A at +mtime -- $TTHEME_HOME/palettes.zsh 2>/dev/null && [[ $at[1] != "$TTHEME_PALETTES_AT" ]] && __tt_palettes_load
+  [[ -n $TTHEME_WARP_ID && -r $TTHEME_WARP_TABS/$TTHEME_WARP_ID ]] && line=$(<$TTHEME_WARP_TABS/$TTHEME_WARP_ID)
+  [[ "$TTHEME_WARP_ID $line $TTHEME_PALETTES_AT" == "$TTHEME_WARP_LAST" ]] && return 0
+  TTHEME_WARP_LAST="$TTHEME_WARP_ID $line $TTHEME_PALETTES_AT"
+  [[ -n $line ]] && __tt_warp_line ${=line} && __tt_warp_wear "$REPLY"
+  return 0
+}
+
+__tt_warp_live() {
+  setopt localoptions extendedglob
+  local f pid
+  integer live=0
+  for f in $TTHEME_WARP_TABS/[0-9a-f](#c32)(N); do
+    pid=${"$(<$f)"%% *}
+    if [[ $pid == <-> ]] && kill -0 $pid 2>/dev/null; then
+      live=1
+    else
+      zf_rm -f -- $f 2>/dev/null
+    fi
+  done
+  (( live ))
+}
+
+__tt_warp_follower() {
+  emulate -L zsh
+  local fd
+  __tt_warp_db && zsystem flock -t 0 -f fd $TTHEME_WARP_TABS/.follow 2>/dev/null || return 0
+  trap '' HUP
+  while [[ -e $TTHEME_HOME/palettes.zsh && -e $TTHEME_WARP_DB ]]; do
+    __tt_warp_tick
+    (( ++TTHEME_WARP_TICK % 50 )) || __tt_warp_live || break
+    zselect -t 10
+  done
+  zf_rm -f -- $TTHEME_WARP_TABS/.active 2>/dev/null
+}
+
+__tt_apply() {
+  local REPLY pal
+  __tt_name_of "$1"
+  pal=$REPLY
+  [[ -n ${TTHEME_PALETTE[$pal]} ]] || return 1
+  TTHEME_WARP_VIEW=""
+  __tt_warp_publish $pal
+  __tt_warp_here && __tt_warp_want $pal && __tt_warp_wear "$REPLY"
+  export TTHEME_PAINTED=1
+  return 0
+}
+
+__tt_osc_reset() {
+  local REPLY
+  TTHEME_WARP_VIEW=""
+  __tt_warp_publish ""
+  __tt_warp_here && __tt_warp_want "" && __tt_warp_wear "$REPLY"
+  unset TTHEME_PAINTED
+  return 0
+}
+
+__tt_warp_tab() {
+  REPLY=""
+  [[ -n $TTHEME_PAINTED && -n $TTHEME_SPEC ]] || return 0
+  __tt_name_of "$TTHEME_SPEC"
+  [[ -n ${TTHEME_PALETTE[$REPLY]} ]] || REPLY=""
+}
+
+__tt_shown() {
+  local REPLY pal
+  __tt_warp_tab
+  pal=$REPLY
+  __tt_warp_publish "$pal"
+  if [[ $2 == force ]] || ! __tt_warp_follows; then
+    __tt_warp_here && __tt_warp_want "$pal" && __tt_warp_wear "$REPLY"
+  fi
+  return 1
+}
+
+__tt_reloaded() {
+  __tt_paints && __tt_shown "" force
+  return 0
+}
+
+__tt_bg_shown() { __tt_warp_wearing }
+
+__tt_bg_refresh() { __tt_warp_unview }
+
+__tt_bg_bake() {
+  local place
+  printf -v place '%dx%d%+d%+d' $5 $6 $7 $8
+  __tt_cli bake "$1" "$2" "${3}x$4" "$place" >/dev/null 2>&1
+}
+
+__tt_bg_hide() {
+  __tt_warp_set "{ custom = { name = \"$1\", path = \"ttheme-${${1/@/--}/\//--}.yaml\" } }"
+  TTHEME_WARP_VIEW=""
+}
+
+__tt_bg_cells() {
+  local REPLY resp
+  local -a px cells
+  __tt_ask $'\e[14t\e[18t' || return 0
+  resp=$REPLY
+  [[ $resp == *'[4;'<1->';'<1->t* && $resp == *'[8;'<1->';'<1->t* ]] || return 0
+  px=(${(s:;:)${${resp##*\[4;}%%t*}}) cells=(${(s:;:)${${resp##*\[8;}%%t*}})
+  bgch=$(( 2 * px[1] / cells[1] )) bgcw=$(( 2 * px[2] / cells[2] ))
+}
+
+__tt_bg_transmit() {
+  local data
+  integer at=1 n
+  data=${"$(base64 < $2 2>/dev/null)"//$'\n'/}
+  n=${#data}
+  (( n )) || return 0
+  printf '\e_Ga=t,f=100,i=%d,m=%d,q=2;%s\e\\' $1 $(( n > 4096 )) "${data[1,4096]}"
+  for (( at = 4097; at <= n; at += 4096 )); do
+    printf '\e_Gm=%d,q=2;%s\e\\' $(( at + 4096 <= n )) "${data[at,at+4095]}"
+  done
+}
+
+__tt_bg_crop() {
+  __tt_bg_send $1
+  REPLY="$REPLY $4"
+}
+
+__tt_warp_tuned() {
+  [[ $1 == *:* ]] && return 0
+  __tt_bg_load $1
+  [[ "${bgsize[$1]} ${bgpos[$1]} ${bgop[$1]} ${bgoff[$1]}" != "${bgload[$1]}" ]]
+}
+
+__tt_warp_loading() {
+  msg="Loading the background" msgt=100
+  printf '\e[?2026h'
+  __tt_pv_draw
+}
+
+__tt_warp_saved() {
+  local name=$1
+  if [[ "${bgsize[$name]} ${bgpos[$name]} ${bgop[$name]}" == "${bgdef[$name]}" ]]; then
+    REPLY=${bgbase[$name]}
+  elif [[ ${bgsize[$name]} == fill ]]; then
+    REPLY=${bgfill[$name]}
+  elif [[ "${bgsize[$name]} ${bgpos[$name]}" == "${bgshotkey[$name]}" && -r ${bgshot[$name]} ]]; then
+    REPLY=${bgshot[$name]}
+  else
+    REPLY=${bgsrc[$name]%.png}@${bgsize[$name]}-${TTHEME_BG_POSITIONS[${bgpos[$name]}]}-${2}x$3.png
+  fi
+}
+
+__tt_warp_laid() {
+  setopt localoptions nomultibyte
+  local s=$2$'\n'${(L)${TTHEME_PALETTE[$1]}%% *} c
+  local -i h=16#811c9dc5 i n
+  for (( i = 1; i <= $#s; i++ )); do
+    c=${s[i]}
+    n=$(( #c ))
+    (( n < 0 )) && (( n += 256 ))
+    (( h = ((h ^ n) * 16777619) & 16#ffffffff ))
+  done
+  printf -v REPLY '%s/ttheme-%s.%08x.png' $TTHEME_WARP_THEMES ${${1/@/--}/\//--} $h
+}
+
+__tt_warp_view() {
+  local name=$1 pal=${1%:*} img="" out="" canvas="" place="" base theme line at REPLY
+  local -a wh fr lines
+  local -i W=$(( pw * bgcw )) H=$(( ph * bgch )) op wait
+  __tt_bg_load $name
+  op=$(( ${bgop[$name]} * 100 + 0.5 ))
+  base=$TTHEME_WARP_THEMES/ttheme-${${pal/@/--}/\//--}.yaml
+  [[ -r $base ]] || return 1
+  if (( ! bgoff[$name] )); then
+    __tt_warp_saved $name $W $H
+    img=$REPLY
+    __tt_warp_laid $pal $img
+    out=$REPLY
+    if [[ ! -r $img ]]; then
+      img=${bgsrc[$name]}
+      __tt_bg_dim "$img" && (( W && H )) || return 1
+      wh=(${=bgdim[$img]})
+      __tt_bg_frame $wh[1] $wh[2] $W $H ${bgsize[$name]} ${bgpos[$name]} contain ${bgfocus[$name]}
+      fr=(${=REPLY})
+      canvas=${W}x$H
+      printf -v place '%dx%d%+d%+d' $fr
+    fi
+  fi
+  [[ "$pal $out $op" == "$TTHEME_WARP_VIEW" ]] && return 0
+  __tt_warp_loading
+  for line in "${(@f)$(<$base)}"; do
+    lines+=("$line")
+    [[ -n $out && $line == details:* ]] && lines+=("background_image:" "  path: \"$out\"" "  opacity: $op")
+  done
+  theme=ttheme-${${pal/@/--}/\//--}.view-$(( ++TTHEME_WARP_VIEWS )).yaml
+  __tt_put $TTHEME_WARP_THEMES/$theme "${lines[@]}" || return 1
+  at=$EPOCHREALTIME
+  if [[ -n $out && ! -r $out ]]; then
+    if ! __tt_cli flatten "$img" "$out" "${${TTHEME_PALETTE[$pal]}%% *}" 1 $canvas $place >/dev/null 2>&1; then
+      zf_rm -f -- $TTHEME_WARP_THEMES/$theme 2>/dev/null
+      return 1
+    fi
+    TTHEME_WARP_LAID+=($out)
+  fi
+  wait=$(( 25 - (EPOCHREALTIME - at) * 100 ))
+  (( wait > 0 )) && zselect -t $wait
+  __tt_warp_set "{ custom = { name = \"$pal\", path = \"$theme\" } }" || return 1
+  [[ -z $TTHEME_WARP_SHOWING ]] || zf_rm -f -- $TTHEME_WARP_THEMES/$TTHEME_WARP_SHOWING 2>/dev/null
+  TTHEME_WARP_SHOWING=$theme TTHEME_WARP_VIEW="$pal $out $op"
+  __tt_warp_publish $pal $theme
+}
+
+__tt_warp_unview() {
+  [[ -n $TTHEME_WARP_SHOWING ]] || return 0
+  local spec=$1
+  [[ -n $spec ]] && __tt_apply "$spec"
+  zf_rm -f -- $TTHEME_WARP_THEMES/$TTHEME_WARP_SHOWING 2>/dev/null
+  TTHEME_WARP_SHOWING="" TTHEME_WARP_VIEW=""
+}
+
+__tt_pv_bg_show() {
+  (( bgcw && ! TTHEME_WARP_BUSY )) || return 0
+  local spec=${TTHEME_PALETTE[${1%:*}]} REPLY
+  local -i tuned=0
+  __tt_warp_tuned $1 && tuned=1
+  if (( tuned )) || [[ $spec == "$applied" && -n $TTHEME_WARP_SHOWING ]]; then
+    if zselect -t 15 -r 0 2>/dev/null; then
+      bgname=""
+      return 0
+    fi
+  fi
+  bgname=$1
+  TTHEME_WARP_BUSY=1
+  if (( tuned )); then
+    __tt_warp_view $1 && applied=$spec painted=$spec
+  elif [[ $spec == "$applied" ]]; then
+    if [[ -n $TTHEME_WARP_SHOWING ]]; then
+      __tt_warp_loading
+      __tt_warp_unview "$applied"
+    elif __tt_warp_wearing && [[ $REPLY == "${1%:*}" ]]; then
+      local want
+      local -a reply TTHEME_WARP_LINES
+      __tt_warp_value ${1%:*}
+      want=$REPLY
+      __tt_warp_read
+      if [[ $REPLY != "$want" ]]; then
+        __tt_warp_loading
+        zselect -t 25
+        __tt_warp_set "$want"
+      fi
+    fi
+  fi
+  [[ $msg == "Loading the background" ]] && msg="" msgt=0
+  TTHEME_WARP_BUSY=0
+  return 0
+}
+
+__tt_pv_bg_close() {
+  (( bgcw )) && { printf '\e_Ga=d,d=A,q=2\e\\'; __tt_bg_forget }
+  (( ${+bgedit[$bgname]} )) || [[ -n $bgname && ${bgview[${bgname%:*}]} == "$bgname" ]] || __tt_warp_unview "$applied"
+  [[ -z $bgcut ]] || { ( zselect -t 1000; rm -rf -- $bgcut ) &!; bgcut="" }
+  (( ${#TTHEME_WARP_LAID} )) || return 0
+  local -a laid=($TTHEME_WARP_LAID)
+  TTHEME_WARP_LAID=()
+  ( zselect -t 1000; __tt_warp_sweep $laid ) &!
+}
+
+__tt_warp_sweep() {
+  setopt localoptions extendedglob
+  local f
+  local -A used
+  for f in $TTHEME_WARP_THEMES/ttheme-*.yaml(N); do
+    [[ "$(<$f)" == (#b)*$'\n  path: "'([^\"]##)'"'* ]] && used[$match[1]]=1
+  done
+  for f; do
+    (( ${+used[$f]} )) || zf_rm -f -- $f 2>/dev/null
+  done
 }

package/shell/adapters/wezterm.zsh

@@ -4,6 +4,8 @@ typeset -g TTHEME_WEZTERM_SHOWN="" TTHEME_WEZTERM_VIEW=""
 
 __tt_keepable() { (( ${TTHEME_TERMINALS[(Ie)wezterm]} )) }
 
+__tt_follows_focus() { return 0 }
+
 __tt_wezterm_var() {
   local REPLY
   __tt_b64s "$2"