From: phk <phk@d4fa192b-c00b-0410-8231-f00ffab90ce4>
Date: Fri, 17 Oct 2008 18:54:07 +0000 (+0000)
Subject: Check that regexps are constant strings.
X-Git-Url: https://err.no/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=e9d3b55178fff49e721949d35ec3baabeadbfe87;p=varnish

Check that regexps are constant strings.



git-svn-id: svn+ssh://projects.linpro.no/svn/varnish/trunk@3318 d4fa192b-c00b-0410-8231-f00ffab90ce4
---

diff --git a/varnish-cache/lib/libvcl/vcc_parse.c b/varnish-cache/lib/libvcl/vcc_parse.c
index cbea1dbc..648f775b 100644
--- a/varnish-cache/lib/libvcl/vcc_parse.c
+++ b/varnish-cache/lib/libvcl/vcc_parse.c
@@ -250,6 +250,7 @@ Cond_String(const struct var *vp, struct tokenlist *tl)
 	switch (tl->t->tok) {
 	case '~':
 		vcc_NextToken(tl);
+		ExpectErr(tl, CSTR);
 		p = vcc_regexp(tl, 0);
 		vcc_NextToken(tl);
 		Fb(tl, 1, "VRT_re_match(%s, %s)\n", vp->rname, p);