when CLIENT_ACCEPTED {
  if { [clientside {IP::remote_addr}] == "192.168.201.1" } {
    set Debug_Enable true
    log local0.debug "[clientside {IP::remote_addr}]:[clientside {TCP::remote_port}] [clock format [clock seconds] -format {%d/%b/%Y:%H:%M:%S %z}]"
    TCP::collect
  } else {
    set Debug_Enable false
  }
}

when CLIENT_DATA {
  log local0.debug "[clientside {IP::remote_addr}]:[clientside {TCP::remote_port}] [clock format [clock seconds] -format {%d/%b/%Y:%H:%M:%S %z}]: L4_C>S [TCP::payload length] [b64encode [TCP::payload 512]]"
  TCP::release
}

when HTTP_REQUEST {
  if { [info exists Debug_Enable] && $Debug_Enable } {
    log local0.debug "[clientside {IP::remote_addr}]:[clientside {TCP::remote_port}] [clock format [clock seconds] -format {%d/%b/%Y:%H:%M:%S %z}]: L7_C>S Hd [HTTP::method] [HTTP::host] [HTTP::uri] HTTP/[HTTP::version]"
      foreach aHeader [HTTP::header names] {
        log local0.debug "[clientside {IP::remote_addr}]:[clientside {TCP::remote_port}] [clock format [clock seconds] -format {%d/%b/%Y:%H:%M:%S %z}]: L7_C>S Hd $aHeader: [HTTP::header values $aHeader]"
      }
      log local0.debug "[clientside {IP::remote_addr}]:[clientside {TCP::remote_port}] [clock format [clock seconds] -format {%d/%b/%Y:%H:%M:%S %z}]: L7_C>S Bd [b64encode [HTTP::payload 512]]"
      log local0.debug "[clientside {IP::remote_addr}]:[clientside {TCP::remote_port}] [clock format [clock seconds] -format {%d/%b/%Y:%H:%M:%S %z}]: --====================== ## ======================--"
    }
  }

when HTTP_REQUEST_SEND {
  if { [info exists Debug_Enable] && $Debug_Enable } {
    log local0.debug "[clientside {IP::remote_addr}]:[clientside {TCP::remote_port}] [clock format [clock seconds] -format {%d/%b/%Y:%H:%M:%S %z}]: Balanced to -> [serverside {IP::remote_addr}]:[serverside {TCP::remote_port}]"
    TCP::collect
  }
}

when SERVER_CONNECTED {
  # This logs information about the TCP connections on *both* sides of the full proxy
  set client_remote "[IP::client_addr]:[TCP::client_port]"
  set client_local  "[IP::local_addr clientside]:[TCP::local_port clientside]"
  set server_local  "[IP::local_addr]:[TCP::local_port]"
  set server_remote "[IP::server_addr]:[TCP::server_port]"
  log local0. "Connection: Client($client_remote)<->VS($client_local) ; BIG-IP($server_local)<->($server_remote)Server"
}

when SERVER_DATA {
  log local0.debug "[clientside {IP::remote_addr}]:[clientside {TCP::remote_port}] [clock format [clock seconds] -format {%d/%b/%Y:%H:%M:%S %z}]: Balancing from <- [serverside {IP::remote_addr}]:[serverside {TCP::remote_port}]"
  log local0.debug "[clientside {IP::remote_addr}]:[clientside {TCP::remote_port}] [clock format [clock seconds] -format {%d/%b/%Y:%H:%M:%S %z}]: L4_S>C [TCP::payload length] [b64encode [TCP::payload 512]]"
  TCP::release
}

when HTTP_RESPONSE {
  if { [info exists Debug_Enable] && $Debug_Enable } {
    log local0.debug "[clientside {IP::remote_addr}]:[clientside {TCP::remote_port}] [clock format [clock seconds] -format {%d/%b/%Y:%H:%M:%S %z}]: L7_S>C Hd HTTP/[HTTP::version] [HTTP::status]"
      foreach aHeader [HTTP::header names] {
      log local0.debug "[clientside {IP::remote_addr}]:[clientside {TCP::remote_port}] [clock format [clock seconds] -format {%d/%b/%Y:%H:%M:%S %z}]: L7_S>C Hd $aHeader: [HTTP::header value $aHeader]"
    }
    log local0.debug "[clientside {IP::remote_addr}]:[clientside {TCP::remote_port}] [clock format [clock seconds] -format {%d/%b/%Y:%H:%M:%S %z}]: L7_S>C Bd [b64encode [HTTP::payload 512]]"
    log local0.debug "[clientside {IP::remote_addr}]:[clientside {TCP::remote_port}] [clock format [clock seconds] -format {%d/%b/%Y:%H:%M:%S %z}]: --====================== ## ======================--"
  }
}