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

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)]

set time [clock seconds]
set hour [clock format $time -format %H]
if {$hour==0} {
    #do previous day
    set time [expr $time - 3600]
}
set date [clock format $time -format %Y-%m%d]
if {![file exists /home/helios/oagData/booster/ramps/IRamp/rampLogFiles/$date]} {
    exit
}

cd /home/helios/oagData/booster/ramps/IRamp/rampLogFiles/$date

foreach magnet {BM SF SD QF QD} {
    foreach type {new log} ext {afg100 file}  {
        set files [glob -nocomplain ${magnet}${type}*.$ext]
        if [llength $files]<20 {
            continue
        }
        set files [lsort -increasing $files]
        set len [llength $files]
        set count 0
        while {$count<$len} {
            set file1 [lrange $files $count [expr $count+19]]
            if {$hour!=0 && [llength $file1]<20} {
                break
            }
            set root1 [file root [lindex $file1 0]]
            set root2 [file root [lindex $file1 end]]
            if [catch {eval exec sddscombine $file1 ${root1}-${root2} -over} result] {
                return -code error $result
            }
            set count [expr $count + 20]
            exec xz ${root1}-${root2}
            eval file delete -force $file1
        }
    }
}


exit 0


