65 lines
2.2 KiB
Plaintext
65 lines
2.2 KiB
Plaintext
varnishtest "Health-checks: some http-check expect tests"
|
|
feature ignore_unknown_macro
|
|
#REQUIRE_VERSION=2.2
|
|
#REGTEST_TYPE=slow
|
|
# This script tests http-check expect rules.
|
|
|
|
server s1 {
|
|
rxreq
|
|
expect req.method == OPTIONS
|
|
expect req.url == /
|
|
expect req.proto == HTTP/1.0
|
|
txresp -status 202 \
|
|
-hdr "x-test1: true, next value" \
|
|
-hdr "x-test2: true, begin-value, value-end, value-sub-string, value-reg-123ABC" \
|
|
-hdr "x-begin-test: 1" \
|
|
-hdr "x-test-end: 1" \
|
|
-hdr "x-sub-test: 1" \
|
|
-hdr "x-reg-test1: 1" \
|
|
-hdr "x-hdr-name: x-test1"
|
|
} -start
|
|
|
|
syslog S1 -level notice {
|
|
recv
|
|
expect ~ "[^:\\[ ]\\[${h1_pid}\\]: Health check for server be1/srv succeeded.*code: 202"
|
|
} -start
|
|
|
|
haproxy h1 -conf {
|
|
defaults
|
|
mode http
|
|
timeout client 1s
|
|
timeout server 1s
|
|
timeout connect 100ms
|
|
option log-health-checks
|
|
|
|
backend be1
|
|
log ${S1_addr}:${S1_port} len 2048 local0
|
|
option httpchk
|
|
http-check expect status 200-399
|
|
|
|
http-check expect hdr name "x-test1"
|
|
http-check expect hdr name -m str "X-Test2"
|
|
http-check expect hdr name -m beg "X-Begin-"
|
|
http-check expect hdr name -m end "-End"
|
|
http-check expect hdr name -m sub "-Sub-"
|
|
http-check expect hdr name -m reg "^[a-z]+-Reg-[a-z]+[0-9]\$"
|
|
http-check set-var(check.hdr_name) res.fhdr(x-hdr-name)
|
|
http-check expect hdr name-lf -m str "%[var(check.hdr_name)]"
|
|
http-check expect hdr name-lf -m str "%[res.fhdr(x-hdr-name)]"
|
|
|
|
http-check expect fhdr name "x-test1" value "true, next value"
|
|
http-check expect hdr name "x-test2" value -m str "true"
|
|
http-check expect hdr name -m beg "x-test" value -m beg "begin-"
|
|
http-check expect hdr name -m beg "x-test" value -m end "-end"
|
|
http-check expect hdr name -m beg "x-test" value -m sub "-sub-"
|
|
http-check expect hdr name -m beg "x-test" value -m reg "^value-reg-[A-Z0-9]+\$"
|
|
http-check expect fhdr name -m beg "x-test" value -m reg "value-reg-[A-Z0-9]+"
|
|
http-check set-var(check.hdr_value) str(x-test1)
|
|
http-check expect hdr name -m beg "x-" value-lf -m str "%[var(check.hdr_value)]"
|
|
http-check expect fhdr name -m beg "x-" value-lf -m str "%[res.fhdr(x-hdr-name)]"
|
|
|
|
server srv ${s1_addr}:${s1_port} check inter 100ms rise 1 fall 1
|
|
} -start
|
|
|
|
syslog S1 -wait
|