#!/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