nandi/frq · lib.bb

nandi/frqpublic⑂ Fork 0

⑂ 962fcce83c1a65aae5463db87c71b13312b9101d

lib.bb · 67 lines · 3.2 KBBlitzBasic    Blame HistoryRaw
Write the build in babashka, and pin the babashka   1
3exec "$(dirname "$0")/bb" "$0" "$@"
Take every jolt-native half from the release, and only from there   6;; Both native libraries, out of jolt-native's release rather than a checkout.
Write the build in babashka, and pin the babashka   7
Take every jolt-native half from the release, and only from there   8;; libvidya is the tree ABI glimmer-vidya binds; libjoltmoq is the AV media
9;; plane. They come out of one archive because they are built together, and
Run this tree on a native half the builders made   10;; they land in build/lib because a loader wants one directory. `just run` does
11;; not come through here — running a change to jolt-native means building it,
Build the APK as derivations only, and retire the buck2 graph   12;; which is what the dev shell is for — so this is the released half: the same
13;; bytes the APK takes through nix/android.nix, and what a run of the last
14;; release takes.
Take every jolt-native half from the release, and only from there   15
16;; Nothing is compiled here. The pinned bytes are the bytes: this repo used to
17;; clone jolt-native and cargo-build it, which meant a Rust toolchain, a build
18;; whose output depended on the machine, and two places — the clone's sha and
19;; the release digest — that could disagree about which jolt-native frq was
20;; running against. Bump scripts/*.dotslash instead: see bump-jolt-native.bb.
22;; Linked rather than copied, so a bump reaches a running tree by relinking and
23;; nothing goes stale in build/ — except for the one object that has to be
24;; repaired on the way through. See below.
Write the build in babashka, and pin the babashka   25(require '[babashka.classpath :as cp])
26(cp/add-classpath (str (babashka.fs/parent *file*)))
27(require '[frq.paths :as paths]
28         '[babashka.fs :as fs]
Take every jolt-native half from the release, and only from there   29         '[clojure.string :as str])
Write the build in babashka, and pin the babashka   30
31(def root (str (fs/canonicalize (fs/path (fs/parent *file*) ".."))))
Take every jolt-native half from the release, and only from there   32(def lib (fs/path root "build" "lib"))
34;; v0.1.3's desktop libjoltmoq.so has 68 undefined `snd_*` symbols and no
35;; DT_NEEDED on libasound: cpal's ALSA host is compiled in, and the library it
36;; calls is not named. It is the defect that release fixed for Android, in the
37;; place the fix did not reach — buck2 keeps a build script's cfgs and drops
38;; its link directives, so `cargo:rustc-link-lib=asound` never became a link
39;; argument. Undefined symbols are legal in a cdylib, so nothing said so until
40;; something tried to load it.
42;; So the library is named here instead, on a copy: the DotSlash cache holds
43;; what the release published, and rewriting that in place would make a
44;; verified digest a lie about the bytes on disk.
46;; This goes away with the release that links it. `patchelf --print-needed`
47;; below is the test for that — a fixed object is linked, not copied.
48(def repairs {"libjoltmoq.so" "libasound.so.2"})
Write the build in babashka, and pin the babashka   49
Take every jolt-native half from the release, and only from there   50(defn needed [file]
51  (set (str/split-lines (paths/out "patchelf" "--print-needed" file))))
Write the build in babashka, and pin the babashka   52
Take every jolt-native half from the release, and only from there   53(fs/create-dirs lib)
54(doseq [name ["libvidya-linux" "libjoltmoq-linux"]]
55  (let [file (paths/dist root name)
56        base (fs/file-name file)
57        dest (fs/path lib base)
58        missing (get repairs base)]
59    (fs/delete-if-exists dest)
60    (if (and missing (not (contains? (needed file) missing)))
61      (do (fs/copy file dest)
62          ;; Out of the cache read-only, and patchelf writes.
63          (fs/set-posix-file-permissions dest "rw-r--r--")
64          (paths/out "patchelf" "--add-needed" missing (str dest))
65          (println (str (fs/relativize root dest) " <- " file " (+" missing ")")))
66      (do (fs/create-sym-link dest file)
67          (println (str (fs/relativize root dest) " -> " file))))))

Write the build in babashka, and pin the babashka 34832a8 nandi 18d ago	1	#!/bin/sh
	2	#_(
	3	exec "$(dirname "$0")/bb" "$0" "$@"
	4	)
	5
Take every jolt-native half from the release, and only from there a008d3b nandi 18d ago	6	;; Both native libraries, out of jolt-native's release rather than a checkout.
Write the build in babashka, and pin the babashka 34832a8 nandi 18d ago	7	;;
Take every jolt-native half from the release, and only from there a008d3b nandi 18d ago	8	;; libvidya is the tree ABI glimmer-vidya binds; libjoltmoq is the AV media
	9	;; plane. They come out of one archive because they are built together, and
Run this tree on a native half the builders made a32699e nandi 17d ago	10	;; they land in build/lib because a loader wants one directory. `just run` does
	11	;; not come through here — running a change to jolt-native means building it,
Build the APK as derivations only, and retire the buck2 graph 3bc3aaa nandi 16d ago	12	;; which is what the dev shell is for — so this is the released half: the same
	13	;; bytes the APK takes through nix/android.nix, and what a run of the last
	14	;; release takes.
Take every jolt-native half from the release, and only from there a008d3b nandi 18d ago	15	;;
	16	;; Nothing is compiled here. The pinned bytes are the bytes: this repo used to
	17	;; clone jolt-native and cargo-build it, which meant a Rust toolchain, a build
	18	;; whose output depended on the machine, and two places — the clone's sha and
	19	;; the release digest — that could disagree about which jolt-native frq was
	20	;; running against. Bump scripts/*.dotslash instead: see bump-jolt-native.bb.
	21	;;
	22	;; Linked rather than copied, so a bump reaches a running tree by relinking and
	23	;; nothing goes stale in build/ — except for the one object that has to be
	24	;; repaired on the way through. See below.
Write the build in babashka, and pin the babashka 34832a8 nandi 18d ago	25	(require '[babashka.classpath :as cp])
	26	(cp/add-classpath (str (babashka.fs/parent file)))
	27	(require '[frq.paths :as paths]
	28	'[babashka.fs :as fs]
Take every jolt-native half from the release, and only from there a008d3b nandi 18d ago	29	'[clojure.string :as str])
Write the build in babashka, and pin the babashka 34832a8 nandi 18d ago	30
	31	(def root (str (fs/canonicalize (fs/path (fs/parent file) ".."))))
Take every jolt-native half from the release, and only from there a008d3b nandi 18d ago	32	(def lib (fs/path root "build" "lib"))
	33
	34	;; v0.1.3's desktop libjoltmoq.so has 68 undefined `snd_*` symbols and no
	35	;; DT_NEEDED on libasound: cpal's ALSA host is compiled in, and the library it
	36	;; calls is not named. It is the defect that release fixed for Android, in the
	37	;; place the fix did not reach — buck2 keeps a build script's cfgs and drops
	38	;; its link directives, so `cargo:rustc-link-lib=asound` never became a link
	39	;; argument. Undefined symbols are legal in a cdylib, so nothing said so until
	40	;; something tried to load it.
	41	;;
	42	;; So the library is named here instead, on a copy: the DotSlash cache holds
	43	;; what the release published, and rewriting that in place would make a
	44	;; verified digest a lie about the bytes on disk.
	45	;;
	46	;; This goes away with the release that links it. `patchelf --print-needed`
	47	;; below is the test for that — a fixed object is linked, not copied.
	48	(def repairs {"libjoltmoq.so" "libasound.so.2"})
Write the build in babashka, and pin the babashka 34832a8 nandi 18d ago	49
Take every jolt-native half from the release, and only from there a008d3b nandi 18d ago	50	(defn needed [file]
	51	(set (str/split-lines (paths/out "patchelf" "--print-needed" file))))
Write the build in babashka, and pin the babashka 34832a8 nandi 18d ago	52
Take every jolt-native half from the release, and only from there a008d3b nandi 18d ago	53	(fs/create-dirs lib)
	54	(doseq [name ["libvidya-linux" "libjoltmoq-linux"]]
	55	(let [file (paths/dist root name)
	56	base (fs/file-name file)
	57	dest (fs/path lib base)
	58	missing (get repairs base)]
	59	(fs/delete-if-exists dest)
	60	(if (and missing (not (contains? (needed file) missing)))
	61	(do (fs/copy file dest)
	62	;; Out of the cache read-only, and patchelf writes.
	63	(fs/set-posix-file-permissions dest "rw-r--r--")
	64	(paths/out "patchelf" "--add-needed" missing (str dest))
	65	(println (str (fs/relativize root dest) " <- " file " (+" missing ")")))
	66	(do (fs/create-sym-link dest file)
	67	(println (str (fs/relativize root dest) " -> " file))))))