// SPDX-License-Identifier: GPL-2.0
#include <stddef.h>
#include <string.h>
#include <linux/bpf.h>
#include <linux/ip.h>
#include <linux/ipv6.h>
#include <bpf/bpf_helpers.h>
#include <bpf/bpf_endian.h>

struct grehdr {
 __be16 flags;
 __be16 protocol;
};

SEC("encap_gre")
int bpf_lwt_encap_gre(struct __sk_buff *skb)
{
 struct encap_hdr {
  struct iphdr iph;
  struct grehdr greh;
 } hdr;
 int err;

 memset(&hdr, 0, sizeof(struct encap_hdr));

 hdr.iph.ihl = 5;
 hdr.iph.version = 4;
 hdr.iph.ttl = 0x40;
 hdr.iph.protocol = 47;  /* IPPROTO_GRE */
#if __BYTE_ORDER__ == __ORDER_LITTLE_ENDIAN__
 hdr.iph.saddr = 0x640110ac;  /* 172.16.1.100 */
 hdr.iph.daddr = 0x641010ac;  /* 172.16.16.100 */
#elif __BYTE_ORDER__ == __ORDER_BIG_ENDIAN__
 hdr.iph.saddr = 0xac100164;  /* 172.16.1.100 */
 hdr.iph.daddr = 0xac101064;  /* 172.16.16.100 */
#else
#error "Fix your compiler's __BYTE_ORDER__?!"
#endif
 hdr.iph.tot_len = bpf_htons(skb->len + sizeof(struct encap_hdr));

 hdr.greh.protocol = skb->protocol;

 err = bpf_lwt_push_encap(skb, BPF_LWT_ENCAP_IP, &hdr,
     sizeof(struct encap_hdr));
 if (err)
  return BPF_DROP;

 return BPF_LWT_REROUTE;
}

SEC("encap_gre6")
int bpf_lwt_encap_gre6(struct __sk_buff *skb)
{
 struct encap_hdr {
  struct ipv6hdr ip6hdr;
  struct grehdr greh;
 } hdr;
 int err;

 memset(&hdr, 0, sizeof(struct encap_hdr));

 hdr.ip6hdr.version = 6;
 hdr.ip6hdr.payload_len = bpf_htons(skb->len + sizeof(struct grehdr));
 hdr.ip6hdr.nexthdr = 47;  /* IPPROTO_GRE */
 hdr.ip6hdr.hop_limit = 0x40;
 /* fb01::1 */
 hdr.ip6hdr.saddr.s6_addr[0] = 0xfb;
 hdr.ip6hdr.saddr.s6_addr[1] = 1;
 hdr.ip6hdr.saddr.s6_addr[15] = 1;
 /* fb10::1 */
 hdr.ip6hdr.daddr.s6_addr[0] = 0xfb;
 hdr.ip6hdr.daddr.s6_addr[1] = 0x10;
 hdr.ip6hdr.daddr.s6_addr[15] = 1;

 hdr.greh.protocol = skb->protocol;

 err = bpf_lwt_push_encap(skb, BPF_LWT_ENCAP_IP, &hdr,
     sizeof(struct encap_hdr));
 if (err)
  return BPF_DROP;

 return BPF_LWT_REROUTE;
}

char _license[] SEC("license") = "GPL";