FIX_HEADER¶

when CLIENT_ACCEPTED {
    log local0. "Enable client side flow migration after server side is connected."
    BIGTCP::release_flow
}
when FIX_HEADER {
    set sender [FIX::tag get 49]
    set msg_type [FIX::tag get 35]
    set target [FIX::tag get 56]
    log local0. "FIX_HEADER: $sender-$msg_type-$target"
    if {$sender eq "client3"}{
        if {$msg_type eq "A"}{
            log local0. "Logon successfully: $sender-$msg_type-$target"
            set tags [list 49 35 56 8 9 98 108 141]
            foreach i $tags {
               set tagv [FIX::tag get $i]
               append tagA $tagv "-"
            }
            log local0. "Query A: $tagA"
            pool fix_pool2_13976
        }
        if {$msg_type eq "D"}{
            set tags [list 35 11 21 55 54 38 40 44]
            foreach i $tags {
               set tagv [FIX::tag get $i]
               append tagD $tagv "-"
            }
            log local0. "Query D: $tagD"
        }
    }
}
# If explicit flow migration is enabled then notify BIGTCP when to migrate the flow.
when SERVER_CONNECTED {
    log local0. "Migrate flow to ePVA once server side is connected."
    BIGTCP::release_flow
}