--- /dev/null
+/*
+ * lib/route/link/ipip.c IPIP Link Info
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation version 2.1
+ * of the License.
+ *
+ * Copyright (c) 2014 Susant Sahani <susant@redhat.com>
+ */
+
+/**
+ * @ingroup link
+ * @defgroup ipip IPIP
+ * ipip link module
+ *
+ * @details
+ * \b Link Type Name: "ipip"
+ *
+ * @route_doc{link_ipip, IPIP Documentation}
+ *
+ * @{
+ */
+
+#include <netlink-private/netlink.h>
+#include <netlink/netlink.h>
+#include <netlink/attr.h>
+#include <netlink/utils.h>
+#include <netlink/object.h>
+#include <netlink/route/rtnl.h>
+#include <netlink-private/route/link/api.h>
+#include <linux/if_tunnel.h>
+
+#define IPIP_ATTR_LINK (1 << 0)
+#define IPIP_ATTR_LOCAL (1 << 1)
+#define IPIP_ATTR_REMOTE (1 << 2)
+#define IPIP_ATTR_TTL (1 << 3)
+#define IPIP_ATTR_TOS (1 << 4)
+#define IPIP_ATTR_PMTUDISC (1 << 5)
+
+struct ipip_info
+{
+ uint8_t ttl;
+ uint8_t tos;
+ uint8_t pmtudisc;
+ uint32_t link;
+ uint32_t local;
+ uint32_t remote;
+ uint32_t ipip_mask;
+};
+
+static struct nla_policy ipip_policy[IFLA_IPTUN_MAX + 1] = {
+ [IFLA_IPTUN_LINK] = { .type = NLA_U32 },
+ [IFLA_IPTUN_LOCAL] = { .type = NLA_U32 },
+ [IFLA_IPTUN_REMOTE] = { .type = NLA_U32 },
+ [IFLA_IPTUN_TTL] = { .type = NLA_U8 },
+ [IFLA_IPTUN_TOS] = { .type = NLA_U8 },
+ [IFLA_IPTUN_PMTUDISC] = { .type = NLA_U8 },
+};
+
+static int ipip_alloc(struct rtnl_link *link)
+{
+ struct ipip_info *ipip;
+
+ ipip = calloc(1, sizeof(*ipip));
+ if (!ipip)
+ return -NLE_NOMEM;
+
+ link->l_info = ipip;
+
+ return 0;
+}
+
+static int ipip_parse(struct rtnl_link *link, struct nlattr *data,
+ struct nlattr *xstats)
+{
+ struct nlattr *tb[IFLA_IPTUN_MAX + 1];
+ struct ipip_info *ipip;
+ int err;
+
+ NL_DBG(3, "Parsing IPIP link info");
+
+ err = nla_parse_nested(tb, IFLA_IPTUN_MAX, data, ipip_policy);
+ if (err < 0)
+ goto errout;
+
+ err = ipip_alloc(link);
+ if (err < 0)
+ goto errout;
+
+ ipip = link->l_info;
+
+ if (tb[IFLA_IPTUN_LINK]) {
+ ipip->link = nla_get_u32(tb[IFLA_IPTUN_LINK]);
+ ipip->ipip_mask |= IPIP_ATTR_LINK;
+ }
+
+ if (tb[IFLA_IPTUN_LOCAL]) {
+ ipip->local = nla_get_u32(tb[IFLA_IPTUN_LOCAL]);
+ ipip->ipip_mask |= IPIP_ATTR_LOCAL;
+ }
+
+ if (tb[IFLA_IPTUN_REMOTE]) {
+ ipip->remote = nla_get_u32(tb[IFLA_IPTUN_REMOTE]);
+ ipip->ipip_mask |= IPIP_ATTR_REMOTE;
+ }
+
+ if (tb[IFLA_IPTUN_TTL]) {
+ ipip->ttl = nla_get_u8(tb[IFLA_IPTUN_TTL]);
+ ipip->ipip_mask |= IPIP_ATTR_TTL;
+ }
+
+ if (tb[IFLA_IPTUN_TOS]) {
+ ipip->tos = nla_get_u8(tb[IFLA_IPTUN_TOS]);
+ ipip->ipip_mask |= IPIP_ATTR_TOS;
+ }
+
+ if (tb[IFLA_IPTUN_PMTUDISC]) {
+ ipip->pmtudisc = nla_get_u8(tb[IFLA_IPTUN_PMTUDISC]);
+ ipip->ipip_mask |= IPIP_ATTR_PMTUDISC;
+ }
+
+ err = 0;
+
+errout:
+ return err;
+}
+
+static int ipip_put_attrs(struct nl_msg *msg, struct rtnl_link *link)
+{
+ struct ipip_info *ipip = link->l_info;
+ struct nlattr *data;
+
+ data = nla_nest_start(msg, IFLA_INFO_DATA);
+ if (!data)
+ return -NLE_MSGSIZE;
+
+ if (ipip->ipip_mask & IPIP_ATTR_LINK)
+ NLA_PUT_U32(msg, IFLA_IPTUN_LINK, ipip->link);
+
+ if (ipip->ipip_mask & IPIP_ATTR_LOCAL)
+ NLA_PUT_U32(msg, IFLA_IPTUN_LOCAL, ipip->local);
+
+ if (ipip->ipip_mask & IPIP_ATTR_REMOTE)
+ NLA_PUT_U32(msg, IFLA_IPTUN_REMOTE, ipip->remote);
+
+ if (ipip->ipip_mask & IPIP_ATTR_TTL)
+ NLA_PUT_U8(msg, IFLA_IPTUN_TTL, ipip->ttl);
+
+ if (ipip->ipip_mask & IPIP_ATTR_TOS)
+ NLA_PUT_U8(msg, IFLA_IPTUN_TOS, ipip->tos);
+
+ if (ipip->ipip_mask & IPIP_ATTR_PMTUDISC)
+ NLA_PUT_U8(msg, IFLA_IPTUN_PMTUDISC, ipip->pmtudisc);
+
+ nla_nest_end(msg, data);
+
+nla_put_failure:
+ return 0;
+}
+
+static void ipip_free(struct rtnl_link *link)
+{
+ struct ipip_info *ipip = link->l_info;
+
+ free(ipip);
+ link->l_info = NULL;
+}
+
+static void ipip_dump_line(struct rtnl_link *link, struct nl_dump_params *p)
+{
+ nl_dump(p, "ipip : %s", link->l_name);
+}
+
+static void ipip_dump_details(struct rtnl_link *link, struct nl_dump_params *p)
+{
+ struct ipip_info *ipip = link->l_info;
+ char *name, addr[INET_ADDRSTRLEN];
+
+ if (ipip->ipip_mask & IPIP_ATTR_LINK) {
+ nl_dump(p, " link ");
+ name = rtnl_link_get_name(link);
+ if (name)
+ nl_dump_line(p, "%s\n", name);
+ else
+ nl_dump_line(p, "%u\n", ipip->link);
+ }
+
+ if (ipip->ipip_mask & IPIP_ATTR_LOCAL) {
+ nl_dump(p, " local ");
+ if(inet_ntop(AF_INET, &ipip->local, addr, sizeof(addr)))
+ nl_dump_line(p, "%s\n", addr);
+ else
+ nl_dump_line(p, "%#x\n", ntohs(ipip->local));
+ }
+
+ if (ipip->ipip_mask & IPIP_ATTR_REMOTE) {
+ nl_dump(p, " remote ");
+ if(inet_ntop(AF_INET, &ipip->remote, addr, sizeof(addr)))
+ nl_dump_line(p, "%s\n", addr);
+ else
+ nl_dump_line(p, "%#x\n", ntohs(ipip->remote));
+ }
+
+ if (ipip->ipip_mask & IPIP_ATTR_TTL) {
+ nl_dump(p, " ttl ");
+ nl_dump_line(p, "%u\n", ipip->ttl);
+ }
+
+ if (ipip->ipip_mask & IPIP_ATTR_TOS) {
+ nl_dump(p, " tos ");
+ nl_dump_line(p, "%u\n", ipip->tos);
+ }
+
+ if (ipip->ipip_mask & IPIP_ATTR_PMTUDISC) {
+ nl_dump(p, " pmtudisc ");
+ nl_dump_line(p, "enabled (%#x)\n", ipip->pmtudisc);
+ }
+}
+
+static int ipip_clone(struct rtnl_link *dst, struct rtnl_link *src)
+{
+ struct ipip_info *ipip_dst, *ipip_src = src->l_info;
+ int err;
+
+ dst->l_info = NULL;
+
+ err = rtnl_link_set_type(dst, "ipip");
+ if (err < 0)
+ return err;
+
+ ipip_dst = dst->l_info;
+
+ if (!ipip_dst || !ipip_src)
+ BUG();
+
+ memcpy(ipip_dst, ipip_src, sizeof(struct ipip_info));
+
+ return 0;
+}
+
+static struct rtnl_link_info_ops ipip_info_ops = {
+ .io_name = "ipip",
+ .io_alloc = ipip_alloc,
+ .io_parse = ipip_parse,
+ .io_dump = {
+ [NL_DUMP_LINE] = ipip_dump_line,
+ [NL_DUMP_DETAILS] = ipip_dump_details,
+ },
+ .io_clone = ipip_clone,
+ .io_put_attrs = ipip_put_attrs,
+ .io_free = ipip_free,
+};
+
+#define IS_IPIP_LINK_ASSERT(link) \
+ if ((link)->l_info_ops != &ipip_info_ops) { \
+ APPBUG("Link is not a ipip link. set type \"ipip\" first."); \
+ return -NLE_OPNOTSUPP; \
+ }
+
+struct rtnl_link *rtnl_link_ipip_alloc(void)
+{
+ struct rtnl_link *link;
+ int err;
+
+ link = rtnl_link_alloc();
+ if (!link)
+ return NULL;
+
+ err = rtnl_link_set_type(link, "ipip");
+ if (err < 0) {
+ rtnl_link_put(link);
+ return NULL;
+ }
+
+ return link;
+}
+
+/**
+ * Check if link is a IPIP link
+ * @arg link Link object
+ *
+ * @return True if link is a IPIP link, otherwise false is returned.
+ */
+int rtnl_link_is_ipip(struct rtnl_link *link)
+{
+ return link->l_info_ops && !strcmp(link->l_info_ops->io_name, "ipip");
+}
+
+/**
+ * Create a new ipip tunnel device
+ * @arg sock netlink socket
+ * @arg name name of the tunnel deviceL
+ *
+ * Creates a new ipip tunnel device in the kernel
+ * @return 0 on success or a negative error code
+ */
+int rtnl_link_ipip_add(struct nl_sock *sk, const char *name)
+{
+ struct rtnl_link *link;
+ int err;
+
+ link = rtnl_link_ipip_alloc();
+ if (!link)
+ return -NLE_NOMEM;
+
+ if(name)
+ rtnl_link_set_name(link, name);
+
+ err = rtnl_link_add(sk, link, NLM_F_CREATE);
+ rtnl_link_put(link);
+
+ return err;
+}
+
+/**
+ * Set IPIP tunnel interface index
+ * @arg link Link object
+ * @arg index interface index
+ *
+ * @return 0 on success or a negative error code
+ */
+int rtnl_link_ipip_set_link(struct rtnl_link *link, uint32_t index)
+{
+ struct ipip_info *ipip = link->l_info;
+
+ IS_IPIP_LINK_ASSERT(link);
+
+ ipip->link = index;
+ ipip->ipip_mask |= IPIP_ATTR_LINK;
+
+ return 0;
+}
+
+/**
+ * Get IPIP tunnel interface index
+ * @arg link Link object
+ *
+ * @return interface index value
+ */
+uint32_t rtnl_link_ipip_get_link(struct rtnl_link *link)
+{
+ struct ipip_info *ipip = link->l_info;
+
+ IS_IPIP_LINK_ASSERT(link);
+
+ return ipip->link;
+}
+
+/**
+ * Set IPIP tunnel local address
+ * @arg link Link object
+ * @arg addr local address
+ *
+ * @return 0 on success or a negative error code
+ */
+int rtnl_link_ipip_set_local(struct rtnl_link *link, uint32_t addr)
+{
+ struct ipip_info *ipip = link->l_info;
+
+ IS_IPIP_LINK_ASSERT(link);
+
+ ipip->local = addr;
+ ipip->ipip_mask |= IPIP_ATTR_LOCAL;
+
+ return 0;
+}
+
+/**
+ * Get IPIP tunnel local address
+ * @arg link Link object
+ *
+ * @return local address value
+ */
+uint32_t rtnl_link_ipip_get_local(struct rtnl_link *link)
+{
+ struct ipip_info *ipip = link->l_info;
+
+ IS_IPIP_LINK_ASSERT(link);
+
+ return ipip->local;
+}
+
+/**
+ * Set IPIP tunnel remote address
+ * @arg link Link object
+ * @arg remote remote address
+ *
+ * @return 0 on success or a negative error code
+ */
+int rtnl_link_ipip_set_remote(struct rtnl_link *link, uint32_t addr)
+{
+ struct ipip_info *ipip = link->l_info;
+
+ IS_IPIP_LINK_ASSERT(link);
+
+ ipip->remote = addr;
+ ipip->ipip_mask |= IPIP_ATTR_REMOTE;
+
+ return 0;
+}
+
+/**
+ * Get IPIP tunnel remote address
+ * @arg link Link object
+ *
+ * @return remote address
+ */
+uint32_t rtnl_link_ipip_get_remote(struct rtnl_link *link)
+{
+ struct ipip_info *ipip = link->l_info;
+
+ IS_IPIP_LINK_ASSERT(link);
+
+ return ipip->remote;
+}
+
+/**
+ * Set IPIP tunnel ttl
+ * @arg link Link object
+ * @arg ttl tunnel ttl
+ *
+ * @return 0 on success or a negative error code
+ */
+int rtnl_link_ipip_set_ttl(struct rtnl_link *link, uint8_t ttl)
+{
+ struct ipip_info *ipip = link->l_info;
+
+ IS_IPIP_LINK_ASSERT(link);
+
+ ipip->ttl = ttl;
+ ipip->ipip_mask |= IPIP_ATTR_TTL;
+
+ return 0;
+}
+
+/**
+ * Get IPIP tunnel ttl
+ * @arg link Link object
+ *
+ * @return ttl value
+ */
+uint8_t rtnl_link_ipip_get_ttl(struct rtnl_link *link)
+{
+ struct ipip_info *ipip = link->l_info;
+
+ IS_IPIP_LINK_ASSERT(link);
+
+ return ipip->ttl;
+}
+
+/**
+ * Set IPIP tunnel tos
+ * @arg link Link object
+ * @arg tos tunnel tos
+ *
+ * @return 0 on success or a negative error code
+ */
+int rtnl_link_ipip_set_tos(struct rtnl_link *link, uint8_t tos)
+{
+ struct ipip_info *ipip = link->l_info;
+
+ IS_IPIP_LINK_ASSERT(link);
+
+ ipip->tos = tos;
+ ipip->ipip_mask |= IPIP_ATTR_TOS;
+
+ return 0;
+}
+
+/**
+ * Get IPIP tunnel tos
+ * @arg link Link object
+ *
+ * @return tos value
+ */
+uint8_t rtnl_link_ipip_get_tos(struct rtnl_link *link)
+{
+ struct ipip_info *ipip = link->l_info;
+
+ IS_IPIP_LINK_ASSERT(link);
+
+ return ipip->tos;
+}
+
+/**
+ * Set IPIP tunnel path MTU discovery
+ * @arg link Link object
+ * @arg pmtudisc path MTU discovery
+ *
+ * @return 0 on success or a negative error code
+ */
+int rtnl_link_ipip_set_pmtudisc(struct rtnl_link *link, uint8_t pmtudisc)
+{
+ struct ipip_info *ipip = link->l_info;
+
+ IS_IPIP_LINK_ASSERT(link);
+
+ ipip->pmtudisc = pmtudisc;
+ ipip->ipip_mask |= IPIP_ATTR_PMTUDISC;
+
+ return 0;
+}
+
+/**
+ * Get IPIP path MTU discovery
+ * @arg link Link object
+ *
+ * @return pmtudisc value
+ */
+uint8_t rtnl_link_ipip_get_pmtudisc(struct rtnl_link *link)
+{
+ struct ipip_info *ipip = link->l_info;
+
+ IS_IPIP_LINK_ASSERT(link);
+
+ return ipip->pmtudisc;
+}
+
+static void __init ipip_init(void)
+{
+ rtnl_link_register_info(&ipip_info_ops);
+}
+
+static void __exit ipip_exit(void)
+{
+ rtnl_link_unregister_info(&ipip_info_ops);
+}