#!/bin/bash
# 金星探査機「あかつき」で撮影した画像を取得するスクリプト
#
# input 
echo "年月日 (yyyymmdd) を指定してください:"
read a
if [ -z $a ]
then
    echo "20160825 が指定されました."
    a=20160825
fi
echo "時刻 (hhmmss) を指定してください:"
read b
if [ -z $b ]
then
    echo "050333 が指定されました."
    b=050333
fi

c=`echo "$a""$b"`

# IR2  Calibrated Image Data のリストファイルを取得
wget -q http://darts.isas.jaxa.jp/pub/pds3/vco-v-ir2-3-cdr-v1.0/vcoir2_1001/browse/l2b/list.html

# list.html から必要な部分のみを切り出す
cat list.html | grep '<li>' | cut -b 12-59 > list.txt

# yyyymmddhhmmss 形式へ変換する
cut -f 4 -d " " list.txt | sed s/-/''/g | sed s/T/''/g | sed s/:/''/g > date.txt
cut -f 1 -d ":" list.txt > orbit.txt

# 軌道番号の候補二つを得る
# <ここから>
nmax=`wc -l date.txt | cut -f 1 -d " "`
i=0
while [ $i -ne $nmax ]
do
    i=`expr $i + 1`
    d=`sed -n "$i"p date.txt`
    diff=`expr $d - $c`                   # 差をとる
    diff=`echo "sqrt($diff^2)" | bc`      # 差を自然数へ変換する
    echo $diff >> diff.txt
done
paste -d "," orbit.txt diff.txt > compare.txt
on1=`sort -n -k 2 -t "," compare.txt | head -n 1 | cut -f 1 -d ","`
x=`expr $on1 + 1`
if [ $x -lt 10 ]
then
    on2=`echo 000"$x"`
else
    on2=`echo 00"$x"`
fi
# <ここまで>

# いったん不要なファイルを削除する
rm *txt

# 候補となる軌道番号に対する index.html を取得する
wget -q http://darts.isas.jaxa.jp/pub/pds3/vco-v-ir2-3-cdr-v1.0/vcoir2_1001/browse/l2b/r"$on1"/
mv index.html "$on1".html
wget -q http://darts.isas.jaxa.jp/pub/pds3/vco-v-ir2-3-cdr-v1.0/vcoir2_1001/browse/l2b/r"$on2"/
mv index.html "$on2".html

cat "$on1".html | grep jpg | cut -b 81-115 > "$on1"-html.txt
cat "$on2".html | grep jpg | cut -b 81-115 > "$on2"-html.txt

cat "$on1"-html.txt | cut -b 5-19 | sed s/_/''/g > "$on1"-number.txt
cat "$on2"-html.txt | cut -b 5-19 | sed s/_/''/g > "$on2"-number.txt

paste -d "," "$on1"-html.txt "$on1"-number.txt > "$on1".txt
paste -d "," "$on2"-html.txt "$on2"-number.txt > "$on2".txt

on1max=`wc -l "$on1".txt | cut -f 1 -d " "`
i=0
while [ $i -ne $on1max ]
do
    i=`expr $i + 1`
    d=`cut -d "," -f 2  "$on1".txt | sed -n "$i"p`
    diff=`expr $d - $c`
    diff=`echo "sqrt($diff^2)" | bc`
    echo $diff >> "$on1"-diff.txt
done
paste -d "," "$on1".txt "$on1"-diff.txt > "$on1"-compare.txt

on2max=`wc -l "$on2".txt | cut -f 1 -d " "`
i=0
while [ $i -ne $on2max ]
do
    i=`expr $i + 1`
    d=`cut -d "," -f 2 "$on2".txt| sed -n "$i"p`
    diff=`expr $d - $c`
    diff=`echo "sqrt($diff^2)" | bc`
    echo $diff >> "$on2"-diff.txt
done
paste -d "," "$on2".txt "$on2"-diff.txt > "$on2"-compare.txt

min1=`sort -n -k 3 -t "," "$on1"-compare.txt | head -n 1 | cut -f 3 -d ","`
min2=`sort -n -k 3 -t "," "$on2"-compare.txt | head -n 1 | cut -f 3 -d ","`

jpg1=`sort -n -k 3 -t "," "$on1"-compare.txt | head -n 1 | cut -f 1 -d ","`
jpg2=`sort -n -k 3 -t "," "$on2"-compare.txt | head -n 1 | cut -f 1 -d ","`

if [ $min1 -lt $min2 ]
then
    wget http://darts.isas.jaxa.jp/pub/pds3/vco-v-ir2-3-cdr-v1.0/vcoir2_1001/browse/l2b/r"$on1"/"$jpg1"
    eog "$jpg1" > nul 2>&1 &
else
    wget http://darts.isas.jaxa.jp/pub/pds3/vco-v-ir2-3-cdr-v1.0/vcoir2_1001/browse/l2b/r"$on2"/"$jpg2"
    eog "$jpg2" > nul 2>&1 &
fi

rm *.html *.txt nul