#!/bin/sh
#
# ========================================================================
#
# *
# * This file is part of MARS, the MAGIC Analysis and Reconstruction
# * Software. It is distributed to you in the hope that it can be a useful
# * and timesaving tool in analysing Data of imaging Cerenkov telescopes.
# * It is distributed WITHOUT ANY WARRANTY.
# *
# * Permission to use, copy, modify and distribute this software and its
# * documentation for any purpose is hereby granted without fee,
# * provided that the above copyright notice appear in all copies and
# * that both that copyright notice and this permission notice appear
# * in supporting documentation. It is provided "as is" without express
# * or implied warranty.
# *
#
#
#   Author(s): Daniela Dorner  08/2004 <mailto:dorner@astro.uni-wuerzburg.de>
#
#   Copyright: MAGIC Software Development, 2000-2007
#
#
# ========================================================================
#
# This script launches the checking of the availability of the files for 
# the datasets. 
#
# After checking if the script is already running the todolist is written.
# Then for each dataset the sequences are extracted from the datasetfile 
# and for each sequence the availability of the star files checked by using 
# the macro checkstardone.C 
# If this was successful, the status is inserted into the database using 
# the function setstatus.
#

source `dirname $0`/sourcefile
printprocesslog "INFO starting $0"
program=writedatasetfiles
column=fDataSetFileWritten

scriptlog=$runlogpath/$program-$datetime.log
date >> $scriptlog 2>&1

# check if script is already running
lockfile=$lockpath/lock-$program.txt
checklock  >> $scriptlog 2>&1

# get todo list
getdolist  >> $scriptlog 2>&1

datasets=(`cat $todofile`)
if [ "$datasets" = "" ]
then 
   echo "nothing to do -> exit"  >> $scriptlog 2>&1
   finish >> $scriptlog 2>&1
fi
echo "datasets: "${datasets[@]} >> $scriptlog 2>&1
rm -v $todofile >> $scriptlog 2>&1

cd $mars

for dataset in ${datasets[@]}
do 
   echo "writing dataset file for dataset $dataset..." >> $scriptlog 2>&1 
   printprocesslog "INFO writing datasetfile for dataset $dataset"
   no=`printf %08d $dataset | cut -c 0-5`
   no2=`printf %08d $dataset`
   datasetpathcpl=$datasetpath/$no
   makedir $datasetpathcpl >> $scriptlog 2>&1 
   writedatasetfilelogpath=$logpath/$program/$no
   makedir $writedatasetfilelogpath >> $scriptlog 2>&1 
   logfile=$writedatasetfilelogpath/$program-$no2.log

   primvar=$dataset
   setstatus "start" >> $scriptlog 2>&1
   
   check1=`root -q -b $macrospath/writedatasetfile.C+\($dataset\,\""$datasetpathcpl\""\) | tee $logfile | intgrep`

   case $check1 in
      1)   echo " check1=$check1 -> everything ok" >> $scriptlog 2>&1 
           printprocesslog "INFO wrote datasetfile for dataset $dataset successfully"
           ;;
      0)   echo " check1=$check1 -> no connection to db -> continue..." >> $scriptlog 2>&1 
           printprocesslog "WARN connection to DB failed"
           check="no"
           ;;
      *)   echo " check1=$check1 -> ERROR " >> $scriptlog 2>&1 
           printprocesslog "ERROR writedatasetfile.C failed"
           com=$Fwritedatasetfile
           check=$check1
           ;;
   esac
   
   setstatus "stop" >> $scriptlog 2>&1
done

finish >> $scriptlog 2>&1

