#!/bin/bash

# Tests map on all input/*.csv

# Usage: env [n=<num-rows>] self

selfDir="$(dirname -- "$0")"

cd "$selfDir"

shopt -s nullglob

test -n "$n" || export n=2

. ../util/env_password in_password

# Update generated mappings

../../mappings/extract_plot_map

../../mappings/join_all_vegbank

function trace()

{

    (

        echo -n "$PS4"

        for arg in "$@"; do printf "%q " "$arg"; done

        echo "${_in+<$_in}" "${_out+>$_out}"

    ) >&2

}

function fromCsv()

{

    (_in="$in"; trace)

    "$1" <"$in" || exit

}

function fromDb()

{

    trace . "$in"

    (. "$in"; "$1") || exit

}

function toXml()

{

    out="$stem.$out_fmt.xml"

    (set -x; ../map "../../mappings/$src-$out_fmt.$table.csv" >"output/$out"\

    && diff "accepted_output/$out" "output/$out")

}

function toDb()

{

    (set -x; ../map2vegbank "../../mappings/$src-VegBank.$table.csv")

}

for in in input/*.{csv,sh}; do

    ext="${in##*.}" # after last "."

    stem="$(basename -- "${in%.*}")" # remove extension and dir

    src="${stem%.*}" # before last "."

    table="${stem##*.}" # after last "."

    # Test exporting to XML

    for out_fmt in VegX VegBank; do

        if test "$ext" == "csv"; then fromCsv toXml

        elif test "$ext" == "sh"; then fromDb toXml

        fi

    done

    # Test exporting to VegBank db

    if test "$ext" == "csv"; then fromCsv toDb

    elif test "$ext" == "sh"; then fromDb toDb

    fi

done