#!/bin/bash
# usage:
#   bsb2kal-all *.kap
#
# convert all BSB/KAP calibration to Glopus KAL files

if [ $# -eq 0 ]; then
  echo 'Syntax: bsb2kal bsb2kal-all *.kap'
  exit
fi

for name in "$@"; do 

map=$name
base=${map%.*}
image=$base.tif

sz=`head -n 20 "$map" | grep "NU=" | sed "s/.*RA=\(.*\),\(.*\),.*/\1 \2/g"`

p1=`head -n 20 "$map" | grep "REF/1" | sed "s/^REF.*,\(.*\),\(.*\),\(.*\),\(.*\)/\4 \3 \1 \2/g"`
p2=`head -n 20 "$map" | grep "REF/2" | sed "s/^REF.*,\(.*\),\(.*\),\(.*\),\(.*\)/\4 \3 \1 \2/g"`
p3=`head -n 20 "$map" | grep "REF/3" | sed "s/^REF.*,\(.*\),\(.*\),\(.*\),\(.*\)/\4 \3 \1 \2/g"`
p4=`head -n 20 "$map" | grep "REF/4" | sed "s/^REF.*,\(.*\),\(.*\),\(.*\),\(.*\)/\4 \3 \1 \2/g"`

echo -e $p1 "\n" $p2 "\n" $p3 "\n" $p4 | asc2kal "$image" $sz > "$base.kal"

done
