#!/bin/sh  
# \
exec oagtclsh "$0" "$@"

#
# input files: rfgunTriggers.sdds. rfgunMisc.sdds
#

set auto_path [linsert $auto_path 0  /usr/local/oag/apps/lib/$env(HOST_ARCH)]
set auto_path [linsert $auto_path 0 /usr/local/oag/lib_patch/$env(HOST_ARCH)]
APSStandardSetup

exec sddsexpand ./../glitchLogs/rfgunTriggers.sdds /tmp/rfgun.trig
set pages [exec sdds2stream -npages=bare /tmp/rfgun.trig]


eval exec sddscombine [APSReplicateItem -number $pages \
    -item ./../glitchLogs/rfgunMisc.sdds] -pipe=out \
    | sddsxref -pipe /tmp/rfgun.trig -leave=* -transfer=param,* \
    | sddsprocess -pipe=in /tmp/rfgun.atrig -nowarning \
    {"-test=column,i_page 1 =="}

puts "Comparing against master PV list"

exec sddssort -col=ControlName /tmp/rfgun.atrig \
    -pipe=out -unique -nowarn -numericHigh \
    | sddsprocess -pipe -edit=column,SimpleControlName,ControlName,S?/./K -nowarn \
    | tee /tmp/rfgun.atrig \
    | sddsconvert -pipe -fromPage=1 -toPage=1 \
    | sddsselect -pipe=in /home/helios/oagData/pvdata/iocRecNamesOAG.sdds \
    /tmp/rfgun2.atrig \
    -match=SimpleControlName=rec_name -nowarning -reuse

exec sddsconvert /tmp/rfgun.atrig -fromPage=2 -nowarn
exec sddscombine /tmp/rfgun2.atrig /tmp/rfgun.atrig -pipe=out \
    | sddsconvert -pipe=in ./../glitchLogs/rfgun.atrig \
    -delete=column,SimpleControlName -delete=parameter,NumberCombined,Filename -nowarn 

sdds load ./../glitchLogs/rfgun.atrig data
append data(ParameterNames) " InstallLocation"
set pages [llength $data(Column.[lindex $data(ColumnNames) 0])]
set location ""
for {set i 0} {$i < $pages} {incr i} {
    lappend location "/home/helios/oagData/glitchLogs/rfgun/rfgun.atrig"
}
set data(Parameter.InstallLocation) $location
set data(Layout.DataMode.Mode) "ascii"
sdds save ./../glitchLogs/rfgun.atrig data


file delete /tmp/rfgun.trig /tmp/rfgun.atrig /tmp/rfgun.atrig~ /tmp/rfgun2.atrig
