d80cd3f7503f26b9fc3f6171c125152ac332115b
[cascardo/linux.git] / 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/addrconf.h>
48 #include <linux/tipc_netlink.h>
49 #include "core.h"
50 #include "bearer.h"
51 #include "netlink.h"
52 #include "msg.h"
53
54 /* IANA assigned UDP port */
55 #define UDP_PORT_DEFAULT        6118
56
57 #define UDP_MIN_HEADROOM        48
58
59 /**
60  * struct udp_media_addr - IP/UDP addressing information
61  *
62  * This is the bearer level originating address used in neighbor discovery
63  * messages, and all fields should be in network byte order
64  */
65 struct udp_media_addr {
66         __be16  proto;
67         __be16  port;
68         union {
69                 struct in_addr ipv4;
70                 struct in6_addr ipv6;
71         };
72 };
73
74 /* struct udp_replicast - container for UDP remote addresses */
75 struct udp_replicast {
76         struct udp_media_addr addr;
77         struct rcu_head rcu;
78         struct list_head list;
79 };
80
81 /**
82  * struct udp_bearer - ip/udp bearer data structure
83  * @bearer:     associated generic tipc bearer
84  * @ubsock:     bearer associated socket
85  * @ifindex:    local address scope
86  * @work:       used to schedule deferred work on a bearer
87  */
88 struct udp_bearer {
89         struct tipc_bearer __rcu *bearer;
90         struct socket *ubsock;
91         u32 ifindex;
92         struct work_struct work;
93         struct udp_replicast rcast;
94 };
95
96 static int tipc_udp_is_mcast_addr(struct udp_media_addr *addr)
97 {
98         if (ntohs(addr->proto) == ETH_P_IP)
99                 return ipv4_is_multicast(addr->ipv4.s_addr);
100 #if IS_ENABLED(CONFIG_IPV6)
101         else
102                 return ipv6_addr_is_multicast(&addr->ipv6);
103 #endif
104         return 0;
105 }
106
107 /* udp_media_addr_set - convert a ip/udp address to a TIPC media address */
108 static void tipc_udp_media_addr_set(struct tipc_media_addr *addr,
109                                     struct udp_media_addr *ua)
110 {
111         memset(addr, 0, sizeof(struct tipc_media_addr));
112         addr->media_id = TIPC_MEDIA_TYPE_UDP;
113         memcpy(addr->value, ua, sizeof(struct udp_media_addr));
114
115         if (tipc_udp_is_mcast_addr(ua))
116                 addr->broadcast = 1;
117 }
118
119 /* tipc_udp_addr2str - convert ip/udp address to string */
120 static int tipc_udp_addr2str(struct tipc_media_addr *a, char *buf, int size)
121 {
122         struct udp_media_addr *ua = (struct udp_media_addr *)&a->value;
123
124         if (ntohs(ua->proto) == ETH_P_IP)
125                 snprintf(buf, size, "%pI4:%u", &ua->ipv4, ntohs(ua->port));
126         else if (ntohs(ua->proto) == ETH_P_IPV6)
127                 snprintf(buf, size, "%pI6:%u", &ua->ipv6, ntohs(ua->port));
128         else
129                 pr_err("Invalid UDP media address\n");
130         return 0;
131 }
132
133 /* tipc_udp_msg2addr - extract an ip/udp address from a TIPC ndisc message */
134 static int tipc_udp_msg2addr(struct tipc_bearer *b, struct tipc_media_addr *a,
135                              char *msg)
136 {
137         struct udp_media_addr *ua;
138
139         ua = (struct udp_media_addr *) (msg + TIPC_MEDIA_ADDR_OFFSET);
140         if (msg[TIPC_MEDIA_TYPE_OFFSET] != TIPC_MEDIA_TYPE_UDP)
141                 return -EINVAL;
142         tipc_udp_media_addr_set(a, ua);
143         return 0;
144 }
145
146 /* tipc_udp_addr2msg - write an ip/udp address to a TIPC ndisc message */
147 static int tipc_udp_addr2msg(char *msg, struct tipc_media_addr *a)
148 {
149         memset(msg, 0, TIPC_MEDIA_INFO_SIZE);
150         msg[TIPC_MEDIA_TYPE_OFFSET] = TIPC_MEDIA_TYPE_UDP;
151         memcpy(msg + TIPC_MEDIA_ADDR_OFFSET, a->value,
152                sizeof(struct udp_media_addr));
153         return 0;
154 }
155
156 /* tipc_send_msg - enqueue a send request */
157 static int tipc_udp_xmit(struct net *net, struct sk_buff *skb,
158                          struct udp_bearer *ub, struct udp_media_addr *src,
159                          struct udp_media_addr *dst)
160 {
161         int ttl, err = 0;
162         struct rtable *rt;
163
164         if (dst->proto == htons(ETH_P_IP)) {
165                 struct flowi4 fl = {
166                         .daddr = dst->ipv4.s_addr,
167                         .saddr = src->ipv4.s_addr,
168                         .flowi4_mark = skb->mark,
169                         .flowi4_proto = IPPROTO_UDP
170                 };
171                 rt = ip_route_output_key(net, &fl);
172                 if (IS_ERR(rt)) {
173                         err = PTR_ERR(rt);
174                         goto tx_error;
175                 }
176
177                 skb->dev = rt->dst.dev;
178                 ttl = ip4_dst_hoplimit(&rt->dst);
179                 udp_tunnel_xmit_skb(rt, ub->ubsock->sk, skb, src->ipv4.s_addr,
180                                     dst->ipv4.s_addr, 0, ttl, 0, src->port,
181                                     dst->port, false, true);
182 #if IS_ENABLED(CONFIG_IPV6)
183         } else {
184                 struct dst_entry *ndst;
185                 struct flowi6 fl6 = {
186                         .flowi6_oif = ub->ifindex,
187                         .daddr = dst->ipv6,
188                         .saddr = src->ipv6,
189                         .flowi6_proto = IPPROTO_UDP
190                 };
191                 err = ipv6_stub->ipv6_dst_lookup(net, ub->ubsock->sk, &ndst,
192                                                  &fl6);
193                 if (err)
194                         goto tx_error;
195                 ttl = ip6_dst_hoplimit(ndst);
196                 err = udp_tunnel6_xmit_skb(ndst, ub->ubsock->sk, skb,
197                                            ndst->dev, &src->ipv6,
198                                            &dst->ipv6, 0, ttl, 0, src->port,
199                                            dst->port, false);
200 #endif
201         }
202         return err;
203
204 tx_error:
205         kfree_skb(skb);
206         return err;
207 }
208
209 static int tipc_udp_send_msg(struct net *net, struct sk_buff *skb,
210                              struct tipc_bearer *b,
211                              struct tipc_media_addr *addr)
212 {
213         struct udp_media_addr *src = (struct udp_media_addr *)&b->addr.value;
214         struct udp_media_addr *dst = (struct udp_media_addr *)&addr->value;
215         struct udp_replicast *rcast;
216         struct udp_bearer *ub;
217         int err = 0;
218
219         if (skb_headroom(skb) < UDP_MIN_HEADROOM) {
220                 err = pskb_expand_head(skb, UDP_MIN_HEADROOM, 0, GFP_ATOMIC);
221                 if (err)
222                         goto out;
223         }
224
225         skb_set_inner_protocol(skb, htons(ETH_P_TIPC));
226         ub = rcu_dereference_rtnl(b->media_ptr);
227         if (!ub) {
228                 err = -ENODEV;
229                 goto out;
230         }
231
232         if (!addr->broadcast || list_empty(&ub->rcast.list))
233                 return tipc_udp_xmit(net, skb, ub, src, dst);
234
235         /* Replicast, send an skb to each configured IP address */
236         list_for_each_entry_rcu(rcast, &ub->rcast.list, list) {
237                 struct sk_buff *_skb;
238
239                 _skb = pskb_copy(skb, GFP_ATOMIC);
240                 if (!_skb) {
241                         err = -ENOMEM;
242                         goto out;
243                 }
244
245                 err = tipc_udp_xmit(net, _skb, ub, src, &rcast->addr);
246                 if (err) {
247                         kfree_skb(_skb);
248                         goto out;
249                 }
250         }
251         err = 0;
252 out:
253         kfree_skb(skb);
254         return err;
255 }
256
257 static bool tipc_udp_is_known_peer(struct tipc_bearer *b,
258                                    struct udp_media_addr *addr)
259 {
260         struct udp_replicast *rcast, *tmp;
261         struct udp_bearer *ub;
262
263         ub = rcu_dereference_rtnl(b->media_ptr);
264         if (!ub) {
265                 pr_err_ratelimited("UDP bearer instance not found\n");
266                 return false;
267         }
268
269         list_for_each_entry_safe(rcast, tmp, &ub->rcast.list, list) {
270                 if (!memcmp(&rcast->addr, addr, sizeof(struct udp_media_addr)))
271                         return true;
272         }
273
274         return false;
275 }
276
277 static int tipc_udp_rcast_add(struct tipc_bearer *b,
278                               struct udp_media_addr *addr)
279 {
280         struct udp_replicast *rcast;
281         struct udp_bearer *ub;
282
283         ub = rcu_dereference_rtnl(b->media_ptr);
284         if (!ub)
285                 return -ENODEV;
286
287         rcast = kmalloc(sizeof(*rcast), GFP_ATOMIC);
288         if (!rcast)
289                 return -ENOMEM;
290
291         memcpy(&rcast->addr, addr, sizeof(struct udp_media_addr));
292
293         if (ntohs(addr->proto) == ETH_P_IP)
294                 pr_info("New replicast peer: %pI4\n", &rcast->addr.ipv4);
295 #if IS_ENABLED(CONFIG_IPV6)
296         else if (ntohs(addr->proto) == ETH_P_IPV6)
297                 pr_info("New replicast peer: %pI6\n", &rcast->addr.ipv6);
298 #endif
299
300         list_add_rcu(&rcast->list, &ub->rcast.list);
301         return 0;
302 }
303
304 static int tipc_udp_rcast_disc(struct tipc_bearer *b, struct sk_buff *skb)
305 {
306         struct udp_media_addr src = {0};
307         struct udp_media_addr *dst;
308
309         dst = (struct udp_media_addr *)&b->bcast_addr.value;
310         if (tipc_udp_is_mcast_addr(dst))
311                 return 0;
312
313         src.port = udp_hdr(skb)->source;
314
315         if (ip_hdr(skb)->version == 4) {
316                 struct iphdr *iphdr = ip_hdr(skb);
317
318                 src.proto = htons(ETH_P_IP);
319                 src.ipv4.s_addr = iphdr->saddr;
320                 if (ipv4_is_multicast(iphdr->daddr))
321                         return 0;
322 #if IS_ENABLED(CONFIG_IPV6)
323         } else if (ip_hdr(skb)->version == 6) {
324                 struct ipv6hdr *iphdr = ipv6_hdr(skb);
325
326                 src.proto = htons(ETH_P_IPV6);
327                 src.ipv6 = iphdr->saddr;
328                 if (ipv6_addr_is_multicast(&iphdr->daddr))
329                         return 0;
330 #endif
331         } else {
332                 return 0;
333         }
334
335         if (likely(tipc_udp_is_known_peer(b, &src)))
336                 return 0;
337
338         return tipc_udp_rcast_add(b, &src);
339 }
340
341 /* tipc_udp_recv - read data from bearer socket */
342 static int tipc_udp_recv(struct sock *sk, struct sk_buff *skb)
343 {
344         struct udp_bearer *ub;
345         struct tipc_bearer *b;
346         struct tipc_msg *hdr;
347         int err;
348
349         ub = rcu_dereference_sk_user_data(sk);
350         if (!ub) {
351                 pr_err_ratelimited("Failed to get UDP bearer reference");
352                 goto out;
353         }
354         skb_pull(skb, sizeof(struct udphdr));
355         hdr = buf_msg(skb);
356
357         rcu_read_lock();
358         b = rcu_dereference_rtnl(ub->bearer);
359         if (!b)
360                 goto rcu_out;
361
362         if (b && test_bit(0, &b->up)) {
363                 tipc_rcv(sock_net(sk), skb, b);
364                 rcu_read_unlock();
365                 return 0;
366         }
367
368         if (unlikely(msg_user(hdr) == LINK_CONFIG)) {
369                 err = tipc_udp_rcast_disc(b, skb);
370                 if (err)
371                         goto rcu_out;
372         }
373
374         tipc_rcv(sock_net(sk), skb, b);
375         rcu_read_unlock();
376         return 0;
377
378 rcu_out:
379         rcu_read_unlock();
380 out:
381         kfree_skb(skb);
382         return 0;
383 }
384
385 static int enable_mcast(struct udp_bearer *ub, struct udp_media_addr *remote)
386 {
387         int err = 0;
388         struct ip_mreqn mreqn;
389         struct sock *sk = ub->ubsock->sk;
390
391         if (ntohs(remote->proto) == ETH_P_IP) {
392                 mreqn.imr_multiaddr = remote->ipv4;
393                 mreqn.imr_ifindex = ub->ifindex;
394                 err = ip_mc_join_group(sk, &mreqn);
395 #if IS_ENABLED(CONFIG_IPV6)
396         } else {
397                 err = ipv6_stub->ipv6_sock_mc_join(sk, ub->ifindex,
398                                                    &remote->ipv6);
399 #endif
400         }
401         return err;
402 }
403
404 static int __tipc_nl_add_udp_addr(struct sk_buff *skb,
405                                   struct udp_media_addr *addr, int nla_t)
406 {
407         if (ntohs(addr->proto) == ETH_P_IP) {
408                 struct sockaddr_in ip4;
409
410                 ip4.sin_family = AF_INET;
411                 ip4.sin_port = addr->port;
412                 ip4.sin_addr.s_addr = addr->ipv4.s_addr;
413                 if (nla_put(skb, nla_t, sizeof(ip4), &ip4))
414                         return -EMSGSIZE;
415
416 #if IS_ENABLED(CONFIG_IPV6)
417         } else if (ntohs(addr->proto) == ETH_P_IPV6) {
418                 struct sockaddr_in6 ip6;
419
420                 ip6.sin6_family = AF_INET6;
421                 ip6.sin6_port  = addr->port;
422                 memcpy(&ip6.sin6_addr, &addr->ipv6, sizeof(struct in6_addr));
423                 if (nla_put(skb, nla_t, sizeof(ip6), &ip6))
424                         return -EMSGSIZE;
425 #endif
426         }
427
428         return 0;
429 }
430
431 int tipc_udp_nl_dump_remoteip(struct sk_buff *skb, struct netlink_callback *cb)
432 {
433         u32 bid = cb->args[0];
434         u32 skip_cnt = cb->args[1];
435         u32 portid = NETLINK_CB(cb->skb).portid;
436         struct udp_replicast *rcast, *tmp;
437         struct tipc_bearer *b;
438         struct udp_bearer *ub;
439         void *hdr;
440         int err;
441         int i;
442
443         if (!bid && !skip_cnt) {
444                 struct net *net = sock_net(skb->sk);
445                 struct nlattr *battrs[TIPC_NLA_BEARER_MAX + 1];
446                 struct nlattr **attrs;
447                 char *bname;
448
449                 err = tipc_nlmsg_parse(cb->nlh, &attrs);
450                 if (err)
451                         return err;
452
453                 if (!attrs[TIPC_NLA_BEARER])
454                         return -EINVAL;
455
456                 err = nla_parse_nested(battrs, TIPC_NLA_BEARER_MAX,
457                                        attrs[TIPC_NLA_BEARER],
458                                        tipc_nl_bearer_policy);
459                 if (err)
460                         return err;
461
462                 if (!battrs[TIPC_NLA_BEARER_NAME])
463                         return -EINVAL;
464
465                 bname = nla_data(battrs[TIPC_NLA_BEARER_NAME]);
466
467                 rtnl_lock();
468                 b = tipc_bearer_find(net, bname);
469                 if (!b) {
470                         rtnl_unlock();
471                         return -EINVAL;
472                 }
473                 bid = b->identity;
474         } else {
475                 struct net *net = sock_net(skb->sk);
476                 struct tipc_net *tn = net_generic(net, tipc_net_id);
477
478                 rtnl_lock();
479                 b = rtnl_dereference(tn->bearer_list[bid]);
480                 if (!b) {
481                         rtnl_unlock();
482                         return -EINVAL;
483                 }
484         }
485
486         ub = rcu_dereference_rtnl(b->media_ptr);
487         if (!ub) {
488                 rtnl_unlock();
489                 return -EINVAL;
490         }
491
492         i = 0;
493         list_for_each_entry_safe(rcast, tmp, &ub->rcast.list, list) {
494                 if (i < skip_cnt)
495                         goto count;
496
497                 hdr = genlmsg_put(skb, portid, cb->nlh->nlmsg_seq,
498                                   &tipc_genl_family, NLM_F_MULTI,
499                                   TIPC_NL_BEARER_GET);
500                 if (!hdr)
501                         goto done;
502
503                 err = __tipc_nl_add_udp_addr(skb, &rcast->addr,
504                                              TIPC_NLA_UDP_REMOTE);
505                 if (err) {
506                         genlmsg_cancel(skb, hdr);
507                         goto done;
508                 }
509                 genlmsg_end(skb, hdr);
510 count:
511                 i++;
512         }
513 done:
514         rtnl_unlock();
515         cb->args[0] = bid;
516         cb->args[1] = i;
517
518         return skb->len;
519 }
520
521 int tipc_udp_nl_add_bearer_data(struct tipc_nl_msg *msg, struct tipc_bearer *b)
522 {
523         struct udp_media_addr *src = (struct udp_media_addr *)&b->addr.value;
524         struct udp_media_addr *dst;
525         struct udp_bearer *ub;
526         struct nlattr *nest;
527
528         ub = rcu_dereference_rtnl(b->media_ptr);
529         if (!ub)
530                 return -ENODEV;
531
532         nest = nla_nest_start(msg->skb, TIPC_NLA_BEARER_UDP_OPTS);
533         if (!nest)
534                 goto msg_full;
535
536         if (__tipc_nl_add_udp_addr(msg->skb, src, TIPC_NLA_UDP_LOCAL))
537                 goto msg_full;
538
539         dst = (struct udp_media_addr *)&b->bcast_addr.value;
540         if (__tipc_nl_add_udp_addr(msg->skb, dst, TIPC_NLA_UDP_REMOTE))
541                 goto msg_full;
542
543         if (!list_empty(&ub->rcast.list)) {
544                 if (nla_put_flag(msg->skb, TIPC_NLA_UDP_MULTI_REMOTEIP))
545                         goto msg_full;
546         }
547
548         nla_nest_end(msg->skb, nest);
549         return 0;
550 msg_full:
551         nla_nest_cancel(msg->skb, nest);
552         return -EMSGSIZE;
553 }
554
555 /**
556  * tipc_parse_udp_addr - build udp media address from netlink data
557  * @nlattr:     netlink attribute containing sockaddr storage aligned address
558  * @addr:       tipc media address to fill with address, port and protocol type
559  * @scope_id:   IPv6 scope id pointer, not NULL indicates it's required
560  */
561
562 static int tipc_parse_udp_addr(struct nlattr *nla, struct udp_media_addr *addr,
563                                u32 *scope_id)
564 {
565         struct sockaddr_storage sa;
566
567         nla_memcpy(&sa, nla, sizeof(sa));
568         if (sa.ss_family == AF_INET) {
569                 struct sockaddr_in *ip4 = (struct sockaddr_in *)&sa;
570
571                 addr->proto = htons(ETH_P_IP);
572                 addr->port = ip4->sin_port;
573                 addr->ipv4.s_addr = ip4->sin_addr.s_addr;
574                 return 0;
575
576 #if IS_ENABLED(CONFIG_IPV6)
577         } else if (sa.ss_family == AF_INET6) {
578                 struct sockaddr_in6 *ip6 = (struct sockaddr_in6 *)&sa;
579
580                 addr->proto = htons(ETH_P_IPV6);
581                 addr->port = ip6->sin6_port;
582                 memcpy(&addr->ipv6, &ip6->sin6_addr, sizeof(struct in6_addr));
583
584                 /* Scope ID is only interesting for local addresses */
585                 if (scope_id) {
586                         int atype;
587
588                         atype = ipv6_addr_type(&ip6->sin6_addr);
589                         if (__ipv6_addr_needs_scope_id(atype) &&
590                             !ip6->sin6_scope_id) {
591                                 return -EINVAL;
592                         }
593
594                         *scope_id = ip6->sin6_scope_id ? : 0;
595                 }
596
597                 return 0;
598 #endif
599         }
600         return -EADDRNOTAVAIL;
601 }
602
603 int tipc_udp_nl_bearer_add(struct tipc_bearer *b, struct nlattr *attr)
604 {
605         int err;
606         struct udp_media_addr addr = {0};
607         struct nlattr *opts[TIPC_NLA_UDP_MAX + 1];
608         struct udp_media_addr *dst;
609
610         if (nla_parse_nested(opts, TIPC_NLA_UDP_MAX, attr, tipc_nl_udp_policy))
611                 return -EINVAL;
612
613         if (!opts[TIPC_NLA_UDP_REMOTE])
614                 return -EINVAL;
615
616         err = tipc_parse_udp_addr(opts[TIPC_NLA_UDP_REMOTE], &addr, NULL);
617         if (err)
618                 return err;
619
620         dst = (struct udp_media_addr *)&b->bcast_addr.value;
621         if (tipc_udp_is_mcast_addr(dst)) {
622                 pr_err("Can't add remote ip to TIPC UDP multicast bearer\n");
623                 return -EINVAL;
624         }
625
626         if (tipc_udp_is_known_peer(b, &addr))
627                 return 0;
628
629         return tipc_udp_rcast_add(b, &addr);
630 }
631
632 /**
633  * tipc_udp_enable - callback to create a new udp bearer instance
634  * @net:        network namespace
635  * @b:          pointer to generic tipc_bearer
636  * @attrs:      netlink bearer configuration
637  *
638  * validate the bearer parameters and initialize the udp bearer
639  * rtnl_lock should be held
640  */
641 static int tipc_udp_enable(struct net *net, struct tipc_bearer *b,
642                            struct nlattr *attrs[])
643 {
644         int err = -EINVAL;
645         struct udp_bearer *ub;
646         struct udp_media_addr remote = {0};
647         struct udp_media_addr local = {0};
648         struct udp_port_cfg udp_conf = {0};
649         struct udp_tunnel_sock_cfg tuncfg = {NULL};
650         struct nlattr *opts[TIPC_NLA_UDP_MAX + 1];
651
652         ub = kzalloc(sizeof(*ub), GFP_ATOMIC);
653         if (!ub)
654                 return -ENOMEM;
655
656         INIT_LIST_HEAD(&ub->rcast.list);
657
658         if (!attrs[TIPC_NLA_BEARER_UDP_OPTS])
659                 goto err;
660
661         if (nla_parse_nested(opts, TIPC_NLA_UDP_MAX,
662                              attrs[TIPC_NLA_BEARER_UDP_OPTS],
663                              tipc_nl_udp_policy))
664                 goto err;
665
666         if (!opts[TIPC_NLA_UDP_LOCAL] || !opts[TIPC_NLA_UDP_REMOTE]) {
667                 pr_err("Invalid UDP bearer configuration");
668                 err = -EINVAL;
669                 goto err;
670         }
671
672         err = tipc_parse_udp_addr(opts[TIPC_NLA_UDP_LOCAL], &local,
673                                   &ub->ifindex);
674         if (err)
675                 goto err;
676
677         err = tipc_parse_udp_addr(opts[TIPC_NLA_UDP_REMOTE], &remote, NULL);
678         if (err)
679                 goto err;
680
681         b->bcast_addr.media_id = TIPC_MEDIA_TYPE_UDP;
682         b->bcast_addr.broadcast = 1;
683         rcu_assign_pointer(b->media_ptr, ub);
684         rcu_assign_pointer(ub->bearer, b);
685         tipc_udp_media_addr_set(&b->addr, &local);
686         if (local.proto == htons(ETH_P_IP)) {
687                 struct net_device *dev;
688
689                 dev = __ip_dev_find(net, local.ipv4.s_addr, false);
690                 if (!dev) {
691                         err = -ENODEV;
692                         goto err;
693                 }
694                 udp_conf.family = AF_INET;
695                 udp_conf.local_ip.s_addr = htonl(INADDR_ANY);
696                 udp_conf.use_udp_checksums = false;
697                 ub->ifindex = dev->ifindex;
698                 b->mtu = dev->mtu - sizeof(struct iphdr)
699                         - sizeof(struct udphdr);
700 #if IS_ENABLED(CONFIG_IPV6)
701         } else if (local.proto == htons(ETH_P_IPV6)) {
702                 udp_conf.family = AF_INET6;
703                 udp_conf.use_udp6_tx_checksums = true;
704                 udp_conf.use_udp6_rx_checksums = true;
705                 udp_conf.local_ip6 = in6addr_any;
706                 b->mtu = 1280;
707 #endif
708         } else {
709                 err = -EAFNOSUPPORT;
710                 goto err;
711         }
712         udp_conf.local_udp_port = local.port;
713         err = udp_sock_create(net, &udp_conf, &ub->ubsock);
714         if (err)
715                 goto err;
716         tuncfg.sk_user_data = ub;
717         tuncfg.encap_type = 1;
718         tuncfg.encap_rcv = tipc_udp_recv;
719         tuncfg.encap_destroy = NULL;
720         setup_udp_tunnel_sock(net, ub->ubsock, &tuncfg);
721
722         /**
723          * The bcast media address port is used for all peers and the ip
724          * is used if it's a multicast address.
725          */
726         memcpy(&b->bcast_addr.value, &remote, sizeof(remote));
727         if (tipc_udp_is_mcast_addr(&remote))
728                 err = enable_mcast(ub, &remote);
729         else
730                 err = tipc_udp_rcast_add(b, &remote);
731         if (err)
732                 goto err;
733
734         return 0;
735 err:
736         if (ub->ubsock)
737                 udp_tunnel_sock_release(ub->ubsock);
738         kfree(ub);
739         return err;
740 }
741
742 /* cleanup_bearer - break the socket/bearer association */
743 static void cleanup_bearer(struct work_struct *work)
744 {
745         struct udp_bearer *ub = container_of(work, struct udp_bearer, work);
746         struct udp_replicast *rcast, *tmp;
747
748         list_for_each_entry_safe(rcast, tmp, &ub->rcast.list, list) {
749                 list_del_rcu(&rcast->list);
750                 kfree_rcu(rcast, rcu);
751         }
752
753         if (ub->ubsock)
754                 udp_tunnel_sock_release(ub->ubsock);
755         synchronize_net();
756         kfree(ub);
757 }
758
759 /* tipc_udp_disable - detach bearer from socket */
760 static void tipc_udp_disable(struct tipc_bearer *b)
761 {
762         struct udp_bearer *ub;
763
764         ub = rcu_dereference_rtnl(b->media_ptr);
765         if (!ub) {
766                 pr_err("UDP bearer instance not found\n");
767                 return;
768         }
769         if (ub->ubsock)
770                 sock_set_flag(ub->ubsock->sk, SOCK_DEAD);
771         RCU_INIT_POINTER(ub->bearer, NULL);
772
773         /* sock_release need to be done outside of rtnl lock */
774         INIT_WORK(&ub->work, cleanup_bearer);
775         schedule_work(&ub->work);
776 }
777
778 struct tipc_media udp_media_info = {
779         .send_msg       = tipc_udp_send_msg,
780         .enable_media   = tipc_udp_enable,
781         .disable_media  = tipc_udp_disable,
782         .addr2str       = tipc_udp_addr2str,
783         .addr2msg       = tipc_udp_addr2msg,
784         .msg2addr       = tipc_udp_msg2addr,
785         .priority       = TIPC_DEF_LINK_PRI,
786         .tolerance      = TIPC_DEF_LINK_TOL,
787         .window         = TIPC_DEF_LINK_WIN,
788         .type_id        = TIPC_MEDIA_TYPE_UDP,
789         .hwaddr_len     = 0,
790         .name           = "udp"
791 };