#include <linux/icmpv6.h>
#include <arpa/inet.h>
-#define NULL (void*)0
+#include "siphash.h"
/* IP flags. */
#define IP_CE 0x8000 /* Flag: "Congestion" */
// Note that all operations on uint128s *stay* in Network byte order!
#if defined(__LITTLE_ENDIAN)
-#define BIGEND32(v) ((v >> 3*8) | ((v >> 8) & 0xff00) | ((v << 8) & 0xff0000) | (v << 3*8) & 0xff000000)
+#define BIGEND32(v) (((((uint32_t)(v)) >> 3*8) & 0xff) | \
+ ((((uint32_t)(v)) >> 1*8) & 0xff00) | \
+ ((((uint32_t)(v)) << 1*8) & 0xff0000) | \
+ ((((uint32_t)(v)) << 3*8) & 0xff000000))
#elif defined(__BIG_ENDIAN)
-#define BIGEND32(v) (v)
+#define BIGEND32(v) ((uint32_t)(v))
#else
#error "Need endian info"
#endif
(((uint128_t)BIGEND32(a)) << 0*32))
#define HTON128(a) BIGEND128(a >> 3*32, a >> 2*32, a >> 1*32, a>> 0*32)
// Yes, somehow macro'ing this changes LLVM's view of htons...
-#define BE16(a) ((((uint16_t)(a & 0xff00)) >> 8) | (((uint16_t)(a & 0xff)) << 8))
+#define BE16(a) (((((uint16_t)a) & 0xff00) >> 8) | ((((uint16_t)a) & 0xff) << 8))
#elif defined(__BIG_ENDIAN)
-#define BIGEND128(a, b, c, d) ((((uint128_t)a) << 3*32) | (((uint128_t)b) << 2*32) | (((uint128_t)c) << 1*32) | (((uint128_t)d) << 0*32))
-#define HTON128(a) (a)
-#define BE16(a) ((uint16_t)a)
+#define BIGEND128(a, b, c, d) ((((uint128_t)(a)) << 3*32) | (((uint128_t)(b)) << 2*32) | (((uint128_t)(c)) << 1*32) | (((uint128_t)(d)) << 0*32))
+#define HTON128(a) ((uint128_t)(a))
+#define BE16(a) ((uint16_t)(a))
#else
#error "Need endian info"
#endif
static const int XDP_DROP = 1;
static long drop_cnt_map[RULECNT + STATIC_RULE_CNT];
-#define INCREMENT_MATCH(reason) drop_cnt_map[reason] += 1;
+#define INCREMENT_MATCH(reason) { drop_cnt_map[reason] += 1; drop_cnt_map[reason] += data_end - pktdata; }
-#else
+#else /* TEST */
#include <linux/bpf.h>
#include <bpf/bpf_helpers.h>
-struct bpf_map_def SEC("maps") drop_cnt_map = {
- .type = BPF_MAP_TYPE_PERCPU_ARRAY,
- .key_size = sizeof(uint32_t),
- .value_size = sizeof(long),
- .max_entries = RULECNT + STATIC_RULE_CNT,
+struct match_counter {
+ uint64_t bytes;
+ uint64_t packets;
};
+struct {
+ __uint(type, BPF_MAP_TYPE_PERCPU_ARRAY);
+ __uint(max_entries, RULECNT + STATIC_RULE_CNT);
+ __u32 *key;
+ struct match_counter *value;
+} drop_cnt_map SEC(".maps");
+
#define INCREMENT_MATCH(reason) { \
- long *value = bpf_map_lookup_elem(&drop_cnt_map, &reason); \
- if (value) \
- *value += 1; \
+ struct match_counter *value = bpf_map_lookup_elem(&drop_cnt_map, &reason); \
+ if (value) { \
+ value->bytes += data_end - pktdata; \
+ value->packets += 1; \
+ } \
}
+#ifdef RATE_CNT
+struct ratelimit {
+ struct bpf_spin_lock lock;
+ int64_t sent_rate;
+ int64_t sent_time;
+};
+struct {
+ __uint(type, BPF_MAP_TYPE_ARRAY);
+ __uint(max_entries, RATE_CNT);
+ __u32 *key;
+ struct ratelimit *value;
+} rate_map SEC(".maps");
+#endif /* RATE_CNT */
+
+// We implement a rather naive hashtable here instead of using a BPF map because
+// (a) the BPF map hashtables are similarly naive (no rehashing, etc),
+// (b) the BPF map LRU hashtables don't support locking.
+//
+// We first separate into a few top-level buckets with per-bucket locks, limiting
+// us to 2^SRC_HASH_MAX_PARALLELISM parallel accessors.
+//
+// Then we build an array of MAX_ENTRIES/2**SRC_HASH_MAX_PARALLELISM_POW entries,
+// which are split into buckets of size SRC_HASH_BUCKET_COUNT. An entry can appear
+// in any of the SRC_HASH_BUCKET_COUNT buckets at it's hash value.
+#define SRC_HASH_MAX_PARALLELISM_POW 7
+#define SRC_HASH_MAX_PARALLELISM (1 << SRC_HASH_MAX_PARALLELISM_POW)
+#define SRC_HASH_BUCKET_COUNT_POW 3
+#define SRC_HASH_BUCKET_COUNT (1 << SRC_HASH_BUCKET_COUNT_POW)
+
+#include "rand.h"
+
+#define CREATE_PERSRC_LOOKUP(IPV, IP_TYPE) \
+struct persrc_rate##IPV##_entry { \
+ int64_t sent_rate; \
+ int64_t sent_time; \
+ IP_TYPE srcip; \
+}; \
+ \
+struct persrc_rate##IPV##_bucket { \
+ struct bpf_spin_lock lock; \
+ struct persrc_rate##IPV##_entry entries[]; \
+}; \
+ \
+struct persrc_rate##IPV##_ptr { \
+ struct persrc_rate##IPV##_entry *rate; \
+ struct bpf_spin_lock *lock; \
+}; \
+ \
+__attribute__((always_inline)) \
+static inline struct persrc_rate##IPV##_ptr get_v##IPV##_persrc_ratelimit(IP_TYPE key, void *map, size_t map_limit) { \
+ struct persrc_rate##IPV##_ptr res = { .rate = NULL, .lock = NULL }; \
+ uint64_t hash = siphash(&key, sizeof(key), COMPILE_TIME_RAND); \
+ \
+ const uint32_t map_key = hash % SRC_HASH_MAX_PARALLELISM; \
+ struct persrc_rate##IPV##_bucket *buckets = bpf_map_lookup_elem(map, &map_key); \
+ if (!buckets) return res; \
+ \
+ hash >>= SRC_HASH_MAX_PARALLELISM_POW; \
+ map_limit >>= SRC_HASH_MAX_PARALLELISM_POW; \
+ \
+ struct persrc_rate##IPV##_entry *first_bucket = &buckets->entries[(hash % map_limit) & (~(SRC_HASH_BUCKET_COUNT - 1))]; \
+ bpf_spin_lock(&buckets->lock); \
+ \
+ int min_sent_idx = 0; \
+ int64_t min_sent_time = INT64_MAX; \
+ for (int i = 0; i < SRC_HASH_BUCKET_COUNT; i++) { \
+ if (first_bucket[i].srcip == key) { \
+ res.rate = &first_bucket[i]; \
+ res.lock = &buckets->lock; \
+ return res; \
+ } else if (min_sent_time > first_bucket[i].sent_time) { \
+ min_sent_time = first_bucket[i].sent_time; \
+ min_sent_idx = i; \
+ } \
+ } \
+ res.rate = &first_bucket[min_sent_idx]; \
+ res.rate->srcip = key; \
+ res.rate->sent_rate = 0; \
+ res.rate->sent_time = 0; \
+ res.lock = &buckets->lock; \
+ return res; \
+}
+
+CREATE_PERSRC_LOOKUP(6, uint128_t)
+CREATE_PERSRC_LOOKUP(4, uint32_t)
+
+#define SRC_RATE_DEFINE(IPV, n, limit) \
+struct persrc_rate##IPV##_bucket_##n { \
+ struct bpf_spin_lock lock; \
+ struct persrc_rate##IPV##_entry entries[limit / SRC_HASH_MAX_PARALLELISM]; \
+}; \
+struct { \
+ __uint(type, BPF_MAP_TYPE_ARRAY); \
+ __uint(max_entries, SRC_HASH_MAX_PARALLELISM); \
+ uint32_t *key; \
+ struct persrc_rate##IPV##_bucket_##n *value; \
+} v##IPV##_src_rate_##n SEC(".maps");
+
+#include "maps.h"
+
+#ifndef HAVE_WRAPPER // Set this to call xdp_drop externally
SEC("xdp_drop")
-#endif
+#endif /* HAVE_WRAPPER */
+#endif /* not TEST */
int xdp_drop_prog(struct xdp_md *ctx)
{
const void *const data_end = (void *)(size_t)ctx->data_end;
unsigned short eth_proto;
{
+ // DO_RETURN in CHECK_LEN relies on pktdata being set to calculate packet length.
+ // That said, we don't want to overflow, so just set packet length to 0 here.
+ pktdata = data_end;
CHECK_LEN((size_t)ctx->data, ethhdr);
const struct ethhdr *const eth = (void*)(size_t)ctx->data;
+ pktdata = (const void *)(long)ctx->data + sizeof(struct ethhdr);
#if PARSE_8021Q == PARSE
if (likely(eth->h_proto == BE16(ETH_P_8021Q))) {
CHECK_LEN((size_t)ctx->data, ethhdr_vlan);
const struct ethhdr_vlan *const eth_vlan = (void*)(size_t)ctx->data;
-
+ pktdata = (const void *)(long)ctx->data + sizeof(struct ethhdr_vlan);
#ifdef REQ_8021Q
if (unlikely((eth_vlan->tci & BE16(0xfff)) != BE16(REQ_8021Q)))
DO_RETURN(VLAN_DROP, XDP_DROP);
#endif
-
eth_proto = eth_vlan->h_proto;
- pktdata = (const void *)(long)ctx->data + sizeof(struct ethhdr_vlan);
#else
if (unlikely(eth->h_proto == BE16(ETH_P_8021Q))) {
+ pktdata = (const void *)(long)ctx->data + sizeof(struct ethhdr_vlan);
DO_RETURN(VLAN_DROP, PARSE_8021Q);
#endif
} else {
#ifdef REQ_8021Q
DO_RETURN(VLAN_DROP, XDP_DROP);
#else
- pktdata = (const void *)(long)ctx->data + sizeof(struct ethhdr);
eth_proto = eth->h_proto;
#endif
}
const void *l4hdr = NULL;
const struct tcphdr *tcp = NULL;
- uint8_t ports_valid = 0;
- uint16_t sport, dport; // Host Endian! Only valid with tcp || udp
+ int32_t sport = -1, dport = -1; // Host Endian! Only valid with tcp || udp
#ifdef NEED_V4_PARSE
if (eth_proto == BE16(ETH_P_IP)) {
tcp = (struct tcphdr*) l4hdr;
sport = BE16(tcp->source);
dport = BE16(tcp->dest);
- ports_valid = 1;
} else if (ip->protocol == IP_PROTO_UDP) {
CHECK_LEN(l4hdr, udphdr);
const struct udphdr *udp = (struct udphdr*) l4hdr;
sport = BE16(udp->source);
dport = BE16(udp->dest);
- ports_valid = 1;
} else if (ip->protocol == IP_PROTO_ICMP) {
CHECK_LEN(l4hdr, icmphdr);
icmp = (struct icmphdr*) l4hdr;
tcp = (struct tcphdr*) l4hdr;
sport = BE16(tcp->source);
dport = BE16(tcp->dest);
- ports_valid = 1;
} else if (v6nexthdr == IP_PROTO_UDP) {
CHECK_LEN(l4hdr, udphdr);
const struct udphdr *udp = (struct udphdr*) l4hdr;
sport = BE16(udp->source);
dport = BE16(udp->dest);
- ports_valid = 1;
} else if (v6nexthdr == IP6_PROTO_ICMPV6) {
CHECK_LEN(l4hdr, icmp6hdr);
icmpv6 = (struct icmp6hdr*) l4hdr;