|
|
#!/usr/bin/env bash
|
|
|
|
|
|
set -euo pipefail
|
|
|
|
|
|
if [[ $# -lt 1 || $# -gt 3 ]]; then
|
|
|
echo "用法: $0 <input.sy> [output_dir] [--run]" >&2
|
|
|
exit 1
|
|
|
fi
|
|
|
|
|
|
input=$1
|
|
|
out_dir="test/test_result/asm"
|
|
|
run_exec=false
|
|
|
input_dir=$(dirname "$input")
|
|
|
|
|
|
shift
|
|
|
while [[ $# -gt 0 ]]; do
|
|
|
case "$1" in
|
|
|
--run)
|
|
|
run_exec=true
|
|
|
;;
|
|
|
*)
|
|
|
out_dir="$1"
|
|
|
;;
|
|
|
esac
|
|
|
shift
|
|
|
done
|
|
|
|
|
|
if [[ ! -f "$input" ]]; then
|
|
|
echo "输入文件不存在: $input" >&2
|
|
|
exit 1
|
|
|
fi
|
|
|
|
|
|
compiler="./build/bin/compiler"
|
|
|
if [[ ! -x "$compiler" ]]; then
|
|
|
echo "未找到编译器: $compiler ,请先构建。" >&2
|
|
|
exit 1
|
|
|
fi
|
|
|
|
|
|
if ! command -v aarch64-linux-gnu-gcc >/dev/null 2>&1; then
|
|
|
echo "未找到 aarch64-linux-gnu-gcc,无法汇编/链接。" >&2
|
|
|
exit 1
|
|
|
fi
|
|
|
|
|
|
if ! command -v qemu-aarch64 >/dev/null 2>&1 && [[ "$run_exec" == true ]]; then
|
|
|
echo "未找到 qemu-aarch64,无法运行生成的可执行文件。" >&2
|
|
|
exit 1
|
|
|
fi
|
|
|
|
|
|
find_runtime() {
|
|
|
if [[ -n "${SYSY_RUNTIME:-}" ]]; then
|
|
|
if [[ -f "$SYSY_RUNTIME" ]]; then
|
|
|
printf '%s\n' "$SYSY_RUNTIME"
|
|
|
return 0
|
|
|
fi
|
|
|
echo "环境变量 SYSY_RUNTIME 指向的文件不存在: $SYSY_RUNTIME" >&2
|
|
|
return 1
|
|
|
fi
|
|
|
|
|
|
local candidates=(
|
|
|
"./sylib/sylib.c"
|
|
|
"./sylib.c"
|
|
|
"./runtime/sylib.c"
|
|
|
"./lib/sylib.c"
|
|
|
)
|
|
|
|
|
|
local candidate
|
|
|
for candidate in "${candidates[@]}"; do
|
|
|
if [[ -f "$candidate" ]]; then
|
|
|
printf '%s\n' "$candidate"
|
|
|
return 0
|
|
|
fi
|
|
|
done
|
|
|
|
|
|
local found=""
|
|
|
found=$(find . \
|
|
|
-path './build' -prune -o \
|
|
|
-path './.git' -prune -o \
|
|
|
-type f -name 'sylib.c' -print | head -n 1)
|
|
|
|
|
|
if [[ -n "$found" ]]; then
|
|
|
printf '%s\n' "$found"
|
|
|
return 0
|
|
|
fi
|
|
|
|
|
|
return 1
|
|
|
}
|
|
|
|
|
|
runtime_src="$(find_runtime || true)"
|
|
|
if [[ -z "$runtime_src" ]]; then
|
|
|
echo "未找到运行时库源码 sylib.c" >&2
|
|
|
echo "可以显式指定:SYSY_RUNTIME=/你的路径/sylib.c $0 <input.sy> [output_dir] [--run]" >&2
|
|
|
exit 1
|
|
|
fi
|
|
|
|
|
|
runtime_cache_dir="./build/test_runtime"
|
|
|
runtime_obj="$runtime_cache_dir/sylib.o"
|
|
|
|
|
|
mkdir -p "$runtime_cache_dir"
|
|
|
|
|
|
if [[ ! -f "$runtime_obj" || "$runtime_src" -nt "$runtime_obj" ]]; then
|
|
|
echo "编译运行时库: $runtime_src -> $runtime_obj"
|
|
|
aarch64-linux-gnu-gcc -O2 -c "$runtime_src" -o "$runtime_obj"
|
|
|
fi
|
|
|
|
|
|
mkdir -p "$out_dir"
|
|
|
base=$(basename "$input")
|
|
|
stem=${base%.sy}
|
|
|
asm_file="$out_dir/$stem.s"
|
|
|
exe="$out_dir/$stem"
|
|
|
stdin_file="$input_dir/$stem.in"
|
|
|
expected_file="$input_dir/$stem.out"
|
|
|
|
|
|
"$compiler" --emit-asm "$input" > "$asm_file"
|
|
|
echo "汇编已生成: $asm_file"
|
|
|
|
|
|
aarch64-linux-gnu-gcc "$asm_file" "$runtime_obj" -o "$exe"
|
|
|
echo "可执行文件已生成: $exe"
|
|
|
|
|
|
if [[ "$run_exec" == true ]]; then
|
|
|
stdout_file="$out_dir/$stem.stdout"
|
|
|
actual_file="$out_dir/$stem.actual.out"
|
|
|
|
|
|
echo "运行 $exe ..."
|
|
|
set +e
|
|
|
if [[ -f "$stdin_file" ]]; then
|
|
|
qemu-aarch64 -L /usr/aarch64-linux-gnu -s 104857600 "$exe" < "$stdin_file" > "$stdout_file"
|
|
|
else
|
|
|
qemu-aarch64 -L /usr/aarch64-linux-gnu -s 104857600 "$exe" > "$stdout_file"
|
|
|
fi
|
|
|
status=$?
|
|
|
set -e
|
|
|
|
|
|
cat "$stdout_file"
|
|
|
echo "退出码: $status"
|
|
|
|
|
|
{
|
|
|
cat "$stdout_file"
|
|
|
if [[ -s "$stdout_file" ]] && (( $(tail -c 1 "$stdout_file" | wc -l) == 0 )); then
|
|
|
printf '\n'
|
|
|
fi
|
|
|
printf '%s' "$status"
|
|
|
} > "$actual_file"
|
|
|
|
|
|
if [[ -f "$expected_file" ]]; then
|
|
|
if diff -u "$expected_file" "$actual_file"; then
|
|
|
echo "输出匹配: $expected_file"
|
|
|
else
|
|
|
if python3 - "$expected_file" "$actual_file" <<'PY'
|
|
|
import sys
|
|
|
from pathlib import Path
|
|
|
|
|
|
def canon(path: str) -> bytes:
|
|
|
data = Path(path).read_bytes()
|
|
|
data = data.replace(b'\r\n', b'\n')
|
|
|
while data.endswith(b'\n'):
|
|
|
data = data[:-1]
|
|
|
lines = data.split(b'\n')
|
|
|
lines = [line.rstrip() for line in lines]
|
|
|
return b'\n'.join(lines)
|
|
|
|
|
|
sys.exit(0 if canon(sys.argv[1]) == canon(sys.argv[2]) else 1)
|
|
|
PY
|
|
|
then
|
|
|
echo "输出匹配: $expected_file"
|
|
|
else
|
|
|
echo "输出不匹配: $expected_file" >&2
|
|
|
echo "实际输出已保存: $actual_file" >&2
|
|
|
exit 1
|
|
|
fi
|
|
|
fi
|
|
|
else
|
|
|
echo "未找到预期输出文件,跳过比对: $expected_file"
|
|
|
fi
|
|
|
fi
|