zafer
Sep 10, 2007Nimbostratus
convert v9x to v4x
Hello,
how can i change this code for v4.x
best regards
zafer
when RULE_INIT {
These are global variables
set ::time [clock seconds]
set ::poolb_selected 0
log local0. "second time from epoc is: $::time"
}
when CLIENT_ACCEPTED {
set persist_time 180
if { [active_nodes poolA] == 0} {
log local0. "poolA is failing..."
if { $::poolb_selected equals 0 } {
log local0. "poolB value is: 0"
set ::time [clock seconds]
set ::poolb_selected 1
pool poolB
persist source_addr 180
} else {
log "poolB value is: $::poolb_selected"
pool poolB
}
} else {
log local0. "poolA is available..."
if { $::poolb_selected == 0 } {
log "poolA never went down"
} else {
log "poolb_selected value is: $::poolb_selected"
set curtime [clock seconds]
set expirationTime [expr {$::time + $persist_time}]
if { $curtime > $expirationTime } {
set ::poolb_selected 0
pool poolA
} else {
pool poolB
}
}
}
}