Collect and process new payload from same TCP session

Hi Nitass,

 

 

 

just attempted to test but im having the error below. I made some random tests adding LB::detach, tcp::close, return...but to no avail. I can see it already started to read the second payload which should be the last but seems it cannot forward to the correct pool as there's already an existing connection. Any thoughts?

 

 

Nov 5 21:20:40 local/tmm info tmm[5266]: Rule test_tx_irule5 : Payload is 186

 

Nov 5 21:20:40 local/tmm info tmm[5266]: Rule test_tx_irule5 : PAYLOAD Matched 000000

 

Nov 5 21:20:40 local/tmm info tmm[5266]: Rule test_tx_irule5 : PAYLOAD 000000 goes to Pool 2

 

Nov 5 21:20:53 local/tmm info tmm[5266]: Rule test_tx_irule5 : Payload is 314

 

Nov 5 21:20:53 local/tmm info tmm[5266]: Rule test_tx_irule5 : PAYLOAD Matched 000001

 

Nov 5 21:20:53 local/tmm info tmm[5266]: Rule test_tx_irule5 : PAYLOAD 000001 goes to Pool 1

 

Nov 5 21:20:53 local/tmm info tmm[5266]: Rule test_tx_irule5 : 000001

 

Nov 5 21:20:53 local/tmm err tmm[5266]: 01220001:3: TCL error: test_irule5 - Address in use (line 1) i nvoked from within "pool Pool1"

 

 

 

 

when CLIENT_ACCEPTED {

 

TCP::collect

 

}

 

 

when CLIENT_DATA {

 

 

use pool2 by default

 

pool Pool1

 

 

set mero [TCP::payload]

 

log local0. $mero

 

Start reading at the 5th byte and save 6 characters to $match

 

if {[binary scan $mero x5a6 match] == 1}{

 

log local0. "Matched $match"

 

if { $match eq "000001" } {

 

log local0. "PAYLOAD $match goes to Pool 1"

 

log local0. $match

 

pool Pool1

 

} else {

 

log local0. "PAYLOAD $match goes to Pool 2 "

 

pool Pool2

 

}

 

 

}

 

TCP::release

 

TCP::notify request

 

TCP::collect

 

}

 

 

 

Many thanks,

 

 

lez