mrrl

Minimal Reliable Reproducible Linux
git clone https://ccx.te2000.cz/git/mrrl
Log | Files | Refs | Submodules | README

system-config-init (9253B)


      1 #!/usr/bin/env pthbs-build
      2 #+busybox.68f74170e6a13d2e0e3d99d29d2f02cd614667a68afec5007308ea1ece55ad64
      3 #+busybox-bzip2.9d87ac159c5af2abf932204167d7dd79a5e2854ec5603817b258b68b5584c07c
      4 #+busybox-gzip.1c4e6759f305d884692ed4260879ddf1ca5b722a4b2b8995fd7ac2ff244c1318
      5 #+busybox-lzop.f4feb74da70e7c871444211871d0fc78da65a9e8ebb6b2d09716cda043d9559f
      6 #+busybox-unzip.3525f1554aa628809b2af9b084dd93fe2a37c8f14dbd514faf0e888c25426073
      7 #+busybox-xz.ead5b695755cbb0c379db6ee22b83de1da44c6d75a5295889ae4536de2a22e58
      8 #+busybox-cpio.aae9207efa7aa6f41519f502d53ce4eabb45a70d339a22bf65d89f1aaf7a39de
      9 #+busybox-dpkg.4f8487d22d56efdc91cb2d6263149840ae08d3ff07047357b04d4437f0321f2d
     10 #+busybox-rpm.173468d54d79d9e5630360360e4479f04190c411b81fd1b1ad0139f618dd6b49
     11 #+busybox-tar.794822cecad4eba7d3977210cc3b83b2dc8011cc18c77d9e0ce5205098cffae8
     12 #+busybox-ed.afab42d8bf2060655b013c6225efcb43715780ef058e718d6a697e25de0dfa16
     13 #+busybox-sed.13120e3643a859180c04f69bc441a554327a643b8a8301ec412d412d3ae9e263
     14 #+busybox-vi.76239b7b2102b4489b0e8a0e86f19030f01d6149fa7310d00504580711d0b0f1
     15 #+busybox-xxd.f3350b2e6c2d9463bc4d0ac5761b2a3ca4d5b811e651c2c705d6143667656c76
     16 #+busybox-process-extra.4718339ba96e00c8091bf1348aef03c41cb830463fb26a943788db2c07d43509
     17 #+busybox-procps.d618aac5f7c813d68a26afdddd97c7989c1ccb671cfa2628642e15573944b541
     18 #+busybox-psmisc.8e915b0be8aa34811699584be98d8d1532c6fe91b44de921e0cbf527402859ad
     19 #+busybox-ash.ec7c45db8ddc5ce15e4890ac76b9058759c93db13f5a7d7af554888e3c5c593f
     20 #+busybox-bc.3e9cce6408b94240c76671a4d11bcade40182fcb5bcc1cfd1828208bef65a085
     21 #+busybox-coreutils.9bf9b030f85f1e2273dcd70b660827388694be93e5dbd86e8c812031195508cb
     22 #+busybox-coreutils-extra.8eb2d3d7aee3f89bc564e0da7e1dcf67071e7e49c1ea9b9dcbdba00069d4e247
     23 #+busybox-daemontools.ff774454c0914cb16b18b038863c4a5a8b7c267eb2a308a9c13b740089ea5727
     24 #+busybox-grep.acdcecd4d05a4d1c250b30ae8925ee38ed1f787276a99b9e3514b9850159d301
     25 #+busybox-misc.125f4e5526de9635e0e04ddc5b6ba8c98a9a0e9e817c423b55241a0f0571e0d4
     26 #+busybox-sh.991f989805551e1b6bb35424114e9339163a4e7c90bb03a946ae71b980936e97
     27 #+busybox-util-linux-unpriv.1f8b2c8640b56685a72666365d8aece78e21f1ebc8a83b4355bb4111536b7caa
     28 #+busybox-findutils.337e3980f5b5d2a07c3850d24ce41c9cbf70e54a3b8d3b4ed7b258756df0014e
     29 #+busybox-awk.9b2a1cd1da22c09390e41d4448e90c4bde9610143c3d9443ca7665d5d8c42153
     30 #+busybox-dosfstools.e820979cc12a5d67189e1a2ddd56b7acf74c997b1fc61e847d362bc71550a0f3
     31 #+busybox-e2fsprogs.c7d4c079efc3d8e52f8074964ab16ffc0c5fae76c17ddbd32004e3dd488b2e3f
     32 #+busybox-iproute2.c5784e69ccfc0c0cfc9059842944b5df497dd8a380acc33047edf5ab87125de4
     33 #+busybox-iputils.2530233389aa34303b99a903597b2f84d537eb44975ff118c9811e23292bb1f0
     34 #+busybox-net-misc.651c3d6430ef597007aa9027635b255e0ecc6b14aa287ace0177294f2685268f
     35 #+busybox-net-tools.498063f80693c71284f5bb10129bccae16776d1749b6c61f0c1f490e90147514
     36 #+busybox-traceroute.59d2a36762db242bf02b4f0cdb453563a1f3233ea386f0d1f67b90abb5846e83
     37 #+busybox-wget.d8f52ca95e4d8f87d77d646b143d200500fed53393c2ae224e80a096a2ac3fc2
     38 #+busybox-chpst.2e97cd93d9d28fead566486cb9995d9606212ba734639d5a51e43928cf341401
     39 #+busybox-console.c1afe1bab8a922fcf8a0cc81e144297f4e81100ec8efaaca731cd96aa4343184
     40 #+busybox-getty.a10a861f84d45540add21aca09c6826177905b14f62f29f1195a244da2d8ace5
     41 #+busybox-i2c-tools.20dff9a2c0595e41111edff6bfebd92884a3188c21a39f2d99552e3a4b3f5eab
     42 #+busybox-linux-extra.df176250cf3170516261609cac06ff0b6152e03addbf6c7fcca314a17dedc3b1
     43 #+busybox-mtd-utils.b8f4aa9c368a00439a5d32c12a9e2987d2c3334955fa91b1e359f9eb70ffde1a
     44 #+busybox-shadow.a6f6bf1873172315da5969e13f556129aeebf3899359559920b9604b356c42c7
     45 #+busybox-su.fc1e17b9e76bbe90a2bfe043d0a604262f872cb9a792eb2e53cf2c1a3b0ba635
     46 #+busybox-util-linux-priv.2257d5f3a2a91721d8eec0e37331d4f4f04ed5120c1f74bd6e32cf2b4c29d34b
     47 #+busybox-logging.a34aa1c5f1e4f4aee3b579751eab46cc24ff8a63a95523a4800731d6b7b95656
     48 #+busybox-cron.0e7308870754a61664a69417c8eed88ec8bd15db0ba1947a351518e3b8a18aca
     49 #+s6.ec4c7ce025c347bbf7c809a40b8138265d382862371e9bcabea457edd0426611
     50 #+s6-rc.124b4ee4dd0213ae1c8fb7f96767606661e32a3ea112c9b2d15a2a3cffeec6ca
     51 #+s6-portable-utils.bced7b4b405d52e439abe7a5e1b61758892c7a9f29e6933447965eb5fef546ea
     52 #+s6-linux-init.8a9c40c44cead5009edaee39180838b911994116ac737e3257fe3de6d2a7444e
     53 #+execline.c9b2a98b336011eab78b31558f55135fab7791d42f91af6af9bff9026401cf95
     54 #+system-config-rc.8b6ac6b70c48a635a4cf4de93c858e1b36ae622207d135f0eee351f22c01ea20
     55 
     56 
     57 # - build script start -
     58 
     59 q() {  # quote list of strings to be suitable for execline
     60 	"s6-quote" "$@"
     61 }
     62 
     63 qx() {  # register executable as dependency and quote full path to be suitable for execline
     64 	exe=$(realpath "$(which "$1")")
     65 	name=$(basename "$1")
     66 	if ! test -x "$exe"; then
     67 		printf 'Error: executable not found: %s\n' "$1"
     68 	fi
     69 	mkdir -p "${dest}/deps/command"
     70 	ln -sf $exe "${dest}/deps/command/$name"
     71 	"s6-quote" "$prefix/deps/command/$name"
     72 }
     73 
     74 prefix=/versions/$pthbs_package
     75 dest=${pthbs_destdir%/}${prefix}
     76 cd '.'
     77 
     78 
     79 s6rcdb=/versions/system-config-rc.8b6ac6b70c48a635a4cf4de93c858e1b36ae622207d135f0eee351f22c01ea20/config/s6-rc-db
     80 
     81 # Generate init (${dest} must not exist but parent dir does)
     82 mkdir -p "$pthbs_destdir//versions"
     83 s6-linux-init-maker \
     84 	-p "/run/current/command:/usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin" \
     85 	-G "$(q "$prefix/deps/command/env") TERM=linux $(q "$prefix/deps/command/getty") 38400 tty9" \
     86 	-t 1 \
     87 	-N \
     88 	-c "$prefix" \
     89 	"${dest}"
     90 
     91 
     92 # Link deps that are passed to s6-l-i-m
     93 qx env
     94 qx getty
     95 
     96 # Link execlineb - can't quote shebang
     97 qx execlineb
     98 el=$prefix/deps/command/$name
     99 
    100 # Rewrite bin/init as it fails finding it's own s6-linux-init
    101 s6-cat >"${dest}/bin/init.new" <<EOF || exit $?
    102 #!$el -S0
    103 $(qx pthbs-enter)
    104 $(qx s6-envdir) -I /run/current/env
    105 EOF
    106 s6-cat >>"${dest}/bin/init.new" <"${dest}/bin/init"
    107 chmod +x "${dest}/bin/init.new"
    108 mv -v "${dest}/bin/init.new" "${dest}/bin/init"
    109 
    110 # Rewrite dynamically generated scripts
    111 s6-cat >"${dest}/scripts/rc.init" <<EOF || exit $?
    112 #!$el -S1
    113 $(qx export) TERM "linux"
    114 $(qx foreground) { $(qx s6-echo) "* Starting s6-rc from "$(q "$s6rcdb") }
    115 $(qx if) { $(qx s6-rc-init) -d -c $(q "$s6rcdb") /run/service }
    116 $prefix/scripts/runlevel \$1
    117 EOF
    118 
    119 s6-cat >"${dest}/scripts/rc.shutdown" <<EOF || exit $?
    120 #!$el -P
    121 
    122 ### Things to do before hardware halt/reboot/poweroff.
    123 ### Ideally, it should be a single call to the service manager,
    124 ### telling it to bring all the services down.
    125 
    126 $(qx redirfd) -w 1 /dev/console
    127 $(qx redirfd) -w 2 /dev/console
    128 $(qx s6-rc) -v2 -bDa change
    129 EOF
    130 
    131 s6-cat >"${dest}/scripts/runlevel" <<EOF || exit $?
    132 #!$el -S1
    133 export TERM "linux"
    134 
    135 # The requested runlevel is in "\$1" but currently ignored.
    136 
    137 # Run the service manager.
    138 # Call it twice because the first time may spuriously "timeout"
    139 # due to the clock jumping forward.
    140 
    141 $(qx ifelse) -X {
    142 	$(qx s6-rc) -v 2 -t 600000 -- change ok-all-but-tty 
    143 } {
    144 	# no timeout, start ttys properly
    145 	$(qx foreground) { $(qx s6-echo) "* System started normally (bundle ok-all-but-tty)" }
    146 	$(qx foreground) { sleep 0.3 }
    147 	$(qx foreground) { $(qx s6-svc) -d /run/service/console-log-tail }
    148 	$(qx s6-rc) -v 2 -t 600000 -- change ok-all
    149 }
    150 $(qx foreground) { $(qx s6-echo) "* System startup failure: retry" }
    151 # try again without tty and then with
    152 $(qx foreground) { $(qx s6-rc) -v 2 -t 600000 -- change ok-all-but-tty }
    153 $(qx foreground) { $(qx sleep) 0.1 }
    154 $(qx foreground) { $(qx s6-svc) -d /run/service/console-log-tail }
    155 $(qx s6-rc) -v 2 -t 600000 -- change ok-all
    156 EOF
    157 
    158 s6-mkdir "${dest}/run-image/service/console-log-tail" || exit $?
    159 s6-cat >"${dest}/run-image/service/console-log-tail/run" <<EOF || exit $?
    160 #!$el -P
    161 $(qx redirfd) -w 1 /dev/console
    162 $(qx fdmove) -c 2 1
    163 $(qx pipeline) -w { $(qx s6-tai64nlocal) }
    164 $(qx tail) -F -n +1 /run/uncaught-logs/current
    165 EOF
    166 s6-chmod 755 "${dest}/run-image/service/console-log-tail/run" exit $?
    167 
    168 
    169 
    170 
    171 cd "$pthbs_destdir/versions/$pthbs_package"
    172 find -type d -o -print | awk -F/ '
    173 BEGIN {
    174 	x["./bin/init"]=1
    175 	x["./bin/halt"]=1
    176 	x["./bin/poweroff"]=1
    177 	x["./bin/reboot"]=1
    178 }
    179 
    180 function r1(s) {
    181 	sub("^[.]/[^/]*", ".", s)
    182 	return s
    183 }
    184 function s1(repl, s) {
    185 	sub("^[.]/[^/]*", "./"repl, s)
    186 	return s
    187 }
    188 function link(src) {
    189 	x[$0]=0
    190 	printf "%s\t%s\n", $0, src
    191 	printf "genlinks >>%s\t%s<<\n", $0, src >>"/dev/stderr"
    192 }
    193 $1!="."{exit 1}
    194 
    195 
    196 $2 == "config" { link($0); next }
    197 $2 == "keys" { link($0); next }
    198 $2 == "zsh" { link($0); next }
    199 $2 == "env" { link($0); next }
    200 $2 == "command" { link($0); next }
    201 $2 == "bin" { link(s1("command", $0)); next }
    202 
    203 $2 == "library.so" { link($0); next }
    204 $2 == "library" { link($0); next }
    205 $2 == "lib" && $NF ~ /\.l?a$/ { link(s1("library", $0)); next }
    206 $2 == "lib" && $NF ~ /\.so(\..*)?$/ { link(s1("library.so", $0)); next }
    207 
    208 $2 == "share" && $3 ~ /^(info|man|doc|icons|terminfo)$/ { link(r1($0)); next }
    209 
    210 $2 == "man" { link($0); next }
    211 $2 == "info" { link($0); next }
    212 $2 == "doc" { link($0); next }
    213 $2 == "icons" { link($0); next }
    214 $2 == "terminfo" { link($0); next }
    215 $2 == "data" { link($0); next }
    216 $2 == "include" { link($0); next }
    217 
    218 { printf "genlinks ##%s## skipped\n", $0 >>"/dev/stderr" }
    219 
    220 END {
    221 	for(fname in x) { printf "DEBUG: x[\"%s\"]=\"%s\"\n", fname, x[fname] >"/dev/stderr" }
    222 	for(fname in x) {
    223 		if(x[fname]) {
    224 			printf "ERROR: missing expected file \"%s\"\n", fname >"/dev/stderr"
    225 			exit 3
    226 		}
    227 	}
    228 }' >.install-links.new
    229 mv .install-links.new .install-links
    230