varnishtest "tcp-check negative bounded regex match"
#EXCLUDE_TARGETS=freebsd,osx,generic
#REGTEST_TYPE=slow
#REQUIRE_VERSION=2.2
# This test use a negative expect rule and verify that setting a required
# minimum amount of data to match.
feature ignore_unknown_macro

syslog S1 -level notice {
    recv
    expect ~ "[^:\\[ ]\\[${h1_pid}\\]: Health check for server be1/srv1 failed, reason: Layer7 timeout.*at step 2 of tcp-check"
} -start

syslog S2 -level notice {
    recv
    expect ~ "[^:\\[ ]\\[${h1_pid}\\]: Health check for server be2/srv1 succeeded"
} -start

server s1 {
    send "valid"
    delay 0.2
    expect_close
} -start

server s2 {
    send "valid"
    recv 10
    send "valid"
    delay 0.2
    expect_close
} -start

haproxy h1 -conf {
  defaults
    mode tcp
    timeout connect "${HAPROXY_TEST_TIMEOUT-5s}"
    timeout check "${HAPROXY_TEST_TIMEOUT-5s}"
    timeout server "${HAPROXY_TEST_TIMEOUT-5s}"
    timeout client "${HAPROXY_TEST_TIMEOUT-5s}"

  backend be1
    # must fail fast
    timeout check 1
    timeout server 1
    log ${S1_addr}:${S1_port} len 2048 local0
    option tcp-check
    option log-health-checks
    tcp-check connect
    tcp-check expect !rstring "^error" comment "negative check"
    tcp-check expect string "valid" comment "positive check"
    tcp-check send "0123456789"
    tcp-check expect string "valid" comment "positive check"
    server srv1 ${s1_addr}:${s1_port} check inter 200ms rise 1 fall 1

  backend be2
    log ${S2_addr}:${S2_port} len 2048 local0
    option tcp-check
    option log-health-checks
    tcp-check connect
    tcp-check expect min-recv 5 !rstring "^error" comment "negative check"
    tcp-check expect string "valid" comment "positive check"
    tcp-check send "0123456789"
    tcp-check expect string "valid" comment "positive check"
    server srv1 ${s2_addr}:${s2_port} check inter 200ms rise 1 fall 1
} -start

syslog S1 -wait
syslog S2 -wait