varnish-cache/lib/libvmod_purge/vmod_purge.c
1
/*-
2
 * Copyright (c) 2017 Varnish Software AS
3
 * All rights reserved.
4
 *
5
 * Author: Dridi Boukelmoune <dridi.boukelmoune@gmail.com>
6
 *
7
 * Redistribution and use in source and binary forms, with or without
8
 * modification, are permitted provided that the following conditions
9
 * are met:
10
 * 1. Redistributions of source code must retain the above copyright
11
 *    notice, this list of conditions and the following disclaimer.
12
 * 2. Redistributions in binary form must reproduce the above copyright
13
 *    notice, this list of conditions and the following disclaimer in the
14
 *    documentation and/or other materials provided with the distribution.
15
 *
16
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19
 * ARE DISCLAIMED.  IN NO EVENT SHALL AUTHOR OR CONTRIBUTORS BE LIABLE
20
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26
 * SUCH DAMAGE.
27
 */
28
29
#include "config.h"
30
31
#include <math.h>
32
#include <stdio.h>
33
34
#include "vdef.h"
35
#include "vas.h"
36
#include "miniobj.h"
37
#include "vrt.h"
38
39
#include "vcc_if.h"
40
41
VCL_INT v_matchproto_(td_purge_hard)
42 13
vmod_hard(VRT_CTX)
43
{
44
45 13
        CHECK_OBJ_NOTNULL(ctx, VRT_CTX_MAGIC);
46 13
        return (VRT_purge(ctx, 0, 0, 0));
47
}
48
49
VCL_INT v_matchproto_(td_purge_soft)
50 1
vmod_soft(VRT_CTX, VCL_DURATION ttl, VCL_DURATION grace, VCL_DURATION keep)
51
{
52
53 1
        CHECK_OBJ_NOTNULL(ctx, VRT_CTX_MAGIC);
54 1
        if (grace < 0)
55 1
                grace = NAN;
56 1
        if (keep < 0)
57 1
                keep = NAN;
58 1
        return (VRT_purge(ctx, ttl, grace, keep));
59
}