#
-# $Id: cf.data.pre,v 1.275 2002/08/13 05:11:26 wessels Exp $
+# $Id: cf.data.pre,v 1.276 2002/08/21 09:12:44 hno Exp $
#
#
# SQUID Web Proxy Cache http://www.squid-cache.org/
%DST Requested host
%PROTO Requested protocol
%PORT Requested port
+ %PATH Requested URL path
%METHOD Request method
%{Header} HTTP request header
%{Hdr:member} HTTP request header list member
/*
- * $Id: external_acl.cc,v 1.6 2002/08/21 05:56:10 hno Exp $
+ * $Id: external_acl.cc,v 1.7 2002/08/21 09:12:44 hno Exp $
*
* DEBUG: section 82 External ACL
* AUTHOR: Henrik Nordstrom, MARA Systems AB
EXT_ACL_DST,
EXT_ACL_PROTO,
EXT_ACL_PORT,
+ EXT_ACL_PATH,
EXT_ACL_METHOD,
EXT_ACL_HEADER,
EXT_ACL_HEADER_MEMBER,
char *header, *member, *end;
header = token + 2;
end = strchr(header, '}');
- /* cut away the terminating } */
+ /* cut away the closing brace */
if (end && strlen(end) == 1)
*end = '\0';
else
format->type = EXT_ACL_PROTO;
else if (strcmp(token, "%PORT") == 0)
format->type = EXT_ACL_PORT;
+ else if (strcmp(token, "%PATH") == 0)
+ format->type = EXT_ACL_PATH;
else if (strcmp(token, "%METHOD") == 0)
format->type = EXT_ACL_METHOD;
else {
snprintf(buf, sizeof(buf), "%d", request->port);
str = buf;
break;
+ case EXT_ACL_PATH:
+ str = strStr(request->urlpath);
+ break;
case EXT_ACL_METHOD:
str = RequestMethodStr[request->method];
break;