|  | // SPDX-License-Identifier: GPL-2.0-or-later | 
|  | /* | 
|  | *  SR-IPv6 implementation -- HMAC functions | 
|  | * | 
|  | *  Author: | 
|  | *  David Lebrun <[email protected]> | 
|  | */ | 
|  |  | 
|  | #include <linux/errno.h> | 
|  | #include <linux/kernel.h> | 
|  | #include <linux/types.h> | 
|  | #include <linux/socket.h> | 
|  | #include <linux/sockios.h> | 
|  | #include <linux/net.h> | 
|  | #include <linux/netdevice.h> | 
|  | #include <linux/in6.h> | 
|  | #include <linux/icmpv6.h> | 
|  | #include <linux/mroute6.h> | 
|  | #include <linux/slab.h> | 
|  | #include <linux/rhashtable.h> | 
|  |  | 
|  | #include <linux/netfilter.h> | 
|  | #include <linux/netfilter_ipv6.h> | 
|  |  | 
|  | #include <net/sock.h> | 
|  | #include <net/snmp.h> | 
|  |  | 
|  | #include <net/ipv6.h> | 
|  | #include <net/protocol.h> | 
|  | #include <net/transp_v6.h> | 
|  | #include <net/rawv6.h> | 
|  | #include <net/ndisc.h> | 
|  | #include <net/ip6_route.h> | 
|  | #include <net/addrconf.h> | 
|  | #include <net/xfrm.h> | 
|  |  | 
|  | #include <linux/cryptohash.h> | 
|  | #include <crypto/hash.h> | 
|  | #include <crypto/sha.h> | 
|  | #include <net/seg6.h> | 
|  | #include <net/genetlink.h> | 
|  | #include <net/seg6_hmac.h> | 
|  | #include <linux/random.h> | 
|  |  | 
|  | static DEFINE_PER_CPU(char [SEG6_HMAC_RING_SIZE], hmac_ring); | 
|  |  | 
|  | static int seg6_hmac_cmpfn(struct rhashtable_compare_arg *arg, const void *obj) | 
|  | { | 
|  | const struct seg6_hmac_info *hinfo = obj; | 
|  |  | 
|  | return (hinfo->hmackeyid != *(__u32 *)arg->key); | 
|  | } | 
|  |  | 
|  | static inline void seg6_hinfo_release(struct seg6_hmac_info *hinfo) | 
|  | { | 
|  | kfree_rcu(hinfo, rcu); | 
|  | } | 
|  |  | 
|  | static void seg6_free_hi(void *ptr, void *arg) | 
|  | { | 
|  | struct seg6_hmac_info *hinfo = (struct seg6_hmac_info *)ptr; | 
|  |  | 
|  | if (hinfo) | 
|  | seg6_hinfo_release(hinfo); | 
|  | } | 
|  |  | 
|  | static const struct rhashtable_params rht_params = { | 
|  | .head_offset		= offsetof(struct seg6_hmac_info, node), | 
|  | .key_offset		= offsetof(struct seg6_hmac_info, hmackeyid), | 
|  | .key_len		= sizeof(u32), | 
|  | .automatic_shrinking	= true, | 
|  | .obj_cmpfn		= seg6_hmac_cmpfn, | 
|  | }; | 
|  |  | 
|  | static struct seg6_hmac_algo hmac_algos[] = { | 
|  | { | 
|  | .alg_id = SEG6_HMAC_ALGO_SHA1, | 
|  | .name = "hmac(sha1)", | 
|  | }, | 
|  | { | 
|  | .alg_id = SEG6_HMAC_ALGO_SHA256, | 
|  | .name = "hmac(sha256)", | 
|  | }, | 
|  | }; | 
|  |  | 
|  | static struct sr6_tlv_hmac *seg6_get_tlv_hmac(struct ipv6_sr_hdr *srh) | 
|  | { | 
|  | struct sr6_tlv_hmac *tlv; | 
|  |  | 
|  | if (srh->hdrlen < (srh->first_segment + 1) * 2 + 5) | 
|  | return NULL; | 
|  |  | 
|  | if (!sr_has_hmac(srh)) | 
|  | return NULL; | 
|  |  | 
|  | tlv = (struct sr6_tlv_hmac *) | 
|  | ((char *)srh + ((srh->hdrlen + 1) << 3) - 40); | 
|  |  | 
|  | if (tlv->tlvhdr.type != SR6_TLV_HMAC || tlv->tlvhdr.len != 38) | 
|  | return NULL; | 
|  |  | 
|  | return tlv; | 
|  | } | 
|  |  | 
|  | static struct seg6_hmac_algo *__hmac_get_algo(u8 alg_id) | 
|  | { | 
|  | struct seg6_hmac_algo *algo; | 
|  | int i, alg_count; | 
|  |  | 
|  | alg_count = ARRAY_SIZE(hmac_algos); | 
|  | for (i = 0; i < alg_count; i++) { | 
|  | algo = &hmac_algos[i]; | 
|  | if (algo->alg_id == alg_id) | 
|  | return algo; | 
|  | } | 
|  |  | 
|  | return NULL; | 
|  | } | 
|  |  | 
|  | static int __do_hmac(struct seg6_hmac_info *hinfo, const char *text, u8 psize, | 
|  | u8 *output, int outlen) | 
|  | { | 
|  | struct seg6_hmac_algo *algo; | 
|  | struct crypto_shash *tfm; | 
|  | struct shash_desc *shash; | 
|  | int ret, dgsize; | 
|  |  | 
|  | algo = __hmac_get_algo(hinfo->alg_id); | 
|  | if (!algo) | 
|  | return -ENOENT; | 
|  |  | 
|  | tfm = *this_cpu_ptr(algo->tfms); | 
|  |  | 
|  | dgsize = crypto_shash_digestsize(tfm); | 
|  | if (dgsize > outlen) { | 
|  | pr_debug("sr-ipv6: __do_hmac: digest size too big (%d / %d)\n", | 
|  | dgsize, outlen); | 
|  | return -ENOMEM; | 
|  | } | 
|  |  | 
|  | ret = crypto_shash_setkey(tfm, hinfo->secret, hinfo->slen); | 
|  | if (ret < 0) { | 
|  | pr_debug("sr-ipv6: crypto_shash_setkey failed: err %d\n", ret); | 
|  | goto failed; | 
|  | } | 
|  |  | 
|  | shash = *this_cpu_ptr(algo->shashs); | 
|  | shash->tfm = tfm; | 
|  |  | 
|  | ret = crypto_shash_digest(shash, text, psize, output); | 
|  | if (ret < 0) { | 
|  | pr_debug("sr-ipv6: crypto_shash_digest failed: err %d\n", ret); | 
|  | goto failed; | 
|  | } | 
|  |  | 
|  | return dgsize; | 
|  |  | 
|  | failed: | 
|  | return ret; | 
|  | } | 
|  |  | 
|  | int seg6_hmac_compute(struct seg6_hmac_info *hinfo, struct ipv6_sr_hdr *hdr, | 
|  | struct in6_addr *saddr, u8 *output) | 
|  | { | 
|  | __be32 hmackeyid = cpu_to_be32(hinfo->hmackeyid); | 
|  | u8 tmp_out[SEG6_HMAC_MAX_DIGESTSIZE]; | 
|  | int plen, i, dgsize, wrsize; | 
|  | char *ring, *off; | 
|  |  | 
|  | /* a 160-byte buffer for digest output allows to store highest known | 
|  | * hash function (RadioGatun) with up to 1216 bits | 
|  | */ | 
|  |  | 
|  | /* saddr(16) + first_seg(1) + flags(1) + keyid(4) + seglist(16n) */ | 
|  | plen = 16 + 1 + 1 + 4 + (hdr->first_segment + 1) * 16; | 
|  |  | 
|  | /* this limit allows for 14 segments */ | 
|  | if (plen >= SEG6_HMAC_RING_SIZE) | 
|  | return -EMSGSIZE; | 
|  |  | 
|  | /* Let's build the HMAC text on the ring buffer. The text is composed | 
|  | * as follows, in order: | 
|  | * | 
|  | * 1. Source IPv6 address (128 bits) | 
|  | * 2. first_segment value (8 bits) | 
|  | * 3. Flags (8 bits) | 
|  | * 4. HMAC Key ID (32 bits) | 
|  | * 5. All segments in the segments list (n * 128 bits) | 
|  | */ | 
|  |  | 
|  | local_bh_disable(); | 
|  | ring = this_cpu_ptr(hmac_ring); | 
|  | off = ring; | 
|  |  | 
|  | /* source address */ | 
|  | memcpy(off, saddr, 16); | 
|  | off += 16; | 
|  |  | 
|  | /* first_segment value */ | 
|  | *off++ = hdr->first_segment; | 
|  |  | 
|  | /* flags */ | 
|  | *off++ = hdr->flags; | 
|  |  | 
|  | /* HMAC Key ID */ | 
|  | memcpy(off, &hmackeyid, 4); | 
|  | off += 4; | 
|  |  | 
|  | /* all segments in the list */ | 
|  | for (i = 0; i < hdr->first_segment + 1; i++) { | 
|  | memcpy(off, hdr->segments + i, 16); | 
|  | off += 16; | 
|  | } | 
|  |  | 
|  | dgsize = __do_hmac(hinfo, ring, plen, tmp_out, | 
|  | SEG6_HMAC_MAX_DIGESTSIZE); | 
|  | local_bh_enable(); | 
|  |  | 
|  | if (dgsize < 0) | 
|  | return dgsize; | 
|  |  | 
|  | wrsize = SEG6_HMAC_FIELD_LEN; | 
|  | if (wrsize > dgsize) | 
|  | wrsize = dgsize; | 
|  |  | 
|  | memset(output, 0, SEG6_HMAC_FIELD_LEN); | 
|  | memcpy(output, tmp_out, wrsize); | 
|  |  | 
|  | return 0; | 
|  | } | 
|  | EXPORT_SYMBOL(seg6_hmac_compute); | 
|  |  | 
|  | /* checks if an incoming SR-enabled packet's HMAC status matches | 
|  | * the incoming policy. | 
|  | * | 
|  | * called with rcu_read_lock() | 
|  | */ | 
|  | bool seg6_hmac_validate_skb(struct sk_buff *skb) | 
|  | { | 
|  | u8 hmac_output[SEG6_HMAC_FIELD_LEN]; | 
|  | struct net *net = dev_net(skb->dev); | 
|  | struct seg6_hmac_info *hinfo; | 
|  | struct sr6_tlv_hmac *tlv; | 
|  | struct ipv6_sr_hdr *srh; | 
|  | struct inet6_dev *idev; | 
|  |  | 
|  | idev = __in6_dev_get(skb->dev); | 
|  |  | 
|  | srh = (struct ipv6_sr_hdr *)skb_transport_header(skb); | 
|  |  | 
|  | tlv = seg6_get_tlv_hmac(srh); | 
|  |  | 
|  | /* mandatory check but no tlv */ | 
|  | if (idev->cnf.seg6_require_hmac > 0 && !tlv) | 
|  | return false; | 
|  |  | 
|  | /* no check */ | 
|  | if (idev->cnf.seg6_require_hmac < 0) | 
|  | return true; | 
|  |  | 
|  | /* check only if present */ | 
|  | if (idev->cnf.seg6_require_hmac == 0 && !tlv) | 
|  | return true; | 
|  |  | 
|  | /* now, seg6_require_hmac >= 0 && tlv */ | 
|  |  | 
|  | hinfo = seg6_hmac_info_lookup(net, be32_to_cpu(tlv->hmackeyid)); | 
|  | if (!hinfo) | 
|  | return false; | 
|  |  | 
|  | if (seg6_hmac_compute(hinfo, srh, &ipv6_hdr(skb)->saddr, hmac_output)) | 
|  | return false; | 
|  |  | 
|  | if (memcmp(hmac_output, tlv->hmac, SEG6_HMAC_FIELD_LEN) != 0) | 
|  | return false; | 
|  |  | 
|  | return true; | 
|  | } | 
|  | EXPORT_SYMBOL(seg6_hmac_validate_skb); | 
|  |  | 
|  | /* called with rcu_read_lock() */ | 
|  | struct seg6_hmac_info *seg6_hmac_info_lookup(struct net *net, u32 key) | 
|  | { | 
|  | struct seg6_pernet_data *sdata = seg6_pernet(net); | 
|  | struct seg6_hmac_info *hinfo; | 
|  |  | 
|  | hinfo = rhashtable_lookup_fast(&sdata->hmac_infos, &key, rht_params); | 
|  |  | 
|  | return hinfo; | 
|  | } | 
|  | EXPORT_SYMBOL(seg6_hmac_info_lookup); | 
|  |  | 
|  | int seg6_hmac_info_add(struct net *net, u32 key, struct seg6_hmac_info *hinfo) | 
|  | { | 
|  | struct seg6_pernet_data *sdata = seg6_pernet(net); | 
|  | int err; | 
|  |  | 
|  | err = rhashtable_lookup_insert_fast(&sdata->hmac_infos, &hinfo->node, | 
|  | rht_params); | 
|  |  | 
|  | return err; | 
|  | } | 
|  | EXPORT_SYMBOL(seg6_hmac_info_add); | 
|  |  | 
|  | int seg6_hmac_info_del(struct net *net, u32 key) | 
|  | { | 
|  | struct seg6_pernet_data *sdata = seg6_pernet(net); | 
|  | struct seg6_hmac_info *hinfo; | 
|  | int err = -ENOENT; | 
|  |  | 
|  | hinfo = rhashtable_lookup_fast(&sdata->hmac_infos, &key, rht_params); | 
|  | if (!hinfo) | 
|  | goto out; | 
|  |  | 
|  | err = rhashtable_remove_fast(&sdata->hmac_infos, &hinfo->node, | 
|  | rht_params); | 
|  | if (err) | 
|  | goto out; | 
|  |  | 
|  | seg6_hinfo_release(hinfo); | 
|  |  | 
|  | out: | 
|  | return err; | 
|  | } | 
|  | EXPORT_SYMBOL(seg6_hmac_info_del); | 
|  |  | 
|  | int seg6_push_hmac(struct net *net, struct in6_addr *saddr, | 
|  | struct ipv6_sr_hdr *srh) | 
|  | { | 
|  | struct seg6_hmac_info *hinfo; | 
|  | struct sr6_tlv_hmac *tlv; | 
|  | int err = -ENOENT; | 
|  |  | 
|  | tlv = seg6_get_tlv_hmac(srh); | 
|  | if (!tlv) | 
|  | return -EINVAL; | 
|  |  | 
|  | rcu_read_lock(); | 
|  |  | 
|  | hinfo = seg6_hmac_info_lookup(net, be32_to_cpu(tlv->hmackeyid)); | 
|  | if (!hinfo) | 
|  | goto out; | 
|  |  | 
|  | memset(tlv->hmac, 0, SEG6_HMAC_FIELD_LEN); | 
|  | err = seg6_hmac_compute(hinfo, srh, saddr, tlv->hmac); | 
|  |  | 
|  | out: | 
|  | rcu_read_unlock(); | 
|  | return err; | 
|  | } | 
|  | EXPORT_SYMBOL(seg6_push_hmac); | 
|  |  | 
|  | static int seg6_hmac_init_algo(void) | 
|  | { | 
|  | struct seg6_hmac_algo *algo; | 
|  | struct crypto_shash *tfm; | 
|  | struct shash_desc *shash; | 
|  | int i, alg_count, cpu; | 
|  |  | 
|  | alg_count = ARRAY_SIZE(hmac_algos); | 
|  |  | 
|  | for (i = 0; i < alg_count; i++) { | 
|  | struct crypto_shash **p_tfm; | 
|  | int shsize; | 
|  |  | 
|  | algo = &hmac_algos[i]; | 
|  | algo->tfms = alloc_percpu(struct crypto_shash *); | 
|  | if (!algo->tfms) | 
|  | return -ENOMEM; | 
|  |  | 
|  | for_each_possible_cpu(cpu) { | 
|  | tfm = crypto_alloc_shash(algo->name, 0, 0); | 
|  | if (IS_ERR(tfm)) | 
|  | return PTR_ERR(tfm); | 
|  | p_tfm = per_cpu_ptr(algo->tfms, cpu); | 
|  | *p_tfm = tfm; | 
|  | } | 
|  |  | 
|  | p_tfm = raw_cpu_ptr(algo->tfms); | 
|  | tfm = *p_tfm; | 
|  |  | 
|  | shsize = sizeof(*shash) + crypto_shash_descsize(tfm); | 
|  |  | 
|  | algo->shashs = alloc_percpu(struct shash_desc *); | 
|  | if (!algo->shashs) | 
|  | return -ENOMEM; | 
|  |  | 
|  | for_each_possible_cpu(cpu) { | 
|  | shash = kzalloc_node(shsize, GFP_KERNEL, | 
|  | cpu_to_node(cpu)); | 
|  | if (!shash) | 
|  | return -ENOMEM; | 
|  | *per_cpu_ptr(algo->shashs, cpu) = shash; | 
|  | } | 
|  | } | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | int __init seg6_hmac_init(void) | 
|  | { | 
|  | return seg6_hmac_init_algo(); | 
|  | } | 
|  | EXPORT_SYMBOL(seg6_hmac_init); | 
|  |  | 
|  | int __net_init seg6_hmac_net_init(struct net *net) | 
|  | { | 
|  | struct seg6_pernet_data *sdata = seg6_pernet(net); | 
|  |  | 
|  | rhashtable_init(&sdata->hmac_infos, &rht_params); | 
|  |  | 
|  | return 0; | 
|  | } | 
|  | EXPORT_SYMBOL(seg6_hmac_net_init); | 
|  |  | 
|  | void seg6_hmac_exit(void) | 
|  | { | 
|  | struct seg6_hmac_algo *algo = NULL; | 
|  | int i, alg_count, cpu; | 
|  |  | 
|  | alg_count = ARRAY_SIZE(hmac_algos); | 
|  | for (i = 0; i < alg_count; i++) { | 
|  | algo = &hmac_algos[i]; | 
|  | for_each_possible_cpu(cpu) { | 
|  | struct crypto_shash *tfm; | 
|  | struct shash_desc *shash; | 
|  |  | 
|  | shash = *per_cpu_ptr(algo->shashs, cpu); | 
|  | kfree(shash); | 
|  | tfm = *per_cpu_ptr(algo->tfms, cpu); | 
|  | crypto_free_shash(tfm); | 
|  | } | 
|  | free_percpu(algo->tfms); | 
|  | free_percpu(algo->shashs); | 
|  | } | 
|  | } | 
|  | EXPORT_SYMBOL(seg6_hmac_exit); | 
|  |  | 
|  | void __net_exit seg6_hmac_net_exit(struct net *net) | 
|  | { | 
|  | struct seg6_pernet_data *sdata = seg6_pernet(net); | 
|  |  | 
|  | rhashtable_free_and_destroy(&sdata->hmac_infos, seg6_free_hi, NULL); | 
|  | } | 
|  | EXPORT_SYMBOL(seg6_hmac_net_exit); |