reedsolomon-0.0.4.0: cbits/compare-isa.sh

#!/bin/bash -ue

HOST_ISA=`uname -p`

function build_for_arch() {
    local isa=$1
    shift
    local backend=$1
    shift
    local cflags=${1:-}
    local exec_suffix=${2:-}

    PATH=~/x-tools/$isa/bin:$PATH ./configure --host=$isa CFLAGS="$cflags"
    PATH=~/x-tools/$isa/bin:$PATH make reedsolomon-gal-mul-stdio${exec_suffix}
    mv reedsolomon-gal-mul-stdio${exec_suffix} reedsolomon-gal-mul-stdio-$isa-$backend${exec_suffix}
    make clean
}

function test_arch() {
    local qemu_arch=$1
    shift
    local isa=$1
    shift
    local backend=$1
    local qemu_cpu=''
    if test -n ${2:-''}; then
        qemu_cpu="-cpu ${2}"
    fi

    echo "Validating $isa with backend $backend on ${2:-generic}"
    stack runhaskell reedsolomon-gal-mul-stdio-quickcheck.hs -- \
        ./reedsolomon-gal-mul-stdio-$HOST_ISA-native \
        "qemu-$qemu_arch $qemu_cpu -L ~/x-tools/$isa/$isa/sysroot ./reedsolomon-gal-mul-stdio-$isa-$backend"
    echo
}

function test_wine() {
    local isa=$1

    echo "Validating $isa with Wine"
    WINEDEBUG=fixme-all \
        stack runhaskell reedsolomon-gal-mul-stdio-quickcheck.hs -- \
            ./reedsolomon-gal-mul-stdio-$HOST_ISA-native \
            "wine ./reedsolomon-gal-mul-stdio-$isa-generic.exe"
    echo
}

build_for_arch $HOST_ISA native
build_for_arch armv7-rpi2-linux-gnueabihf generic '-mfpu=vfp'
build_for_arch armv7-rpi2-linux-gnueabihf neon '-mfpu=neon'
# My PPC64 x-tools require `-static` for executables to work with `qemu-ppc64`
build_for_arch powerpc64-unknown-linux-gnu generic '-static'
build_for_arch powerpc64-unknown-linux-gnu altivec '-static -maltivec'
build_for_arch powerpc64-unknown-linux-gnu altivec-power8 '-static -mcpu=power8'
build_for_arch aarch64-unknown-linux-musleabi generic '-static'
build_for_arch i686-w64-mingw32 generic '' '.exe'
build_for_arch x86_64-w64-mingw32 generic '' '.exe'

test_arch arm armv7-rpi2-linux-gnueabihf generic
test_arch arm armv7-rpi2-linux-gnueabihf neon
test_arch ppc64 powerpc64-unknown-linux-gnu generic
test_arch ppc64 powerpc64-unknown-linux-gnu altivec
test_arch ppc64 powerpc64-unknown-linux-gnu altivec-power8 POWER8
test_arch aarch64 aarch64-unknown-linux-musleabi generic
test_wine i686-w64-mingw32
test_wine x86_64-w64-mingw32