nandi/frq · ac59bf2

modified android/build-jolt-boot.sh +6 -1 Viewed

@@ -9,7 +9,12 @@ VIDYA="${VIDYA:-$(cd "$ROOT/../vidya" && pwd)}"
9	9	# has to be named here.
10	10	GLIMMER="${GLIMMER:-$HOME/.jolt/gitlibs/https___github.com_jolt-lang_glimmer/5581c331c51aff989259b9e8e92ec920fe5e6741/src}"
11	11	OUT="${1:?usage: build-jolt-boot.sh OUTPUT_DIRECTORY}"
12		-JOLT="${JOLT:-$(command -v jolt)}"
	12	+# The DotSlash-pinned jolt beside this script, not whatever is on PATH: an
	13	+# upstream jolt cannot open a TLS connection on Android — it reads the socket
	14	+# address out of `struct addrinfo` at glibc's offset, which is Bionic's
	15	+# `ai_canonname` — so a build made with one produces an APK that cannot sign in
	16	+# or send a picture. Override with JOLT= to use another.
	17	+JOLT="${JOLT:-$ROOT/scripts/jolt}"
13	18	MODULE="${MODULE:-frq.app}"
14	19	CHEZ_ANDROID="${CHEZ_ANDROID:-$HOME/.cache/vidya-chez-android}"
15	20	HOST_SCHEME="$CHEZ_ANDROID/ta6le/bin/ta6le/scheme"

  # has to be named here.
  GLIMMER="${GLIMMER:-$HOME/.jolt/gitlibs/https___github.com_jolt-lang_glimmer/5581c331c51aff989259b9e8e92ec920fe5e6741/src}"
  OUT="${1:?usage: build-jolt-boot.sh OUTPUT_DIRECTORY}"
--JOLT="${JOLT:-$(command -v jolt)}"
++# The DotSlash-pinned jolt beside this script, not whatever is on PATH: an
++# upstream jolt cannot open a TLS connection on Android — it reads the socket
++# address out of `struct addrinfo` at glibc's offset, which is Bionic's
++# `ai_canonname` — so a build made with one produces an APK that cannot sign in
++# or send a picture. Override with JOLT= to use another.
++JOLT="${JOLT:-$ROOT/scripts/jolt}"
  MODULE="${MODULE:-frq.app}"
  CHEZ_ANDROID="${CHEZ_ANDROID:-$HOME/.cache/vidya-chez-android}"
  HOST_SCHEME="$CHEZ_ANDROID/ta6le/bin/ta6le/scheme"

added scripts/jolt +28 -0 Viewed

new file mode 100755
@@ -0,0 +1,28 @@
	1	+#!/usr/bin/env dotslash
	2	+
	3	+// jolt with the Bionic `struct addrinfo` fix, from the fork at
	4	+// gitlab.com/nandithebull/jolt (commit 2b80d68d). Upstream's own release reads
	5	+// `ai_addr` at glibc's offset, which on Android is `ai_canonname` — a null
	6	+// pointer — so every TLS connect fails there and reports a refusal the network
	7	+// never made. Nothing else differs from v0.7.28.
	8	+//
	9	+// Linux x86_64 only: it is what the APK is built on. Other platforms fall back
	10	+// to whatever `jolt` is on PATH, which is upstream's, which is fine for
	11	+// everything but an Android build.
	12	+{
	13	+ "name": "jolt",
	14	+ "platforms": {
	15	+ "linux-x86_64": {
	16	+ "size": 15782379,
	17	+ "hash": "sha256",
	18	+ "digest": "aabb71f809aebd9d607b7a5036229f933c733ae90785cb29df899f116be9589f",
	19	+ "format": "tar.gz",
	20	+ "path": "jolt-v0.7.28-1-g2b80d68d-x86_64-linux/jolt",
	21	+ "providers": [
	22	+ {
	23	+ "url": "https://gitlab.com/nandithebull/jolt/-/releases/v0.7.28-android/downloads/jolt-v0.7.28-1-g2b80d68d-x86_64-linux.tar.gz"
	24	+ }
	25	+ ]
	26	+ }
	27	+ }
	28	+}

++#!/usr/bin/env dotslash
++
++// jolt with the Bionic `struct addrinfo` fix, from the fork at
++// gitlab.com/nandithebull/jolt (commit 2b80d68d). Upstream's own release reads
++// `ai_addr` at glibc's offset, which on Android is `ai_canonname` — a null
++// pointer — so every TLS connect fails there and reports a refusal the network
++// never made. Nothing else differs from v0.7.28.
++//
++// Linux x86_64 only: it is what the APK is built on. Other platforms fall back
++// to whatever `jolt` is on PATH, which is upstream's, which is fine for
++// everything but an Android build.
++{
++  "name": "jolt",
++  "platforms": {
++    "linux-x86_64": {
++      "size": 15782379,
++      "hash": "sha256",
++      "digest": "aabb71f809aebd9d607b7a5036229f933c733ae90785cb29df899f116be9589f",
++      "format": "tar.gz",
++      "path": "jolt-v0.7.28-1-g2b80d68d-x86_64-linux/jolt",
++      "providers": [
++        {
++          "url": "https://gitlab.com/nandithebull/jolt/-/releases/v0.7.28-android/downloads/jolt-v0.7.28-1-g2b80d68d-x86_64-linux.tar.gz"
++        }
++      ]
++    }
++  }
++}

modified src/frq/app.jolt +47 -21 Viewed

@@ -158,29 +158,37 @@
158	158	(defn chats-screen []
159	159	(let [buffers (s/channel-list)]
160	160	[:page {:max-width 620}
161		- [:title {:label "Chats"}]
	161	+ ;; Your nick in the title, where "Chats" alone said nothing you did not
	162	+ ;; already know. It is what every channel calls you and what your own
	163	+ ;; lines are signed with, and the only other place it showed was Settings.
	164	+ [:title {:label (if (s/connected?) (str "Chats as " @s/form-nick) "Chats")}]
162	165	[error-note]
	166	+ ;; Join and search are the same shape — a channel box with a button
	167	+ ;; beside it — so they read as one control block rather than a titled
	168	+ ;; card and a stray row: same card, same widths, same gap. The screen
	169	+ ;; title already says what the box is for, which is what the "Join
	170	+ ;; channel" header was doing.
163	171	[:card {}
164		- [:title-2 {:label "Join channel"}]
165		- [:hbox {:spacing 8}
166		- [:entry {:text @s/join-input
167		- :width-request 380
168		- :placeholder "#channel"
169		- :on-change #(reset! s/join-input %)
170		- :on-activate #(do (s/join! @s/join-input) (reset! s/join-input ""))}]
171		- [:button {:label "Join"
172		- :kind :primary
173		- :on-click #(do (s/join! @s/join-input) (reset! s/join-input ""))}]]]
174		- ;; The clear button only shows while there is something to clear: an
175		- ;; empty box has nothing to undo, and a dead button beside it reads as
176		- ;; one that stopped working.
177		- [:hbox {:spacing 6}
178		- [:entry {:text @s/search
179		- :width-request 380
180		- :placeholder "Search channels"
181		- :on-change #(reset! s/search %)}]
182		- (when (seq @s/search)
183		- [:button {:label "✕" :on-click #(reset! s/search "")}])]
	172	+ [:vbox {:spacing 8}
	173	+ [:hbox {:spacing 8}
	174	+ [:entry {:text @s/join-input
	175	+ :width-request 380
	176	+ :placeholder "#channel"
	177	+ :on-change #(reset! s/join-input %)
	178	+ :on-activate #(do (s/join! @s/join-input) (reset! s/join-input ""))}]
	179	+ [:button {:label "Join"
	180	+ :kind :primary
	181	+ :on-click #(do (s/join! @s/join-input) (reset! s/join-input ""))}]]
	182	+ ;; The clear button only shows while there is something to clear: an
	183	+ ;; empty box has nothing to undo, and a dead button beside it reads as
	184	+ ;; one that stopped working.
	185	+ [:hbox {:spacing 8}
	186	+ [:entry {:text @s/search
	187	+ :width-request 380
	188	+ :placeholder "Search channels"
	189	+ :on-change #(reset! s/search %)}]
	190	+ (when (seq @s/search)
	191	+ [:button {:label "✕" :on-click #(reset! s/search "")}])]]]
184	192	(if (seq buffers)
185	193	(for [b buffers] [conversation-row b])
186	194	[:card {} [:dim-label {:label "No conversations yet — join a channel."}]])
@@ -1024,4 +1032,22 @@
1024	1032	(vidya/every! 200 #(let [w (vidya/window-width)]
1025	1033	(when (not= w @s/window-width)
1026	1034	(reset! s/window-width w))))
	1035	+ ;; The nick in the window title, so a second window of this client is told
	1036	+ ;; apart from the first by the one thing that differs — and so the answer to
	1037	+ ;; "who am I here?" is on screen without opening Settings.
	1038	+ ;;
	1039	+ ;; Polled, like the width above and for the same reason: the title belongs to
	1040	+ ;; the window rather than to the tree, so no render puts it there, and the
	1041	+ ;; nick is only settled once a connection has been made. Twice a second is
	1042	+ ;; far more often than a nick changes, and a string compare is what a tick
	1043	+ ;; costs when it has not.
	1044	+ ;; Seeded with the title `run` opens the window under, so the first tick of
	1045	+ ;; a launch that has nobody signed in yet sets nothing.
	1046	+ (let [shown (atom "frq")]
	1047	+ (vidya/every! 500 #(let [title (if (and (s/connected?) (seq @s/form-nick))
	1048	+ (str "frq — " @s/form-nick)
	1049	+ "frq")]
	1050	+ (when (not= title @shown)
	1051	+ (reset! shown title)
	1052	+ (vidya/set-title! title)))))
1027	1053	(ui/run app :title "frq" :width 520 :height 860))

  (defn chats-screen []
    (let [buffers (s/channel-list)]
      [:page {:max-width 620}
--     [:title {:label "Chats"}]
++     ;; Your nick in the title, where "Chats" alone said nothing you did not
++     ;; already know. It is what every channel calls you and what your own
++     ;; lines are signed with, and the only other place it showed was Settings.
++     [:title {:label (if (s/connected?) (str "Chats as " @s/form-nick) "Chats")}]
       [error-note]
++     ;; Join and search are the same shape — a channel box with a button
++     ;; beside it — so they read as one control block rather than a titled
++     ;; card and a stray row: same card, same widths, same gap. The screen
++     ;; title already says what the box is for, which is what the "Join
++     ;; channel" header was doing.
       [:card {}
--      [:title-2 {:label "Join channel"}]
++      [:vbox {:spacing 8}
--      [:hbox {:spacing 8}
++       [:hbox {:spacing 8}
--       [:entry {:text @s/join-input
++        [:entry {:text @s/join-input
--                :width-request 380
++                 :width-request 380
--                :placeholder "#channel"
++                 :placeholder "#channel"
--                :on-change #(reset! s/join-input %)
++                 :on-change #(reset! s/join-input %)
--                :on-activate #(do (s/join! @s/join-input) (reset! s/join-input ""))}]
++                 :on-activate #(do (s/join! @s/join-input) (reset! s/join-input ""))}]
--       [:button {:label "Join"
++        [:button {:label "Join"
--                 :kind :primary
++                  :kind :primary
--                 :on-click #(do (s/join! @s/join-input) (reset! s/join-input ""))}]]]
++                  :on-click #(do (s/join! @s/join-input) (reset! s/join-input ""))}]]
--     ;; The clear button only shows while there is something to clear: an
++       ;; The clear button only shows while there is something to clear: an
--     ;; empty box has nothing to undo, and a dead button beside it reads as
++       ;; empty box has nothing to undo, and a dead button beside it reads as
--     ;; one that stopped working.
++       ;; one that stopped working.
--     [:hbox {:spacing 6}
++       [:hbox {:spacing 8}
--      [:entry {:text @s/search
++        [:entry {:text @s/search
--               :width-request 380
++                 :width-request 380
--               :placeholder "Search channels"
++                 :placeholder "Search channels"
--               :on-change #(reset! s/search %)}]
++                 :on-change #(reset! s/search %)}]
--      (when (seq @s/search)
++        (when (seq @s/search)
--        [:button {:label "✕" :on-click #(reset! s/search "")}])]
++          [:button {:label "✕" :on-click #(reset! s/search "")}])]]]
       (if (seq buffers)
         (for [b buffers] [conversation-row b])
         [:card {} [:dim-label {:label "No conversations yet — join a channel."}]])
    (vidya/every! 200 #(let [w (vidya/window-width)]
                         (when (not= w @s/window-width)
                           (reset! s/window-width w))))
++  ;; The nick in the window title, so a second window of this client is told
++  ;; apart from the first by the one thing that differs — and so the answer to
++  ;; "who am I here?" is on screen without opening Settings.
++  ;;
++  ;; Polled, like the width above and for the same reason: the title belongs to
++  ;; the window rather than to the tree, so no render puts it there, and the
++  ;; nick is only settled once a connection has been made. Twice a second is
++  ;; far more often than a nick changes, and a string compare is what a tick
++  ;; costs when it has not.
++  ;; Seeded with the title `run` opens the window under, so the first tick of
++  ;; a launch that has nobody signed in yet sets nothing.
++  (let [shown (atom "frq")]
++    (vidya/every! 500 #(let [title (if (and (s/connected?) (seq @s/form-nick))
++                                     (str "frq — " @s/form-nick)
++                                     "frq")]
++                         (when (not= title @shown)
++                           (reset! shown title)
++                           (vidya/set-title! title)))))
    (ui/run app :title "frq" :width 520 :height 860))

Merge remote-tracking branch 'origin/main' into claude/copy-profiles-sleek-aee53c