void
VRT_ban(struct sess *sp, char *cmds, ...)
{
char *a1, *a2, *a3;
va_list ap;
struct ban *b;
int good;
(void)sp;
b = BAN_New();
va_start(ap, cmds);
a1 = cmds;
good = 0;
while (a1 != NULL) {
good = 0;
a2 = va_arg(ap, char *);
if (a2 == NULL)
break;
a3 = va_arg(ap, char *);
if (a3 == NULL)
break;
if (BAN_AddTest(NULL, b, a1, a2, a3))
break;
a1 = va_arg(ap, char *);
good = 1;
}
if (!good)
/* XXX: report error how ? */
BAN_Free(b);
else
BAN_Insert(b);
}
void
VRT_ban_string(struct sess *sp, const char *str)
{
char *a1, *a2, *a3;
char **av;
struct ban *b;
int good;
int i;
(void)sp;
av = VAV_Parse(str, NULL, ARGV_NOESC);
if (av[0] != NULL) {
/* XXX: report error how ? */
VAV_Free(av);
return;
}
b = BAN_New();
good = 0;
for (i = 1; ;) {
a1 = av[i++];
if (a1 == NULL)
break;
good = 0;
a2 = av[i++];
if (a2 == NULL)
break;
a3 = av[i++];
if (a3 == NULL)
break;
if (BAN_AddTest(NULL, b, a1, a2, a3))
break;
good = 1;
if (av[i] == NULL)
break;
good = 0;
if (strcmp(av[i++], "&&"))
break;
}
if (!good)
/* XXX: report error how ? */
BAN_Free(b);
else
BAN_Insert(b);
VAV_Free(av);
}
void
VRT_ban_string(VRT_CTX, const char *str)
{
char *a1, *a2, *a3;
char **av;
struct ban *b;
int i;
CHECK_OBJ_NOTNULL(ctx, VRT_CTX_MAGIC);
AN(ctx->vsl);
AN(str);
b = BAN_New();
if (b == NULL) {
VSLb(ctx->vsl, SLT_VCL_Error, "ban(): Out of Memory");
return;
}
av = VAV_Parse(str, NULL, ARGV_NOESC);
AN(av);
if (av[0] != NULL) {
VSLb(ctx->vsl, SLT_VCL_Error, "ban(): %s", av[0]);
VAV_Free(av);
BAN_Free(b);
return;
}
for (i = 0; ;) {
a1 = av[++i];
if (a1 == NULL) {
VSLb(ctx->vsl, SLT_VCL_Error,
"ban(): No ban conditions found.");
break;
}
a2 = av[++i];
if (a2 == NULL) {
VSLb(ctx->vsl, SLT_VCL_Error,
"ban(): Expected comparison operator.");
break;
}
a3 = av[++i];
if (a3 == NULL) {
VSLb(ctx->vsl, SLT_VCL_Error,
"ban(): Expected second operand.");
break;
}
if (BAN_AddTest(b, a1, a2, a3) || av[++i] == NULL) {
a1 = BAN_Insert(b);
if (a1 != NULL) {
VSLb(ctx->vsl, SLT_VCL_Error,
"ban(): %s", a1);
BAN_Free_Errormsg(a1);
}
break;
}
if (strcmp(av[i], "&&")) {
VSLb(ctx->vsl, SLT_VCL_Error,
"ban(): Expected && between conditions,"
" found \"%s\"", av[i]);
break;
}
}
VAV_Free(av);
}