#! /bin/csh -f

date
source /home/jeneen/campaigns/scripts/env_list_bastet
setenv IDL_DIR /usr/local/rsi/idl_6.2

set today = `/bin/date +%Y.%m.%d`
@ today_day = `/home/jeneen/STAGING/bin/_linux4/time_index -d in=$today`
@ day = $today_day - 1
echo $day
@ day = 6135
#set eof_dir = `/home/jeneen/STAGING/bin/_linux4/peq  -w prog:mdi_eof,level:lev1.5,series:fd_M_96m_01d\[$day] | grep PDS | awk '{print $3}'`
set eof_dir = `/home/jeneen/STAGING/bin/_linux4/peq  -w prog:mdi_eof,level:lev1.8,series:fd_M_96m_01d\[$day] | grep PDS | awk '{print $3}'`
echo $eof_dir
cp -r $eof_dir /synoptic/eof/fd_M_96m_01d/fd_M_96m_01d.00$day

# mag summary images

rm /synoptic/nightly_images/mag_summary/fd_M.1993.01.01_00:00:00_TAI.gif
rm /synoptic/nightly_images/mag_summary/fd_M..gif
rm /synoptic/mag_images/fd_M..gif..QUICKLOOK.gif
rm /synoptic/mag_images/fd_M.1993.01.01_00:00:00_TAI.QUICKLOOK.gif

source /mdisw/setup/setup_mdisoi
/ssw/gen/setup/ssw_idl <<BAR
.run /synoptic/new_scripts/fivek.pro
fivek, $day
BAR

set yesterday = `/home/jeneen/STAGING/bin/_linux4/time_index -t day=$day | awk -F_ '{print $1}'`
cp /synoptic/nightly_images/mag_summary/fd_M.$yesterday.gif /synoptic/nightly_images/latest.gif

# latest intensity and magnetogram image


set int_dir = `/home/jeneen/STAGING/bin/_linux4/peq -A -w prog:mdi_eof,level:lev1.5,series:fd_Ic_6h_01d\[$day] | grep PDS | awk '{print $3}'`
set mag_dir = "/synoptic/eof/fd_M_96m_01d/fd_M_96m_01d.00$day"

foreach mag_img( `ls -1 $mag_dir/*fits | grep -v overview` )
/ssw/gen/setup/ssw_idl <<BAR
.run /home/jeneen/idl/eof_mag.pro
eof_mag, '$mag_img'
BAR
end

foreach int_img( `ls -1 $int_dir/*fits | grep -v overview` )
/ssw/gen/setup/ssw_idl <<BAR
.run /home/jeneen/idl/eof_intens.pro
eof_intens, '$int_img'
BAR
end

@ year = `echo $yesterday | awk -F\. '{print $1}'`
set mo = `echo $yesterday | awk -F\. '{print $2}'`
echo "$year $mo"
if ( $mo == "01" ) then
  set month = January
else if ( $mo == "02" ) then
  set month = February 
else if ( $mo == "03" ) then
  set month = March
else if ( $mo == "04" ) then
  set month = April
else if ( $mo == "05" ) then
  set month = May
else if ( $mo == "06" ) then
  set month = June
else if ( $mo == "07" ) then
  set month = July
else if ( $mo == "08" ) then
  set month = August
else if ( $mo == "09" ) then
  set month = September
else if ( $mo == "10" ) then
  set month = October
else if ( $mo == "11" ) then
  set month = November
else if ( $mo == "12" ) then
  set month = December
endif 

#cp `ls -1 /synoptic/nightly_images/mag_gifs/*$year* | tail -1` /synoptic/nightly_images/latestmag.gif 
foreach i ( `ls -1 /synoptic/nightly_images/mag_gifs/MDI_mag_$yesterday*` )
  set timestamp = `echo $i | awk -F\_ '{print $5"_"$6}'`
  cp $i /synoptic/gifs/magnetograms/$year/$month/QUICK_LOOK_$timestamp
end

#cp `ls -1 /synoptic/nightly_images/int_gifs/*$year* | tail -1` /synoptic/nightly_images/latestint.gif
foreach i ( `ls -1 /synoptic/nightly_images/int_gifs/MDI_intens_$yesterday*` )
  set timestamp = `echo $i | awk -F\_ '{print $5"_"$6}'`
  cp $i /synoptic/gifs/intensitygrams/dark/$year/$month/QUICK_LOOK_$timestamp
end

#cp `ls -1 /synoptic/nightly_images/mag_summary/* | tail -1` /synoptic/nightly_images/latest.gif
foreach eof_file ( `ls -1 /synoptic/nightly_images/mag_summary` )
  set date = `echo /synoptic/nightly_images/mag_summary/$eof_file | awk -F\. '{print $2"."$3"."$4}'`
  @ d = `time_index -d in=$date`
  if ( -e /synoptic/mag_images/fd_M.$d.ps ) then
    rm /synoptic/nightly_images/mag_summary/fd_M.$date.gif
  endif
  ln -s /synoptic/nightly_images/mag_summary/$eof_file /synoptic/mag_images/fd_M.$date.QUICKLOOK.gif
end