#!/bin/bash

# Like a mythical touch -p
function touchp() {
    install -Dm644 /dev/null "$1"
}

# Creates a simple file+directory structure for tests
function make_basic() {
    touchp "$1/a"
    touchp "$1/b"
    touchp "$1/c/d"
    touchp "$1/e/f"
    mkdir -p "$1/g/h"
    mkdir -p "$1/i"
    touchp "$1/j/foo"
    touchp "$1/k/foo/bar"
    touchp "$1/l/foo/bar/baz"
}

basic="$(mktemp -d "${TMPDIR:-/tmp}"/bfs.basic.XXXXXXXXXX)"
make_basic "$basic"

# Creates a file+directory structure with various permissions for tests
function make_perms() {
    install -Dm444 /dev/null "$1/r"
    install -Dm222 /dev/null "$1/w"
    install -Dm644 /dev/null "$1/rw"
    install -Dm555 /dev/null "$1/rx"
    install -Dm311 /dev/null "$1/wx"
    install -Dm755 /dev/null "$1/rwx"
}

perms="$(mktemp -d "${TMPDIR:-/tmp}"/bfs.perms.XXXXXXXXXX)"
make_perms "$perms"

# Creates a file+directory structure with various symbolic and hard links
function make_links() {
    touchp "$1/a"
    ln -s a "$1/b"
    ln "$1/a" "$1/c"
    mkdir -p "$1/d/e/f"
    ln -s ../../d "$1/d/e/g"
    ln -s d/e "$1/h"
    ln -s q "$1/d/e/i"
}

links="$(mktemp -d "${TMPDIR:-/tmp}"/bfs.links.XXXXXXXXXX)"
make_links "$links"

# Creates a file+directory structure with various weird file/directory names
function make_weirdnames() {
    touchp "$1/-/a"
    touchp "$1/(/b"
    touchp "$1/(-/c"
    touchp "$1/!/d"
    touchp "$1/!-/e"
    touchp "$1/,/f"
    touchp "$1/)/g"
}

weirdnames="$(mktemp -d "${TMPDIR:-/tmp}"/bfs.weirdnames.XXXXXXXXXX)"
make_weirdnames "$weirdnames"

# Create a scratch directory that tests can modify
scratch="$(mktemp -d "${TMPDIR:-/tmp}"/bfs.weirdnames.XXXXXXXXXX)"

# Clean up temporary directories on exit
function cleanup() {
    rm -rf "$scratch"
    rm -rf "$weirdnames"
    rm -rf "$links"
    rm -rf "$perms"
    rm -rf "$basic"
}
trap cleanup EXIT

function _realpath() {
    (
        cd "${1%/*}"
        echo "$PWD/${1##*/}"
    )
}

BFS="$(_realpath ./bfs)"

# Checks for any (order-independent) differences between bfs and find
function find_diff() {
    diff -u <("$BFS" "$@" | sort) <(find "$@" | sort)
}

# Test cases

function test_0001() {
    find_diff "$basic"
}

function test_0002() {
    find_diff "$basic" -type d
}

function test_0003() {
    find_diff "$basic" -type f
}

function test_0004() {
    find_diff "$basic" -mindepth 1
}

function test_0005() {
    find_diff "$basic" -maxdepth 1
}

function test_0006() {
    find_diff "$basic" -mindepth 1 -depth
}

function test_0007() {
    find_diff "$basic" -mindepth 2 -depth
}

function test_0008() {
    find_diff "$basic" -maxdepth 1 -depth
}

function test_0009() {
    find_diff "$basic" -maxdepth 2 -depth
}

function test_0010() {
    find_diff "$basic" -name '*f*'
}

function test_0011() {
    find_diff "$basic" -path "$basic/*f*"
}

function test_0012() {
    find_diff "$perms" -executable
}

function test_0013() {
    find_diff "$perms" -readable
}

function test_0014() {
    find_diff "$perms" -writable
}

function test_0015() {
    find_diff "$basic" -empty
}

function test_0016() {
    find_diff "$basic" -gid "$(id -g)" && \
        find_diff "$basic" -gid +0 && \
        find_diff "$basic" -gid -10000
}

function test_0017() {
    find_diff "$basic" -uid "$(id -u)" && \
        find_diff "$basic" -uid +0 && \
        find_diff "$basic" -uid -10000
}

function test_0018() {
    find_diff "$basic" -newer "$basic/e/f"
}

function test_0019() {
    find_diff "$basic" -cnewer "$basic/e/f"
}

function test_0020() {
    find_diff "$links" -links 2 && \
        find_diff "$links" -links -2 && \
        find_diff "$links" -links +1
}

function test_0021() {
    find_diff -P "$links/d/e/f" && \
        find_diff -P "$links/d/e/f/"
}

function test_0022() {
    find_diff -H "$links/d/e/f" && \
        find_diff -H "$links/d/e/f/"
}

function test_0023() {
    find_diff -H "$links" -newer "$links/d/e/f"
}

function test_0024() {
    find_diff -H "$links/d/e/i"
}

function test_0025() {
    find_diff -L "$links" 2>/dev/null
}

function test_0026() {
    find_diff "$links" -follow 2>/dev/null
}

function test_0027() {
    find_diff -L "$links" -depth 2>/dev/null
}

function test_0028() {
    find_diff "$links" -samefile "$links/a"
}

function test_0029() {
    find_diff "$links" -xtype l
}

function test_0030() {
    find_diff "$links" -xtype f
}

function test_0031() {
    find_diff -L "$links" -xtype l 2>/dev/null
}

function test_0032() {
    find_diff -L "$links" -xtype f 2>/dev/null
}

function test_0033() {
    find_diff "$basic/a" -name 'a'
}

function test_0034() {
    find_diff "$basic/g/" -name 'g'
}

function test_0035() {
    find_diff "/" -maxdepth 0 -name '/' 2>/dev/null
}

function test_0036() {
    find_diff "//" -maxdepth 0 -name '/' 2>/dev/null
}

function test_0037() {
    find_diff "$basic" -iname '*F*'
}

function test_0038() {
    find_diff "$basic" -ipath "$basic/*F*"
}

function test_0039() {
    find_diff "$links" -lname '[aq]'
}

function test_0040() {
    find_diff "$links" -ilname '[AQ]'
}

function test_0041() {
    find_diff -L "$links" -lname '[aq]' 2>/dev/null
}

function test_0042() {
    find_diff -L "$links" -lname '[AQ]' 2>/dev/null
}

function test_0043() {
    find_diff -L "$basic" -user "$(id -un)"
}

function test_0044() {
    find_diff -L "$basic" -user "$(id -u)"
}

function test_0045() {
    find_diff -L "$basic" -group "$(id -gn)"
}

function test_0046() {
    find_diff -L "$basic" -group "$(id -g)"
}

function test_0047() {
    find_diff "$basic" -daystart -mtime 0
}

function test_0048() {
    find_diff "$basic" -daystart -daystart -mtime 0
}

function test_0049() {
    find_diff "$basic" -newermc "$basic/e/f"
}

function test_0050() {
    find_diff "$basic" -size 0
}

function test_0051() {
    find_diff "$basic" -size +0
}

function test_0052() {
    find_diff "$basic" -size +0c
}

function test_0053() {
    find_diff "$basic" -size 9223372036854775807
}

function test_0054() {
    find_diff "$basic" -exec echo '{}' ';'
}

function test_0055() {
    find_diff "$basic" -exec echo '-{}-' ';'
}

function test_0056() {
    find_diff "$basic" -execdir pwd ';'
}

function test_0057() {
    find_diff "$basic" -execdir echo '{}' ';'
}

function test_0058() {
    find_diff "$basic" -execdir echo '-{}-' ';'
}

function test_0059() {
    find_diff "$basic" \( -name '*f*' \)
}

function test_0060() {
    find_diff "$basic" -name '*f*' -print , -print
}

function test_0061() {
    cd "$weirdnames"
    find_diff '-' '(-' '!-' ',' ')' './(' './!' \( \! -print , -print \)
}

function test_0062() {
    cd "$weirdnames"
    find_diff -L '-' '(-' '!-' ',' ')' './(' './!' \( \! -print , -print \)
}

function test_0063() {
    cd "$weirdnames"
    find_diff -L ',' -true
}

function test_0064() {
    cd "$weirdnames"
    find_diff -follow ',' -true
}

function test_0065() {
    find "$basic" -fprint "$scratch/out.find"
    "$BFS" "$basic" -fprint "$scratch/out.bfs"

    sort -o "$scratch/out.find" "$scratch/out.find"
    sort -o "$scratch/out.bfs" "$scratch/out.bfs"
    diff -u "$scratch/out.find" "$scratch/out.bfs"
}

function test_0066() {
    cd "$basic"
    find_diff -- -type f
}

function test_0067() {
    cd "$basic"
    find_diff -L -- -type f
}

function test_0068() {
    # Make sure -ignore_readdir_race doesn't suppress ENOENT at the root
    ! "$BFS" "$basic/nonexistent" -ignore_readdir_race 2>/dev/null
}

function test_0069() {
    rm -rf "$scratch"/*
    touch "$scratch"/{foo,bar}

    # -links 1 forces a stat() call, which will fail for the second file
    "$BFS" "$scratch" -mindepth 1 -ignore_readdir_race -links 1 -exec ./tests/remove-sibling.sh '{}' ';'
}

function test_0070() {
    find_diff "$perms" -perm 222 && \
        find_diff "$perms" -perm -222 && \
        find_diff "$perms" -perm /222
}

function test_0071() {
    find_diff "$perms" -perm 644 && \
        find_diff "$perms" -perm -644 && \
        find_diff "$perms" -perm /644
}

function test_0072() {
    find_diff "$perms" -perm a+r,u=wX,g+wX-w && \
        find_diff "$perms" -perm -a+r,u=wX,g+wX-w && \
        find_diff "$perms" -perm /a+r,u=wX,g+wX-w
}

function test_0073() {
    ! "$BFS" "$perms" -perm a+r, 2>/dev/null
}

function test_0074() {
    ! "$BFS" "$perms" -perm a+r,,u+w 2>/dev/null
}

function test_0075() {
    ! "$BFS" "$perms" -perm a 2>/dev/null
}

function test_0076() {
    find_diff "$perms" -perm -+rwx && \
        find_diff "$perms" -perm /+rwx
}

function test_0077() {
    ! "$BFS" "$perms" -perm +rwx 2>/dev/null
}

function test_0078() {
    ! "$BFS" "$perms" -perm +777 2>/dev/null
}

function test_0079() {
    # -ok should close stdin for the executed command
    yes | "$BFS" "$basic" -ok cat ';' 2>/dev/null
}

function test_0080() {
    # -okdir should close stdin for the executed command
    yes | "$BFS" "$basic" -okdir cat ';' 2>/dev/null
}

for i in {1..80}; do
    test="test_$(printf '%04d' $i)"

    if [ -t 1 ]; then
        printf '\r%s' "$test"
    fi

    ("$test" "$dir")
    status=$?

    if [ $status -ne 0 ]; then
        if [ -t 1 ]; then
            printf '\r%s failed!\n' "$test"
        else
            printf '%s failed!\n' "$test"
        fi
        exit $status
    fi
done

if [ -t 1 ]; then
    printf '\n'
fi