void
VRT_ban_string(VRT_CTX, const char *str)
{
char *a1, *a2, *a3;
char **av;
struct ban_proto *bp;
const char *err;
int i;
CHECK_OBJ_NOTNULL(ctx, VRT_CTX_MAGIC);
AN(ctx->vsl);
AN(str);
bp = BAN_Build();
if (bp == 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_Abandon(bp);
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;
}
err = BAN_AddTest(bp, a1, a2, a3);
if (err) {
VSLb(ctx->vsl, SLT_VCL_Error, "ban(): %s", err);
break;
}
if (av[++i] == NULL) {
err = BAN_Commit(bp);
if (err == NULL)
bp = NULL;
else
VSLb(ctx->vsl, SLT_VCL_Error, "ban(): %s", err);
break;
}
if (strcmp(av[i], "&&")) {
VSLb(ctx->vsl, SLT_VCL_Error,
"ban(): Expected && between conditions,"
" found \"%s\"", av[i]);
break;
}
}
if (bp != NULL)
BAN_Abandon(bp);
VAV_Free(av);
}
const char *
BAN_Commit(struct ban_proto *bp)
{
struct ban *b, *bi;
ssize_t ln;
double t0;
CHECK_OBJ_NOTNULL(bp, BAN_PROTO_MAGIC);
AN(bp->vsb);
if (ban_shutdown)
return (ban_error(bp, "Shutting down"));
AZ(VSB_finish(bp->vsb));
ln = VSB_len(bp->vsb);
assert(ln >= 0);
ALLOC_OBJ(b, BAN_MAGIC);
if (b == NULL)
return (ban_error(bp, ban_build_err_no_mem));
VTAILQ_INIT(&b->objcore);
b->spec = malloc(ln + BANS_HEAD_LEN);
if (b->spec == NULL) {
free(b);
return (ban_error(bp, ban_build_err_no_mem));
}
b->flags = bp->flags;
memset(b->spec, 0, BANS_HEAD_LEN);
t0 = VTIM_real();
memcpy(b->spec + BANS_TIMESTAMP, &t0, sizeof t0);
b->spec[BANS_FLAGS] = b->flags & 0xff;
memcpy(b->spec + BANS_HEAD_LEN, VSB_data(bp->vsb), ln);
ln += BANS_HEAD_LEN;
vbe32enc(b->spec + BANS_LENGTH, ln);
Lck_Lock(&ban_mtx);
if (ban_shutdown) {
/* We could have raced a shutdown */
Lck_Unlock(&ban_mtx);
BAN_Free(b);
return (ban_error(bp, "Shutting down"));
}
bi = VTAILQ_FIRST(&ban_head);
VTAILQ_INSERT_HEAD(&ban_head, b, list);
ban_start = b;
VSC_C_main->bans++;
VSC_C_main->bans_added++;
VSC_C_main->bans_persisted_bytes += ln;
if (b->flags & BANS_FLAG_OBJ)
VSC_C_main->bans_obj++;
if (b->flags & BANS_FLAG_REQ)
VSC_C_main->bans_req++;
if (bi != NULL)
ban_info_new(b->spec, ln); /* Notify stevedores */
if (cache_param->ban_dups) {
/* Hunt down duplicates, and mark them as completed */
for (bi = VTAILQ_NEXT(b, list); bi != NULL;
bi = VTAILQ_NEXT(bi, list)) {
if (!(bi->flags & BANS_FLAG_COMPLETED) &&
ban_equal(b->spec, bi->spec)) {
ban_mark_completed(bi);
VSC_C_main->bans_dups++;
}
}
}
if (!(b->flags & BANS_FLAG_REQ))
ban_kick_lurker();
Lck_Unlock(&ban_mtx);
BAN_Abandon(bp);
return (NULL);
}
