set -xe

. $(dirname "$0")/common.sh

# The list of tests/checks that we need to skip. They are either not suitable for Julia-MMTk, or
# not supported at this moment.
# Each line is a pattern of the test to match (we add skip=true to the end of those lines), and the test file path
# * Pattern ends with $ so we won't append 'skip=true' multiple times
declare -a tests_to_skip=(
    # Ignore the entire libgit2.jl -- there are too many possible network related issues to run this test
    # '@test.*$' "$JULIA_PATH/usr/share/julia/stdlib/v1.8/LibGit2/test/libgit2.jl"

    # These tests check for the number of stock GC threads (which we set to 0 with mmtk)
    '@test string(cpu_threads) ==' "$JULIA_PATH/test/cmdlineargs.jl"
    '@test (cpu_threads == 1 ? "1" : string(div(cpu_threads, 2))) ==' "$JULIA_PATH/test/cmdlineargs.jl"
    '@test read(`$exename --gcthreads=2 -e $code`, String) == "2"' "$JULIA_PATH/test/cmdlineargs.jl"
    '@test read(`$exename --gcthreads=2,1 -e $code`, String) == "3"' "$JULIA_PATH/test/cmdlineargs.jl"
    '@test read(`$exename -e $code`, String) == "2"' "$JULIA_PATH/test/cmdlineargs.jl"
    '@test read(`$exename -e $code`, String) == "3"' "$JULIA_PATH/test/cmdlineargs.jl"

    # These tests use the heapsize hint which is not used by mmtk
    '@test readchomp(`$(Base.julia_cmd()) --startup-file=no --heap-size-hint=500M' "$JULIA_PATH/test/cmdlineargs.jl"
    '@test readchomp(`$(Base.julia_cmd()) --startup-file=no --heap-size-hint=10M' "$JULIA_PATH/test/cmdlineargs.jl"
    '@test abs(Float64(maxmem)' "$JULIA_PATH/test/cmdlineargs.jl"

    # For some reason this fails even with the stock build
    '@test n_precompiles <= expected_precompiles' "$JULIA_PATH/stdlib/REPL/test/precompilation.jl"
    '@test length(targets) > 1' "$JULIA_PATH/test/precompile.jl"

    # rr might not be available in the github runner
    '@test success(pipeline(setenv(`$(Base.julia_cmd()) --bug-report=rr-local' "$JULIA_PATH/test/cmdlineargs.jl"

    # These tests seem to fail because we set the number of stock GC threads to 0
    'jl_setaffinity(1, mask, cpumasksize) == 0' "$JULIA_PATH/test/threads.jl"
    'jl_getaffinity(1, mask, cpumasksize) == 0' "$JULIA_PATH/test/threads.jl"

    # Skipping these GC tests for now (until we make sure we follow the stats as expected by the stock GC)
    '@test !live_bytes_has_grown_too_much' "$JULIA_PATH/test/gc.jl"
    '@test any(page_utilization .> 0)' "$JULIA_PATH/test/gc.jl"

    # Tests that check the reasons for a full sweep and are specific to stock Julia
    '@test reasons\[:FULL_SWEEP_REASON_FORCED_FULL_SWEEP\] >= 1' "$JULIA_PATH/test/gc.jl"
    '@test keys(reasons) == Set(Base.FULL_SWEEP_REASONS)' "$JULIA_PATH/test/gc.jl"

    # Allocation profiler tests that fail when we inline fastpath allocation
    '@test length(\[a for a in prof.allocs if a.type == MyType\]) >= 1' "$JULIA_PATH/stdlib/Profile/test/allocs.jl"
    '@test length(prof.allocs) >= 1' "$JULIA_PATH/stdlib/Profile/test/allocs.jl"
    '@test length(filter(a->a.type <: type, profile.allocs)) >= NUM_TASKS' "$JULIA_PATH/stdlib/Profile/test/allocs.jl"
    '@test length(profile.allocs) >= 2\*NUM_TASKS' "$JULIA_PATH/stdlib/Profile/test/allocs.jl"
    
    # Test that expects information from heap snapshot which is currently not available in MMTk
    '@test contains(sshot, "redact_this")' "$JULIA_PATH/stdlib/Profile/test/runtests.jl"

    # This test checks GC logging
    '@test !isempty(test_complete("?("))' "$JULIA_PATH/stdlib/REPL/test/replcompletions.jl"

    # This test seems to be failing in the new version of Julia
    '@test occursin("int.jl", code)' "$JULIA_PATH/test/cmdlineargs.jl"
    # These tests check for the number of stock GC threads (which we set to 0 with mmtk)
    '@test (cpu_threads == 1 ? "1" : string(div(cpu_threads, 2))) ==' "$JULIA_PATH/test/cmdlineargs.jl"
    '@test read(`$exename --gcthreads=2 -e $code`, String) == "2"' "$JULIA_PATH/test/cmdlineargs.jl"
    '@test read(`$exename -e $code`, String) == "2"' "$JULIA_PATH/test/cmdlineargs.jl"
    # This seems to be a regression from upstream when we merge with upstream 43bf2c8.
    # The required string int.jl does not appear in the output even if I test with the stock Julia code.
    # I do not know what is wrong, but at this point, I dont want to spend time on it.
    '@test occursin("int.jl", code)' "$JULIA_PATH/test/cmdlineargs.jl"
)

for (( i=0; i < ${#tests_to_skip[@]}; i+=2 )); do
    pattern=${tests_to_skip[i]}
    file=${tests_to_skip[i+1]}
    sed -i '/'"$pattern"'/ s/@test/@test_skip/' $file
done