88 lines
3.1 KiB
Bash
Executable File
88 lines
3.1 KiB
Bash
Executable File
#!/bin/sh
|
|
set -eu
|
|
|
|
project_root=${PROJECT_ROOT:-$(pwd)}
|
|
guix_source_dir=${GUIX_SOURCE_DIR:-"$HOME/repos/guix"}
|
|
script_dir=$(CDPATH= cd -- "$(dirname "$0")" && pwd)
|
|
runner_scm=$script_dir/materialize-phase7-system-closure.scm
|
|
os_file=$script_dir/phase7-minimal-operating-system.scm
|
|
guile_bin=${GUILE_BIN:-/tmp/guile-freebsd-validate-install/bin/guile}
|
|
guile_extra_prefix=${GUILE_EXTRA_PREFIX:-/tmp/guile-gnutls-freebsd-validate-install}
|
|
shepherd_prefix=${SHEPHERD_PREFIX:-/tmp/shepherd-freebsd-validate-install}
|
|
store_dir=${STORE_DIR:-/frx/store}
|
|
metadata_target=${METADATA_OUT:-}
|
|
|
|
if [ ! -x "$guile_bin" ]; then
|
|
echo "Guile binary is not executable: $guile_bin" >&2
|
|
exit 1
|
|
fi
|
|
|
|
ensure_built() {
|
|
if [ ! -d "$guile_extra_prefix/share/guile/site" ] || \
|
|
! GUILE_LOAD_PATH="$guile_extra_prefix/share/guile/site/3.0${GUILE_LOAD_PATH:+:$GUILE_LOAD_PATH}" \
|
|
GUILE_LOAD_COMPILED_PATH="$guile_extra_prefix/lib/guile/3.0/site-ccache${GUILE_LOAD_COMPILED_PATH:+:$GUILE_LOAD_COMPILED_PATH}" \
|
|
GUILE_EXTENSIONS_PATH="$guile_extra_prefix/lib/guile/3.0/extensions${GUILE_EXTENSIONS_PATH:+:$GUILE_EXTENSIONS_PATH}" \
|
|
LD_LIBRARY_PATH="$guile_extra_prefix/lib:/tmp/guile-freebsd-validate-install/lib:/usr/local/lib${LD_LIBRARY_PATH:+:$LD_LIBRARY_PATH}" \
|
|
"$guile_bin" -c '(catch #t (lambda () (use-modules (fibers)) (display "ok") (newline)) (lambda _ (display "missing") (newline)))' | grep -qx ok; then
|
|
METADATA_OUT= ENV_OUT= "$project_root/tests/shepherd/build-local-guile-fibers.sh"
|
|
fi
|
|
|
|
if [ ! -x "$shepherd_prefix/bin/shepherd" ] || [ ! -x "$shepherd_prefix/bin/herd" ]; then
|
|
METADATA_OUT= ENV_OUT= GUILE_EXTRA_PREFIX="$guile_extra_prefix" "$project_root/tests/shepherd/build-local-shepherd.sh"
|
|
fi
|
|
}
|
|
|
|
ensure_built
|
|
|
|
guile_prefix=$(CDPATH= cd -- "$(dirname "$guile_bin")/.." && pwd)
|
|
guile_lib_dir=$guile_prefix/lib
|
|
cleanup=0
|
|
if [ -n "${WORKDIR:-}" ]; then
|
|
workdir=$WORKDIR
|
|
mkdir -p "$workdir"
|
|
else
|
|
workdir=$(mktemp -d /tmp/fruix-phase7-system-closure.XXXXXX)
|
|
cleanup=1
|
|
fi
|
|
if [ "${KEEP_WORKDIR:-0}" -eq 1 ]; then
|
|
cleanup=0
|
|
fi
|
|
|
|
cleanup_workdir() {
|
|
if [ "$cleanup" -eq 1 ]; then
|
|
rm -rf "$workdir" 2>/dev/null || sudo rm -rf "$workdir"
|
|
fi
|
|
}
|
|
trap cleanup_workdir EXIT INT TERM
|
|
|
|
export GUILE_AUTO_COMPILE=0
|
|
export WORKDIR="$workdir"
|
|
export OS_FILE="$os_file"
|
|
export STORE_DIR="$store_dir"
|
|
export GUILE_PREFIX="$guile_prefix"
|
|
export GUILE_EXTRA_PREFIX="$guile_extra_prefix"
|
|
export SHEPHERD_PREFIX="$shepherd_prefix"
|
|
|
|
if [ -n "${GUILE_LOAD_PATH:-}" ]; then
|
|
gui_load_path="$project_root/modules:$guix_source_dir:$GUILE_LOAD_PATH"
|
|
else
|
|
gui_load_path="$project_root/modules:$guix_source_dir"
|
|
fi
|
|
|
|
printf 'Using Guile: %s\n' "$guile_bin"
|
|
printf 'Working directory: %s\n' "$workdir"
|
|
printf 'Store directory: %s\n' "$store_dir"
|
|
|
|
sudo env \
|
|
GUILE_AUTO_COMPILE=0 \
|
|
GUILE_LOAD_PATH="$gui_load_path" \
|
|
LD_LIBRARY_PATH="$guile_lib_dir${LD_LIBRARY_PATH:+:$LD_LIBRARY_PATH}" \
|
|
WORKDIR="$workdir" \
|
|
OS_FILE="$os_file" \
|
|
STORE_DIR="$store_dir" \
|
|
GUILE_PREFIX="$guile_prefix" \
|
|
GUILE_EXTRA_PREFIX="$guile_extra_prefix" \
|
|
SHEPHERD_PREFIX="$shepherd_prefix" \
|
|
METADATA_OUT="$metadata_target" \
|
|
"$guile_bin" -s "$runner_scm"
|