net/tipc/udp_media.c

   1 /* net/tipc/udp_media.c: IP bearer support for TIPC
   2  *
   3  * Copyright (c) 2015, Ericsson AB
   4  * All rights reserved.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions are met:
   8  *
   9  * 1. Redistributions of source code must retain the above copyright
  10  *    notice, this list of conditions and the following disclaimer.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  * 3. Neither the names of the copyright holders nor the names of its
  15  *    contributors may be used to endorse or promote products derived from
  16  *    this software without specific prior written permission.
  17  *
  18  * Alternatively, this software may be distributed under the terms of the
  19  * GNU General Public License ("GPL") version 2 as published by the Free
  20  * Software Foundation.
  21  *
  22  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
  23  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  25  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
  26  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  27  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  28  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  29  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  30  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  31  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  32  * POSSIBILITY OF SUCH DAMAGE.
  33  */
  34
  35 #include <linux/socket.h>
  36 #include <linux/ip.h>
  37 #include <linux/udp.h>
  38 #include <linux/inet.h>
  39 #include <linux/inetdevice.h>
  40 #include <linux/igmp.h>
  41 #include <linux/kernel.h>
  42 #include <linux/workqueue.h>
  43 #include <linux/list.h>
  44 #include <net/sock.h>
  45 #include <net/ip.h>
  46 #include <net/udp_tunnel.h>
  47 #include <net/ipv6_stubs.h>
  48 #include <linux/tipc_netlink.h>
  49 #include "core.h"
  50 #include "addr.h"
  51 #include "net.h"
  52 #include "bearer.h"
  53 #include "netlink.h"
  54 #include "msg.h"
  55 #include "udp_media.h"
  56
  57 /* IANA assigned UDP port */
  58 #define UDP_PORT_DEFAULT        6118
  59
  60 #define UDP_MIN_HEADROOM        48
  61
  62 /**
  63  * struct udp_media_addr - IP/UDP addressing information
  64  *
  65  * This is the bearer level originating address used in neighbor discovery
  66  * messages, and all fields should be in network byte order
  67  *
  68  * @proto: Ethernet protocol in use
  69  * @port: port being used
  70  * @ipv4: IPv4 address of neighbor
  71  * @ipv6: IPv6 address of neighbor
  72  */
  73 struct udp_media_addr {
  74         __be16  proto;
  75         __be16  port;
  76         union {
  77                 struct in_addr ipv4;
  78                 struct in6_addr ipv6;
  79         };
  80 };
  81
  82 /* struct udp_replicast - container for UDP remote addresses */
  83 struct udp_replicast {
  84         struct udp_media_addr addr;
  85         struct dst_cache dst_cache;
  86         struct rcu_head rcu;
  87         struct list_head list;
  88 };
  89
  90 /**
  91  * struct udp_bearer - ip/udp bearer data structure
  92  * @bearer:     associated generic tipc bearer
  93  * @ubsock:     bearer associated socket
  94  * @ifindex:    local address scope
  95  * @work:       used to schedule deferred work on a bearer
  96  * @rcast:      associated udp_replicast container
  97  */
  98 struct udp_bearer {
  99         struct tipc_bearer __rcu *bearer;
 100         struct socket *ubsock;
 101         u32 ifindex;
 102         struct work_struct work;
 103         struct udp_replicast rcast;
 104 };
 105
 106 static int tipc_udp_is_mcast_addr(struct udp_media_addr *addr)
 107 {
 108         if (ntohs(addr->proto) == ETH_P_IP)
 109                 return ipv4_is_multicast(addr->ipv4.s_addr);
 110 #if IS_ENABLED(CONFIG_IPV6)
 111         else
 112                 return ipv6_addr_is_multicast(&addr->ipv6);
 113 #endif
 114         return 0;
 115 }
 116
 117 /* udp_media_addr_set - convert a ip/udp address to a TIPC media address */
 118 static void tipc_udp_media_addr_set(struct tipc_media_addr *addr,
 119                                     struct udp_media_addr *ua)
 120 {
 121         memset(addr, 0, sizeof(struct tipc_media_addr));
 122         addr->media_id = TIPC_MEDIA_TYPE_UDP;
 123         memcpy(addr->value, ua, sizeof(struct udp_media_addr));
 124
 125         if (tipc_udp_is_mcast_addr(ua))
 126                 addr->broadcast = TIPC_BROADCAST_SUPPORT;
 127 }
 128
 129 /* tipc_udp_addr2str - convert ip/udp address to string */
 130 static int tipc_udp_addr2str(struct tipc_media_addr *a, char *buf, int size)
 131 {
 132         struct udp_media_addr *ua = (struct udp_media_addr *)&a->value;
 133
 134         if (ntohs(ua->proto) == ETH_P_IP)
 135                 snprintf(buf, size, "%pI4:%u", &ua->ipv4, ntohs(ua->port));
 136         else if (ntohs(ua->proto) == ETH_P_IPV6)
 137                 snprintf(buf, size, "%pI6:%u", &ua->ipv6, ntohs(ua->port));
 138         else
 139                 pr_err("Invalid UDP media address\n");
 140         return 0;
 141 }
 142
 143 /* tipc_udp_msg2addr - extract an ip/udp address from a TIPC ndisc message */
 144 static int tipc_udp_msg2addr(struct tipc_bearer *b, struct tipc_media_addr *a,
 145                              char *msg)
 146 {
 147         struct udp_media_addr *ua;
 148
 149         ua = (struct udp_media_addr *) (msg + TIPC_MEDIA_ADDR_OFFSET);
 150         if (msg[TIPC_MEDIA_TYPE_OFFSET] != TIPC_MEDIA_TYPE_UDP)
 151                 return -EINVAL;
 152         tipc_udp_media_addr_set(a, ua);
 153         return 0;
 154 }
 155
 156 /* tipc_udp_addr2msg - write an ip/udp address to a TIPC ndisc message */
 157 static int tipc_udp_addr2msg(char *msg, struct tipc_media_addr *a)
 158 {
 159         memset(msg, 0, TIPC_MEDIA_INFO_SIZE);
 160         msg[TIPC_MEDIA_TYPE_OFFSET] = TIPC_MEDIA_TYPE_UDP;
 161         memcpy(msg + TIPC_MEDIA_ADDR_OFFSET, a->value,
 162                sizeof(struct udp_media_addr));
 163         return 0;
 164 }
 165
 166 /* tipc_send_msg - enqueue a send request */
 167 static int tipc_udp_xmit(struct net *net, struct sk_buff *skb,
 168                          struct udp_bearer *ub, struct udp_media_addr *src,
 169                          struct udp_media_addr *dst, struct dst_cache *cache)
 170 {
 171         struct dst_entry *ndst;
 172         int ttl, err = 0;
 173
 174         local_bh_disable();
 175         ndst = dst_cache_get(cache);
 176         if (dst->proto == htons(ETH_P_IP)) {
 177                 struct rtable *rt = (struct rtable *)ndst;
 178
 179                 if (!rt) {
 180                         struct flowi4 fl = {
 181                                 .daddr = dst->ipv4.s_addr,
 182                                 .saddr = src->ipv4.s_addr,
 183                                 .flowi4_mark = skb->mark,
 184                                 .flowi4_proto = IPPROTO_UDP
 185                         };
 186                         rt = ip_route_output_key(net, &fl);
 187                         if (IS_ERR(rt)) {
 188                                 err = PTR_ERR(rt);
 189                                 goto tx_error;
 190                         }
 191                         dst_cache_set_ip4(cache, &rt->dst, fl.saddr);
 192                 }
 193
 194                 ttl = ip4_dst_hoplimit(&rt->dst);
 195                 udp_tunnel_xmit_skb(rt, ub->ubsock->sk, skb, src->ipv4.s_addr,
 196                                     dst->ipv4.s_addr, 0, ttl, 0, src->port,
 197                                     dst->port, false, true);
 198 #if IS_ENABLED(CONFIG_IPV6)
 199         } else {
 200                 if (!ndst) {
 201                         struct flowi6 fl6 = {
 202                                 .flowi6_oif = ub->ifindex,
 203                                 .daddr = dst->ipv6,
 204                                 .saddr = src->ipv6,
 205                                 .flowi6_proto = IPPROTO_UDP
 206                         };
 207                         ndst = ipv6_stub->ipv6_dst_lookup_flow(net,
 208                                                                ub->ubsock->sk,
 209                                                                &fl6, NULL);
 210                         if (IS_ERR(ndst)) {
 211                                 err = PTR_ERR(ndst);
 212                                 goto tx_error;
 213                         }
 214                         dst_cache_set_ip6(cache, ndst, &fl6.saddr);
 215                 }
 216                 ttl = ip6_dst_hoplimit(ndst);
 217                 err = udp_tunnel6_xmit_skb(ndst, ub->ubsock->sk, skb, NULL,
 218                                            &src->ipv6, &dst->ipv6, 0, ttl, 0,
 219                                            src->port, dst->port, false);
 220 #endif
 221         }
 222         local_bh_enable();
 223         return err;
 224
 225 tx_error:
 226         local_bh_enable();
 227         kfree_skb(skb);
 228         return err;
 229 }
 230
 231 static int tipc_udp_send_msg(struct net *net, struct sk_buff *skb,
 232                              struct tipc_bearer *b,
 233                              struct tipc_media_addr *addr)
 234 {
 235         struct udp_media_addr *src = (struct udp_media_addr *)&b->addr.value;
 236         struct udp_media_addr *dst = (struct udp_media_addr *)&addr->value;
 237         struct udp_replicast *rcast;
 238         struct udp_bearer *ub;
 239         int err = 0;
 240
 241         if (skb_headroom(skb) < UDP_MIN_HEADROOM) {
 242                 err = pskb_expand_head(skb, UDP_MIN_HEADROOM, 0, GFP_ATOMIC);
 243                 if (err)
 244                         goto out;
 245         }
 246
 247         skb_set_inner_protocol(skb, htons(ETH_P_TIPC));
 248         ub = rcu_dereference(b->media_ptr);
 249         if (!ub) {
 250                 err = -ENODEV;
 251                 goto out;
 252         }
 253
 254         if (addr->broadcast != TIPC_REPLICAST_SUPPORT)
 255                 return tipc_udp_xmit(net, skb, ub, src, dst,
 256                                      &ub->rcast.dst_cache);
 257
 258         /* Replicast, send an skb to each configured IP address */
 259         list_for_each_entry_rcu(rcast, &ub->rcast.list, list) {
 260                 struct sk_buff *_skb;
 261
 262                 _skb = pskb_copy(skb, GFP_ATOMIC);
 263                 if (!_skb) {
 264                         err = -ENOMEM;
 265                         goto out;
 266                 }
 267
 268                 err = tipc_udp_xmit(net, _skb, ub, src, &rcast->addr,
 269                                     &rcast->dst_cache);
 270                 if (err)
 271                         goto out;
 272         }
 273         err = 0;
 274 out:
 275         kfree_skb(skb);
 276         return err;
 277 }
 278
 279 static bool tipc_udp_is_known_peer(struct tipc_bearer *b,
 280                                    struct udp_media_addr *addr)
 281 {
 282         struct udp_replicast *rcast, *tmp;
 283         struct udp_bearer *ub;
 284
 285         ub = rcu_dereference_rtnl(b->media_ptr);
 286         if (!ub) {
 287                 pr_err_ratelimited("UDP bearer instance not found\n");
 288                 return false;
 289         }
 290
 291         list_for_each_entry_safe(rcast, tmp, &ub->rcast.list, list) {
 292                 if (!memcmp(&rcast->addr, addr, sizeof(struct udp_media_addr)))
 293                         return true;
 294         }
 295
 296         return false;
 297 }
 298
 299 static int tipc_udp_rcast_add(struct tipc_bearer *b,
 300                               struct udp_media_addr *addr)
 301 {
 302         struct udp_replicast *rcast;
 303         struct udp_bearer *ub;
 304
 305         ub = rcu_dereference_rtnl(b->media_ptr);
 306         if (!ub)
 307                 return -ENODEV;
 308
 309         rcast = kmalloc(sizeof(*rcast), GFP_ATOMIC);
 310         if (!rcast)
 311                 return -ENOMEM;
 312
 313         if (dst_cache_init(&rcast->dst_cache, GFP_ATOMIC)) {
 314                 kfree(rcast);
 315                 return -ENOMEM;
 316         }
 317
 318         memcpy(&rcast->addr, addr, sizeof(struct udp_media_addr));
 319
 320         if (ntohs(addr->proto) == ETH_P_IP)
 321                 pr_info("New replicast peer: %pI4\n", &rcast->addr.ipv4);
 322 #if IS_ENABLED(CONFIG_IPV6)
 323         else if (ntohs(addr->proto) == ETH_P_IPV6)
 324                 pr_info("New replicast peer: %pI6\n", &rcast->addr.ipv6);
 325 #endif
 326         b->bcast_addr.broadcast = TIPC_REPLICAST_SUPPORT;
 327         list_add_rcu(&rcast->list, &ub->rcast.list);
 328         return 0;
 329 }
 330
 331 static int tipc_udp_rcast_disc(struct tipc_bearer *b, struct sk_buff *skb)
 332 {
 333         struct udp_media_addr src = {0};
 334         struct udp_media_addr *dst;
 335
 336         dst = (struct udp_media_addr *)&b->bcast_addr.value;
 337         if (tipc_udp_is_mcast_addr(dst))
 338                 return 0;
 339
 340         src.port = udp_hdr(skb)->source;
 341
 342         if (ip_hdr(skb)->version == 4) {
 343                 struct iphdr *iphdr = ip_hdr(skb);
 344
 345                 src.proto = htons(ETH_P_IP);
 346                 src.ipv4.s_addr = iphdr->saddr;
 347                 if (ipv4_is_multicast(iphdr->daddr))
 348                         return 0;
 349 #if IS_ENABLED(CONFIG_IPV6)
 350         } else if (ip_hdr(skb)->version == 6) {
 351                 struct ipv6hdr *iphdr = ipv6_hdr(skb);
 352
 353                 src.proto = htons(ETH_P_IPV6);
 354                 src.ipv6 = iphdr->saddr;
 355                 if (ipv6_addr_is_multicast(&iphdr->daddr))
 356                         return 0;
 357 #endif
 358         } else {
 359                 return 0;
 360         }
 361
 362         if (likely(tipc_udp_is_known_peer(b, &src)))
 363                 return 0;
 364
 365         return tipc_udp_rcast_add(b, &src);
 366 }
 367
 368 /* tipc_udp_recv - read data from bearer socket */
 369 static int tipc_udp_recv(struct sock *sk, struct sk_buff *skb)
 370 {
 371         struct udp_bearer *ub;
 372         struct tipc_bearer *b;
 373         struct tipc_msg *hdr;
 374         int err;
 375
 376         ub = rcu_dereference_sk_user_data(sk);
 377         if (!ub) {
 378                 pr_err_ratelimited("Failed to get UDP bearer reference");
 379                 goto out;
 380         }
 381         skb_pull(skb, sizeof(struct udphdr));
 382         hdr = buf_msg(skb);
 383
 384         b = rcu_dereference(ub->bearer);
 385         if (!b)
 386                 goto out;
 387
 388         if (b && test_bit(0, &b->up)) {
 389                 TIPC_SKB_CB(skb)->flags = 0;
 390                 tipc_rcv(sock_net(sk), skb, b);
 391                 return 0;
 392         }
 393
 394         if (unlikely(msg_user(hdr) == LINK_CONFIG)) {
 395                 err = tipc_udp_rcast_disc(b, skb);
 396                 if (err)
 397                         goto out;
 398         }
 399
 400 out:
 401         kfree_skb(skb);
 402         return 0;
 403 }
 404
 405 static int enable_mcast(struct udp_bearer *ub, struct udp_media_addr *remote)
 406 {
 407         int err = 0;
 408         struct ip_mreqn mreqn;
 409         struct sock *sk = ub->ubsock->sk;
 410
 411         if (ntohs(remote->proto) == ETH_P_IP) {
 412                 mreqn.imr_multiaddr = remote->ipv4;
 413                 mreqn.imr_ifindex = ub->ifindex;
 414                 err = ip_mc_join_group(sk, &mreqn);
 415 #if IS_ENABLED(CONFIG_IPV6)
 416         } else {
 417                 err = ipv6_stub->ipv6_sock_mc_join(sk, ub->ifindex,
 418                                                    &remote->ipv6);
 419 #endif
 420         }
 421         return err;
 422 }
 423
 424 static int __tipc_nl_add_udp_addr(struct sk_buff *skb,
 425                                   struct udp_media_addr *addr, int nla_t)
 426 {
 427         if (ntohs(addr->proto) == ETH_P_IP) {
 428                 struct sockaddr_in ip4;
 429
 430                 memset(&ip4, 0, sizeof(ip4));
 431                 ip4.sin_family = AF_INET;
 432                 ip4.sin_port = addr->port;
 433                 ip4.sin_addr.s_addr = addr->ipv4.s_addr;
 434                 if (nla_put(skb, nla_t, sizeof(ip4), &ip4))
 435                         return -EMSGSIZE;
 436
 437 #if IS_ENABLED(CONFIG_IPV6)
 438         } else if (ntohs(addr->proto) == ETH_P_IPV6) {
 439                 struct sockaddr_in6 ip6;
 440
 441                 memset(&ip6, 0, sizeof(ip6));
 442                 ip6.sin6_family = AF_INET6;
 443                 ip6.sin6_port  = addr->port;
 444                 memcpy(&ip6.sin6_addr, &addr->ipv6, sizeof(struct in6_addr));
 445                 if (nla_put(skb, nla_t, sizeof(ip6), &ip6))
 446                         return -EMSGSIZE;
 447 #endif
 448         }
 449
 450         return 0;
 451 }
 452
 453 int tipc_udp_nl_dump_remoteip(struct sk_buff *skb, struct netlink_callback *cb)
 454 {
 455         u32 bid = cb->args[0];
 456         u32 skip_cnt = cb->args[1];
 457         u32 portid = NETLINK_CB(cb->skb).portid;
 458         struct udp_replicast *rcast, *tmp;
 459         struct tipc_bearer *b;
 460         struct udp_bearer *ub;
 461         void *hdr;
 462         int err;
 463         int i;
 464
 465         if (!bid && !skip_cnt) {
 466                 struct nlattr **attrs = genl_dumpit_info(cb)->attrs;
 467                 struct net *net = sock_net(skb->sk);
 468                 struct nlattr *battrs[TIPC_NLA_BEARER_MAX + 1];
 469                 char *bname;
 470
 471                 if (!attrs[TIPC_NLA_BEARER])
 472                         return -EINVAL;
 473
 474                 err = nla_parse_nested_deprecated(battrs, TIPC_NLA_BEARER_MAX,
 475                                                   attrs[TIPC_NLA_BEARER],
 476                                                   tipc_nl_bearer_policy, NULL);
 477                 if (err)
 478                         return err;
 479
 480                 if (!battrs[TIPC_NLA_BEARER_NAME])
 481                         return -EINVAL;
 482
 483                 bname = nla_data(battrs[TIPC_NLA_BEARER_NAME]);
 484
 485                 rtnl_lock();
 486                 b = tipc_bearer_find(net, bname);
 487                 if (!b) {
 488                         rtnl_unlock();
 489                         return -EINVAL;
 490                 }
 491                 bid = b->identity;
 492         } else {
 493                 struct net *net = sock_net(skb->sk);
 494                 struct tipc_net *tn = net_generic(net, tipc_net_id);
 495
 496                 rtnl_lock();
 497                 b = rtnl_dereference(tn->bearer_list[bid]);
 498                 if (!b) {
 499                         rtnl_unlock();
 500                         return -EINVAL;
 501                 }
 502         }
 503
 504         ub = rtnl_dereference(b->media_ptr);
 505         if (!ub) {
 506                 rtnl_unlock();
 507                 return -EINVAL;
 508         }
 509
 510         i = 0;
 511         list_for_each_entry_safe(rcast, tmp, &ub->rcast.list, list) {
 512                 if (i < skip_cnt)
 513                         goto count;
 514
 515                 hdr = genlmsg_put(skb, portid, cb->nlh->nlmsg_seq,
 516                                   &tipc_genl_family, NLM_F_MULTI,
 517                                   TIPC_NL_BEARER_GET);
 518                 if (!hdr)
 519                         goto done;
 520
 521                 err = __tipc_nl_add_udp_addr(skb, &rcast->addr,
 522                                              TIPC_NLA_UDP_REMOTE);
 523                 if (err) {
 524                         genlmsg_cancel(skb, hdr);
 525                         goto done;
 526                 }
 527                 genlmsg_end(skb, hdr);
 528 count:
 529                 i++;
 530         }
 531 done:
 532         rtnl_unlock();
 533         cb->args[0] = bid;
 534         cb->args[1] = i;
 535
 536         return skb->len;
 537 }
 538
 539 int tipc_udp_nl_add_bearer_data(struct tipc_nl_msg *msg, struct tipc_bearer *b)
 540 {
 541         struct udp_media_addr *src = (struct udp_media_addr *)&b->addr.value;
 542         struct udp_media_addr *dst;
 543         struct udp_bearer *ub;
 544         struct nlattr *nest;
 545
 546         ub = rtnl_dereference(b->media_ptr);
 547         if (!ub)
 548                 return -ENODEV;
 549
 550         nest = nla_nest_start_noflag(msg->skb, TIPC_NLA_BEARER_UDP_OPTS);
 551         if (!nest)
 552                 goto msg_full;
 553
 554         if (__tipc_nl_add_udp_addr(msg->skb, src, TIPC_NLA_UDP_LOCAL))
 555                 goto msg_full;
 556
 557         dst = (struct udp_media_addr *)&b->bcast_addr.value;
 558         if (__tipc_nl_add_udp_addr(msg->skb, dst, TIPC_NLA_UDP_REMOTE))
 559                 goto msg_full;
 560
 561         if (!list_empty(&ub->rcast.list)) {
 562                 if (nla_put_flag(msg->skb, TIPC_NLA_UDP_MULTI_REMOTEIP))
 563                         goto msg_full;
 564         }
 565
 566         nla_nest_end(msg->skb, nest);
 567         return 0;
 568 msg_full:
 569         nla_nest_cancel(msg->skb, nest);
 570         return -EMSGSIZE;
 571 }
 572
 573 /**
 574  * tipc_parse_udp_addr - build udp media address from netlink data
 575  * @nla:        netlink attribute containing sockaddr storage aligned address
 576  * @addr:       tipc media address to fill with address, port and protocol type
 577  * @scope_id:   IPv6 scope id pointer, not NULL indicates it's required
 578  */
 579
 580 static int tipc_parse_udp_addr(struct nlattr *nla, struct udp_media_addr *addr,
 581                                u32 *scope_id)
 582 {
 583         struct sockaddr_storage sa;
 584
 585         nla_memcpy(&sa, nla, sizeof(sa));
 586         if (sa.ss_family == AF_INET) {
 587                 struct sockaddr_in *ip4 = (struct sockaddr_in *)&sa;
 588
 589                 addr->proto = htons(ETH_P_IP);
 590                 addr->port = ip4->sin_port;
 591                 addr->ipv4.s_addr = ip4->sin_addr.s_addr;
 592                 return 0;
 593
 594 #if IS_ENABLED(CONFIG_IPV6)
 595         } else if (sa.ss_family == AF_INET6) {
 596                 struct sockaddr_in6 *ip6 = (struct sockaddr_in6 *)&sa;
 597
 598                 addr->proto = htons(ETH_P_IPV6);
 599                 addr->port = ip6->sin6_port;
 600                 memcpy(&addr->ipv6, &ip6->sin6_addr, sizeof(struct in6_addr));
 601
 602                 /* Scope ID is only interesting for local addresses */
 603                 if (scope_id) {
 604                         int atype;
 605
 606                         atype = ipv6_addr_type(&ip6->sin6_addr);
 607                         if (__ipv6_addr_needs_scope_id(atype) &&
 608                             !ip6->sin6_scope_id) {
 609                                 return -EINVAL;
 610                         }
 611
 612                         *scope_id = ip6->sin6_scope_id ? : 0;
 613                 }
 614
 615                 return 0;
 616 #endif
 617         }
 618         return -EADDRNOTAVAIL;
 619 }
 620
 621 int tipc_udp_nl_bearer_add(struct tipc_bearer *b, struct nlattr *attr)
 622 {
 623         int err;
 624         struct udp_media_addr addr = {0};
 625         struct nlattr *opts[TIPC_NLA_UDP_MAX + 1];
 626         struct udp_media_addr *dst;
 627
 628         if (nla_parse_nested_deprecated(opts, TIPC_NLA_UDP_MAX, attr, tipc_nl_udp_policy, NULL))
 629                 return -EINVAL;
 630
 631         if (!opts[TIPC_NLA_UDP_REMOTE])
 632                 return -EINVAL;
 633
 634         err = tipc_parse_udp_addr(opts[TIPC_NLA_UDP_REMOTE], &addr, NULL);
 635         if (err)
 636                 return err;
 637
 638         dst = (struct udp_media_addr *)&b->bcast_addr.value;
 639         if (tipc_udp_is_mcast_addr(dst)) {
 640                 pr_err("Can't add remote ip to TIPC UDP multicast bearer\n");
 641                 return -EINVAL;
 642         }
 643
 644         if (tipc_udp_is_known_peer(b, &addr))
 645                 return 0;
 646
 647         return tipc_udp_rcast_add(b, &addr);
 648 }
 649
 650 /**
 651  * tipc_udp_enable - callback to create a new udp bearer instance
 652  * @net:        network namespace
 653  * @b:          pointer to generic tipc_bearer
 654  * @attrs:      netlink bearer configuration
 655  *
 656  * validate the bearer parameters and initialize the udp bearer
 657  * rtnl_lock should be held
 658  */
 659 static int tipc_udp_enable(struct net *net, struct tipc_bearer *b,
 660                            struct nlattr *attrs[])
 661 {
 662         int err = -EINVAL;
 663         struct udp_bearer *ub;
 664         struct udp_media_addr remote = {0};
 665         struct udp_media_addr local = {0};
 666         struct udp_port_cfg udp_conf = {0};
 667         struct udp_tunnel_sock_cfg tuncfg = {NULL};
 668         struct nlattr *opts[TIPC_NLA_UDP_MAX + 1];
 669         u8 node_id[NODE_ID_LEN] = {0,};
 670         struct net_device *dev;
 671         int rmcast = 0;
 672
 673         ub = kzalloc(sizeof(*ub), GFP_ATOMIC);
 674         if (!ub)
 675                 return -ENOMEM;
 676
 677         INIT_LIST_HEAD(&ub->rcast.list);
 678
 679         if (!attrs[TIPC_NLA_BEARER_UDP_OPTS])
 680                 goto err;
 681
 682         if (nla_parse_nested_deprecated(opts, TIPC_NLA_UDP_MAX, attrs[TIPC_NLA_BEARER_UDP_OPTS], tipc_nl_udp_policy, NULL))
 683                 goto err;
 684
 685         if (!opts[TIPC_NLA_UDP_LOCAL] || !opts[TIPC_NLA_UDP_REMOTE]) {
 686                 pr_err("Invalid UDP bearer configuration");
 687                 err = -EINVAL;
 688                 goto err;
 689         }
 690
 691         err = tipc_parse_udp_addr(opts[TIPC_NLA_UDP_LOCAL], &local,
 692                                   &ub->ifindex);
 693         if (err)
 694                 goto err;
 695
 696         err = tipc_parse_udp_addr(opts[TIPC_NLA_UDP_REMOTE], &remote, NULL);
 697         if (err)
 698                 goto err;
 699
 700         if (remote.proto != local.proto) {
 701                 err = -EINVAL;
 702                 goto err;
 703         }
 704
 705         /* Checking remote ip address */
 706         rmcast = tipc_udp_is_mcast_addr(&remote);
 707
 708         /* Autoconfigure own node identity if needed */
 709         if (!tipc_own_id(net)) {
 710                 memcpy(node_id, local.ipv6.in6_u.u6_addr8, 16);
 711                 tipc_net_init(net, node_id, 0);
 712         }
 713         if (!tipc_own_id(net)) {
 714                 pr_warn("Failed to set node id, please configure manually\n");
 715                 err = -EINVAL;
 716                 goto err;
 717         }
 718
 719         b->bcast_addr.media_id = TIPC_MEDIA_TYPE_UDP;
 720         b->bcast_addr.broadcast = TIPC_BROADCAST_SUPPORT;
 721         rcu_assign_pointer(b->media_ptr, ub);
 722         rcu_assign_pointer(ub->bearer, b);
 723         tipc_udp_media_addr_set(&b->addr, &local);
 724         if (local.proto == htons(ETH_P_IP)) {
 725                 dev = __ip_dev_find(net, local.ipv4.s_addr, false);
 726                 if (!dev) {
 727                         err = -ENODEV;
 728                         goto err;
 729                 }
 730                 udp_conf.family = AF_INET;
 731
 732                 /* Switch to use ANY to receive packets from group */
 733                 if (rmcast)
 734                         udp_conf.local_ip.s_addr = htonl(INADDR_ANY);
 735                 else
 736                         udp_conf.local_ip.s_addr = local.ipv4.s_addr;
 737                 udp_conf.use_udp_checksums = false;
 738                 ub->ifindex = dev->ifindex;
 739                 if (tipc_mtu_bad(dev, sizeof(struct iphdr) +
 740                                       sizeof(struct udphdr))) {
 741                         err = -EINVAL;
 742                         goto err;
 743                 }
 744                 b->mtu = b->media->mtu;
 745 #if IS_ENABLED(CONFIG_IPV6)
 746         } else if (local.proto == htons(ETH_P_IPV6)) {
 747                 dev = ub->ifindex ? __dev_get_by_index(net, ub->ifindex) : NULL;
 748                 dev = ipv6_dev_find(net, &local.ipv6, dev);
 749                 if (!dev) {
 750                         err = -ENODEV;
 751                         goto err;
 752                 }
 753                 udp_conf.family = AF_INET6;
 754                 udp_conf.use_udp6_tx_checksums = true;
 755                 udp_conf.use_udp6_rx_checksums = true;
 756                 if (rmcast)
 757                         udp_conf.local_ip6 = in6addr_any;
 758                 else
 759                         udp_conf.local_ip6 = local.ipv6;
 760                 ub->ifindex = dev->ifindex;
 761                 b->mtu = 1280;
 762 #endif
 763         } else {
 764                 err = -EAFNOSUPPORT;
 765                 goto err;
 766         }
 767         udp_conf.local_udp_port = local.port;
 768         err = udp_sock_create(net, &udp_conf, &ub->ubsock);
 769         if (err)
 770                 goto err;
 771         tuncfg.sk_user_data = ub;
 772         tuncfg.encap_type = 1;
 773         tuncfg.encap_rcv = tipc_udp_recv;
 774         tuncfg.encap_destroy = NULL;
 775         setup_udp_tunnel_sock(net, ub->ubsock, &tuncfg);
 776
 777         err = dst_cache_init(&ub->rcast.dst_cache, GFP_ATOMIC);
 778         if (err)
 779                 goto free;
 780
 781         /*
 782          * The bcast media address port is used for all peers and the ip
 783          * is used if it's a multicast address.
 784          */
 785         memcpy(&b->bcast_addr.value, &remote, sizeof(remote));
 786         if (rmcast)
 787                 err = enable_mcast(ub, &remote);
 788         else
 789                 err = tipc_udp_rcast_add(b, &remote);
 790         if (err)
 791                 goto free;
 792
 793         return 0;
 794
 795 free:
 796         dst_cache_destroy(&ub->rcast.dst_cache);
 797         udp_tunnel_sock_release(ub->ubsock);
 798 err:
 799         kfree(ub);
 800         return err;
 801 }
 802
 803 /* cleanup_bearer - break the socket/bearer association */
 804 static void cleanup_bearer(struct work_struct *work)
 805 {
 806         struct udp_bearer *ub = container_of(work, struct udp_bearer, work);
 807         struct udp_replicast *rcast, *tmp;
 808
 809         list_for_each_entry_safe(rcast, tmp, &ub->rcast.list, list) {
 810                 dst_cache_destroy(&rcast->dst_cache);
 811                 list_del_rcu(&rcast->list);
 812                 kfree_rcu(rcast, rcu);
 813         }
 814
 815         dst_cache_destroy(&ub->rcast.dst_cache);
 816         udp_tunnel_sock_release(ub->ubsock);
 817         synchronize_net();
 818         kfree(ub);
 819 }
 820
 821 /* tipc_udp_disable - detach bearer from socket */
 822 static void tipc_udp_disable(struct tipc_bearer *b)
 823 {
 824         struct udp_bearer *ub;
 825
 826         ub = rtnl_dereference(b->media_ptr);
 827         if (!ub) {
 828                 pr_err("UDP bearer instance not found\n");
 829                 return;
 830         }
 831         sock_set_flag(ub->ubsock->sk, SOCK_DEAD);
 832         RCU_INIT_POINTER(ub->bearer, NULL);
 833
 834         /* sock_release need to be done outside of rtnl lock */
 835         INIT_WORK(&ub->work, cleanup_bearer);
 836         schedule_work(&ub->work);
 837 }
 838
 839 struct tipc_media udp_media_info = {
 840         .send_msg       = tipc_udp_send_msg,
 841         .enable_media   = tipc_udp_enable,
 842         .disable_media  = tipc_udp_disable,
 843         .addr2str       = tipc_udp_addr2str,
 844         .addr2msg       = tipc_udp_addr2msg,
 845         .msg2addr       = tipc_udp_msg2addr,
 846         .priority       = TIPC_DEF_LINK_PRI,
 847         .tolerance      = TIPC_DEF_LINK_TOL,
 848         .min_win        = TIPC_DEF_LINK_WIN,
 849         .max_win        = TIPC_DEF_LINK_WIN,
 850         .mtu            = TIPC_DEF_LINK_UDP_MTU,
 851         .type_id        = TIPC_MEDIA_TYPE_UDP,
 852         .hwaddr_len     = 0,
 853         .name           = "udp"
 854 };