mirror of
http://git.haproxy.org/git/haproxy.git/
synced 2024-12-12 14:35:14 +00:00
5d0dd88ac6
"get var" on the CLI was also missing an LF, and the vtest as well, so
that fixing only the code breaks the vtest. This must be backported to
2.4 as the issue was brought with commit c35eb38f1d ("MINOR: vars/cli:
add a "get var" CLI command to retrieve global variables").
85 lines
3.2 KiB
Plaintext
85 lines
3.2 KiB
Plaintext
varnishtest "Test a few set-var() in global, tcp and http rule sets, at different scopes"
|
|
feature cmd "$HAPROXY_PROGRAM -cc 'version_atleast(2.5-dev5)'"
|
|
|
|
feature ignore_unknown_macro
|
|
|
|
haproxy h1 -conf {
|
|
global
|
|
# note below, str60 is purposely not defined so that the default is used
|
|
set-var proc.int12 int(12)
|
|
set-var proc.int5 var(proc.str60,60),div(proc.int12)
|
|
set-var proc.str1 str("this is")
|
|
set-var proc.str2 str("a string")
|
|
set-var proc.str var(proc.str1)
|
|
set-var-fmt proc.str "%[var(proc.str)] a string"
|
|
set-var proc.uuid uuid()
|
|
|
|
defaults
|
|
mode http
|
|
timeout connect "${HAPROXY_TEST_TIMEOUT-5s}"
|
|
timeout client "${HAPROXY_TEST_TIMEOUT-5s}"
|
|
timeout server "${HAPROXY_TEST_TIMEOUT-5s}"
|
|
|
|
frontend fe1
|
|
bind "fd@${fe1}"
|
|
tcp-request session set-var-fmt(sess.str3) "%[var(proc.str1)] %[var(proc.str2)]"
|
|
tcp-request session set-var(sess.int5) var(proc.int5)
|
|
tcp-request session set-var(proc.int5) var(proc.int5),add(sess.int5) ## proc. becomes 10
|
|
tcp-request content set-var-fmt(req.str4) "%[var(sess.str3),regsub(is a,is also a)]"
|
|
http-request set-var-fmt(txn.str5) "%[var(req.str4)]"
|
|
http-request set-var(req.int5) var(sess.int5)
|
|
http-request set-var(sess.int5) var(sess.int5),add(req.int5) ## sess. becomes 10 first time, then 15...
|
|
http-request return status 200 hdr x-var "proc=%[var(proc.int5)] sess=%[var(sess.int5)] req=%[var(req.int5)] str=%[var(proc.str)] str5=%[var(txn.str5)] uuid=%[var(proc.uuid)]"
|
|
} -start
|
|
|
|
haproxy h1 -cli {
|
|
send "get var proc.int5"
|
|
expect ~ "^proc.int5: type=sint value=<5>"
|
|
}
|
|
|
|
client c1 -connect ${h1_fe1_sock} {
|
|
txreq -req GET -url /req1_1
|
|
rxresp
|
|
expect resp.status == 200
|
|
expect resp.http.x-var ~ "proc=10 sess=10 req=5 str=this is a string str5=this is also a string uuid=[0-9a-f]*-[0-9a-f]*-[0-9a-f]*-[0-9a-f]*-[0-9a-f]*"
|
|
|
|
txreq -req GET -url /req1_2
|
|
rxresp
|
|
expect resp.status == 200
|
|
expect resp.http.x-var ~ "proc=10 sess=20 req=10 str=this is a string str5=this is also a string uuid=[0-9a-f]*-[0-9a-f]*-[0-9a-f]*-[0-9a-f]*-[0-9a-f]*"
|
|
} -run
|
|
|
|
haproxy h1 -cli {
|
|
send "get var proc.int5"
|
|
expect ~ "^proc.int5: type=sint value=<10>"
|
|
}
|
|
|
|
client c2 -connect ${h1_fe1_sock} {
|
|
txreq -req GET -url /req2_1
|
|
rxresp
|
|
expect resp.status == 200
|
|
expect resp.http.x-var ~ "proc=20 sess=20 req=10 str=this is a string str5=this is also a string uuid=[0-9a-f]*-[0-9a-f]*-[0-9a-f]*-[0-9a-f]*-[0-9a-f]*"
|
|
|
|
txreq -req GET -url /req2_2
|
|
rxresp
|
|
expect resp.status == 200
|
|
expect resp.http.x-var ~ "proc=20 sess=40 req=20 str=this is a string str5=this is also a string uuid=[0-9a-f]*-[0-9a-f]*-[0-9a-f]*-[0-9a-f]*-[0-9a-f]*"
|
|
} -run
|
|
|
|
haproxy h1 -cli {
|
|
send "get var proc.int5"
|
|
expect ~ "^proc.int5: type=sint value=<20>"
|
|
}
|
|
|
|
haproxy h1 -cli {
|
|
send "experimental-mode on; set var proc.str str(updating); set var proc.str fmt %[var(proc.str),regsub(ing,ed)]"
|
|
expect ~ .*
|
|
}
|
|
|
|
client c3 -connect ${h1_fe1_sock} {
|
|
txreq -req GET -url /req3_1
|
|
rxresp
|
|
expect resp.status == 200
|
|
expect resp.http.x-var ~ "proc=40 sess=40 req=20 str=updated str5=this is also a string uuid=[0-9a-f]*-[0-9a-f]*-[0-9a-f]*-[0-9a-f]*-[0-9a-f]*"
|
|
} -run
|