1 |
53
|
aaronmk
|
#!/bin/bash
|
2 |
106
|
aaronmk
|
# Tests map on all input/*.csv
|
3 |
|
|
# Usage: env [n=<num-rows>] self
|
4 |
53
|
aaronmk
|
|
5 |
|
|
selfDir="$(dirname -- "$0")"
|
6 |
|
|
cd "$selfDir"
|
7 |
|
|
|
8 |
118
|
aaronmk
|
shopt -s nullglob
|
9 |
|
|
|
10 |
53
|
aaronmk
|
test -n "$n" || n=2
|
11 |
131
|
aaronmk
|
let n++ # account for header row
|
12 |
53
|
aaronmk
|
|
13 |
131
|
aaronmk
|
. ../util/env_password in_password
|
14 |
|
|
|
15 |
|
|
|
16 |
106
|
aaronmk
|
# Update generated mappings
|
17 |
|
|
../../mappings/extract_plot_map
|
18 |
|
|
../../mappings/join_all_vegbank
|
19 |
53
|
aaronmk
|
|
20 |
118
|
aaronmk
|
function importCsv()
|
21 |
|
|
{
|
22 |
|
|
(set -x; head -"$n" "$in")
|
23 |
|
|
}
|
24 |
|
|
|
25 |
|
|
function exportXml()
|
26 |
|
|
{
|
27 |
127
|
aaronmk
|
out="$stem.$out_fmt.xml"
|
28 |
118
|
aaronmk
|
(set -x; ../map "../../mappings/$src-$out_fmt.$table.csv" >"output/$out"\
|
29 |
|
|
&& diff "accepted_output/$out" "output/$out")
|
30 |
|
|
}
|
31 |
|
|
|
32 |
|
|
function exportDb()
|
33 |
|
|
{
|
34 |
|
|
(set -x; ../map2vegbank "../../mappings/$src-VegBank.$table.csv")
|
35 |
|
|
}
|
36 |
|
|
|
37 |
|
|
for in in input/*.{csv,sh}; do
|
38 |
|
|
ext="${in##*.}" # after last "."
|
39 |
|
|
stem="$(basename -- "${in%.*}")" # remove extension and dir
|
40 |
106
|
aaronmk
|
src="${stem%.*}" # before last "."
|
41 |
118
|
aaronmk
|
table="${stem##*.}" # after last "."
|
42 |
106
|
aaronmk
|
|
43 |
|
|
# Test exporting to XML
|
44 |
118
|
aaronmk
|
for out_fmt in VegX VegBank; do
|
45 |
127
|
aaronmk
|
if test "$ext" == "csv"; then importCsv|exportXml
|
46 |
|
|
elif test "$ext" == "sh"; then (. "$in"; exportXml)
|
47 |
118
|
aaronmk
|
fi
|
48 |
106
|
aaronmk
|
done
|
49 |
|
|
|
50 |
|
|
# Test exporting to VegBank db
|
51 |
127
|
aaronmk
|
if test "$ext" == "csv"; then importCsv|exportDb
|
52 |
|
|
elif test "$ext" == "sh"; then (. "$in"; exportDb)
|
53 |
118
|
aaronmk
|
fi
|
54 |
106
|
aaronmk
|
done
|