GNU Linux-libre 4.19.264-gnu1
[releases.git] / net / tipc / bearer.c
1 /*
2  * net/tipc/bearer.c: TIPC bearer code
3  *
4  * Copyright (c) 1996-2006, 2013-2016, Ericsson AB
5  * Copyright (c) 2004-2006, 2010-2013, Wind River Systems
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions are met:
10  *
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. Neither the names of the copyright holders nor the names of its
17  *    contributors may be used to endorse or promote products derived from
18  *    this software without specific prior written permission.
19  *
20  * Alternatively, this software may be distributed under the terms of the
21  * GNU General Public License ("GPL") version 2 as published by the Free
22  * Software Foundation.
23  *
24  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
25  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
28  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
29  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
30  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
31  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
32  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
33  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
34  * POSSIBILITY OF SUCH DAMAGE.
35  */
36
37 #include <net/sock.h>
38 #include "core.h"
39 #include "bearer.h"
40 #include "link.h"
41 #include "discover.h"
42 #include "monitor.h"
43 #include "bcast.h"
44 #include "netlink.h"
45 #include "udp_media.h"
46
47 #define MAX_ADDR_STR 60
48
49 static struct tipc_media * const media_info_array[] = {
50         &eth_media_info,
51 #ifdef CONFIG_TIPC_MEDIA_IB
52         &ib_media_info,
53 #endif
54 #ifdef CONFIG_TIPC_MEDIA_UDP
55         &udp_media_info,
56 #endif
57         NULL
58 };
59
60 static struct tipc_bearer *bearer_get(struct net *net, int bearer_id)
61 {
62         struct tipc_net *tn = tipc_net(net);
63
64         return rcu_dereference_rtnl(tn->bearer_list[bearer_id]);
65 }
66
67 static void bearer_disable(struct net *net, struct tipc_bearer *b);
68 static int tipc_l2_rcv_msg(struct sk_buff *skb, struct net_device *dev,
69                            struct packet_type *pt, struct net_device *orig_dev);
70
71 /**
72  * tipc_media_find - locates specified media object by name
73  */
74 struct tipc_media *tipc_media_find(const char *name)
75 {
76         u32 i;
77
78         for (i = 0; media_info_array[i] != NULL; i++) {
79                 if (!strcmp(media_info_array[i]->name, name))
80                         break;
81         }
82         return media_info_array[i];
83 }
84
85 /**
86  * media_find_id - locates specified media object by type identifier
87  */
88 static struct tipc_media *media_find_id(u8 type)
89 {
90         u32 i;
91
92         for (i = 0; media_info_array[i] != NULL; i++) {
93                 if (media_info_array[i]->type_id == type)
94                         break;
95         }
96         return media_info_array[i];
97 }
98
99 /**
100  * tipc_media_addr_printf - record media address in print buffer
101  */
102 void tipc_media_addr_printf(char *buf, int len, struct tipc_media_addr *a)
103 {
104         char addr_str[MAX_ADDR_STR];
105         struct tipc_media *m;
106         int ret;
107
108         m = media_find_id(a->media_id);
109
110         if (m && !m->addr2str(a, addr_str, sizeof(addr_str)))
111                 ret = scnprintf(buf, len, "%s(%s)", m->name, addr_str);
112         else {
113                 u32 i;
114
115                 ret = scnprintf(buf, len, "UNKNOWN(%u)", a->media_id);
116                 for (i = 0; i < sizeof(a->value); i++)
117                         ret += scnprintf(buf - ret, len + ret,
118                                             "-%02x", a->value[i]);
119         }
120 }
121
122 /**
123  * bearer_name_validate - validate & (optionally) deconstruct bearer name
124  * @name: ptr to bearer name string
125  * @name_parts: ptr to area for bearer name components (or NULL if not needed)
126  *
127  * Returns 1 if bearer name is valid, otherwise 0.
128  */
129 static int bearer_name_validate(const char *name,
130                                 struct tipc_bearer_names *name_parts)
131 {
132         char name_copy[TIPC_MAX_BEARER_NAME];
133         char *media_name;
134         char *if_name;
135         u32 media_len;
136         u32 if_len;
137
138         /* copy bearer name & ensure length is OK */
139         name_copy[TIPC_MAX_BEARER_NAME - 1] = 0;
140         /* need above in case non-Posix strncpy() doesn't pad with nulls */
141         strncpy(name_copy, name, TIPC_MAX_BEARER_NAME);
142         if (name_copy[TIPC_MAX_BEARER_NAME - 1] != 0)
143                 return 0;
144
145         /* ensure all component parts of bearer name are present */
146         media_name = name_copy;
147         if_name = strchr(media_name, ':');
148         if (if_name == NULL)
149                 return 0;
150         *(if_name++) = 0;
151         media_len = if_name - media_name;
152         if_len = strlen(if_name) + 1;
153
154         /* validate component parts of bearer name */
155         if ((media_len <= 1) || (media_len > TIPC_MAX_MEDIA_NAME) ||
156             (if_len <= 1) || (if_len > TIPC_MAX_IF_NAME))
157                 return 0;
158
159         /* return bearer name components, if necessary */
160         if (name_parts) {
161                 strcpy(name_parts->media_name, media_name);
162                 strcpy(name_parts->if_name, if_name);
163         }
164         return 1;
165 }
166
167 /**
168  * tipc_bearer_find - locates bearer object with matching bearer name
169  */
170 struct tipc_bearer *tipc_bearer_find(struct net *net, const char *name)
171 {
172         struct tipc_net *tn = net_generic(net, tipc_net_id);
173         struct tipc_bearer *b;
174         u32 i;
175
176         for (i = 0; i < MAX_BEARERS; i++) {
177                 b = rtnl_dereference(tn->bearer_list[i]);
178                 if (b && (!strcmp(b->name, name)))
179                         return b;
180         }
181         return NULL;
182 }
183
184 /*     tipc_bearer_get_name - get the bearer name from its id.
185  *     @net: network namespace
186  *     @name: a pointer to the buffer where the name will be stored.
187  *     @bearer_id: the id to get the name from.
188  */
189 int tipc_bearer_get_name(struct net *net, char *name, u32 bearer_id)
190 {
191         struct tipc_net *tn = tipc_net(net);
192         struct tipc_bearer *b;
193
194         if (bearer_id >= MAX_BEARERS)
195                 return -EINVAL;
196
197         b = rtnl_dereference(tn->bearer_list[bearer_id]);
198         if (!b)
199                 return -EINVAL;
200
201         strcpy(name, b->name);
202         return 0;
203 }
204
205 void tipc_bearer_add_dest(struct net *net, u32 bearer_id, u32 dest)
206 {
207         struct tipc_net *tn = net_generic(net, tipc_net_id);
208         struct tipc_bearer *b;
209
210         rcu_read_lock();
211         b = rcu_dereference_rtnl(tn->bearer_list[bearer_id]);
212         if (b)
213                 tipc_disc_add_dest(b->disc);
214         rcu_read_unlock();
215 }
216
217 void tipc_bearer_remove_dest(struct net *net, u32 bearer_id, u32 dest)
218 {
219         struct tipc_net *tn = net_generic(net, tipc_net_id);
220         struct tipc_bearer *b;
221
222         rcu_read_lock();
223         b = rcu_dereference_rtnl(tn->bearer_list[bearer_id]);
224         if (b)
225                 tipc_disc_remove_dest(b->disc);
226         rcu_read_unlock();
227 }
228
229 /**
230  * tipc_enable_bearer - enable bearer with the given name
231  */
232 static int tipc_enable_bearer(struct net *net, const char *name,
233                               u32 disc_domain, u32 prio,
234                               struct nlattr *attr[],
235                               struct netlink_ext_ack *extack)
236 {
237         struct tipc_net *tn = tipc_net(net);
238         struct tipc_bearer_names b_names;
239         int with_this_prio = 1;
240         struct tipc_bearer *b;
241         struct tipc_media *m;
242         struct sk_buff *skb;
243         int bearer_id = 0;
244         int res = -EINVAL;
245         char *errstr = "";
246         u32 i;
247
248         if (!bearer_name_validate(name, &b_names)) {
249                 NL_SET_ERR_MSG(extack, "Illegal name");
250                 return res;
251         }
252
253         if (prio > TIPC_MAX_LINK_PRI && prio != TIPC_MEDIA_LINK_PRI) {
254                 errstr = "illegal priority";
255                 NL_SET_ERR_MSG(extack, "Illegal priority");
256                 goto rejected;
257         }
258
259         m = tipc_media_find(b_names.media_name);
260         if (!m) {
261                 errstr = "media not registered";
262                 NL_SET_ERR_MSG(extack, "Media not registered");
263                 goto rejected;
264         }
265
266         if (prio == TIPC_MEDIA_LINK_PRI)
267                 prio = m->priority;
268
269         /* Check new bearer vs existing ones and find free bearer id if any */
270         bearer_id = MAX_BEARERS;
271         i = MAX_BEARERS;
272         while (i-- != 0) {
273                 b = rtnl_dereference(tn->bearer_list[i]);
274                 if (!b) {
275                         bearer_id = i;
276                         continue;
277                 }
278                 if (!strcmp(name, b->name)) {
279                         errstr = "already enabled";
280                         NL_SET_ERR_MSG(extack, "Already enabled");
281                         goto rejected;
282                 }
283
284                 if (b->priority == prio &&
285                     (++with_this_prio > 2)) {
286                         pr_warn("Bearer <%s>: already 2 bearers with priority %u\n",
287                                 name, prio);
288
289                         if (prio == TIPC_MIN_LINK_PRI) {
290                                 errstr = "cannot adjust to lower";
291                                 NL_SET_ERR_MSG(extack, "Cannot adjust to lower");
292                                 goto rejected;
293                         }
294
295                         pr_warn("Bearer <%s>: trying with adjusted priority\n",
296                                 name);
297                         prio--;
298                         bearer_id = MAX_BEARERS;
299                         i = MAX_BEARERS;
300                         with_this_prio = 1;
301                 }
302         }
303
304         if (bearer_id >= MAX_BEARERS) {
305                 errstr = "max 3 bearers permitted";
306                 NL_SET_ERR_MSG(extack, "Max 3 bearers permitted");
307                 goto rejected;
308         }
309
310         b = kzalloc(sizeof(*b), GFP_ATOMIC);
311         if (!b)
312                 return -ENOMEM;
313
314         strcpy(b->name, name);
315         b->media = m;
316         res = m->enable_media(net, b, attr);
317         if (res) {
318                 kfree(b);
319                 errstr = "failed to enable media";
320                 NL_SET_ERR_MSG(extack, "Failed to enable media");
321                 goto rejected;
322         }
323
324         b->identity = bearer_id;
325         b->tolerance = m->tolerance;
326         b->window = m->window;
327         b->domain = disc_domain;
328         b->net_plane = bearer_id + 'A';
329         b->priority = prio;
330         test_and_set_bit_lock(0, &b->up);
331
332         res = tipc_disc_create(net, b, &b->bcast_addr, &skb);
333         if (res) {
334                 bearer_disable(net, b);
335                 errstr = "failed to create discoverer";
336                 NL_SET_ERR_MSG(extack, "Failed to create discoverer");
337                 goto rejected;
338         }
339
340         rcu_assign_pointer(tn->bearer_list[bearer_id], b);
341         if (skb)
342                 tipc_bearer_xmit_skb(net, bearer_id, skb, &b->bcast_addr);
343
344         if (tipc_mon_create(net, bearer_id)) {
345                 bearer_disable(net, b);
346                 return -ENOMEM;
347         }
348
349         pr_info("Enabled bearer <%s>, priority %u\n", name, prio);
350
351         return res;
352 rejected:
353         pr_warn("Enabling of bearer <%s> rejected, %s\n", name, errstr);
354         return res;
355 }
356
357 /**
358  * tipc_reset_bearer - Reset all links established over this bearer
359  */
360 static int tipc_reset_bearer(struct net *net, struct tipc_bearer *b)
361 {
362         pr_info("Resetting bearer <%s>\n", b->name);
363         tipc_node_delete_links(net, b->identity);
364         tipc_disc_reset(net, b);
365         return 0;
366 }
367
368 /**
369  * bearer_disable
370  *
371  * Note: This routine assumes caller holds RTNL lock.
372  */
373 static void bearer_disable(struct net *net, struct tipc_bearer *b)
374 {
375         struct tipc_net *tn = tipc_net(net);
376         int bearer_id = b->identity;
377
378         pr_info("Disabling bearer <%s>\n", b->name);
379         clear_bit_unlock(0, &b->up);
380         tipc_node_delete_links(net, bearer_id);
381         b->media->disable_media(b);
382         RCU_INIT_POINTER(b->media_ptr, NULL);
383         if (b->disc)
384                 tipc_disc_delete(b->disc);
385         RCU_INIT_POINTER(tn->bearer_list[bearer_id], NULL);
386         kfree_rcu(b, rcu);
387         tipc_mon_delete(net, bearer_id);
388 }
389
390 int tipc_enable_l2_media(struct net *net, struct tipc_bearer *b,
391                          struct nlattr *attr[])
392 {
393         char *dev_name = strchr((const char *)b->name, ':') + 1;
394         int hwaddr_len = b->media->hwaddr_len;
395         u8 node_id[NODE_ID_LEN] = {0,};
396         struct net_device *dev;
397
398         /* Find device with specified name */
399         dev = dev_get_by_name(net, dev_name);
400         if (!dev)
401                 return -ENODEV;
402         if (tipc_mtu_bad(dev, 0)) {
403                 dev_put(dev);
404                 return -EINVAL;
405         }
406
407         /* Autoconfigure own node identity if needed */
408         if (!tipc_own_id(net) && hwaddr_len <= NODE_ID_LEN) {
409                 memcpy(node_id, dev->dev_addr, hwaddr_len);
410                 tipc_net_init(net, node_id, 0);
411         }
412         if (!tipc_own_id(net)) {
413                 dev_put(dev);
414                 pr_warn("Failed to obtain node identity\n");
415                 return -EINVAL;
416         }
417
418         /* Associate TIPC bearer with L2 bearer */
419         rcu_assign_pointer(b->media_ptr, dev);
420         b->pt.dev = dev;
421         b->pt.type = htons(ETH_P_TIPC);
422         b->pt.func = tipc_l2_rcv_msg;
423         dev_add_pack(&b->pt);
424         memset(&b->bcast_addr, 0, sizeof(b->bcast_addr));
425         memcpy(b->bcast_addr.value, dev->broadcast, hwaddr_len);
426         b->bcast_addr.media_id = b->media->type_id;
427         b->bcast_addr.broadcast = TIPC_BROADCAST_SUPPORT;
428         b->mtu = dev->mtu;
429         b->media->raw2addr(b, &b->addr, (char *)dev->dev_addr);
430         rcu_assign_pointer(dev->tipc_ptr, b);
431         return 0;
432 }
433
434 /* tipc_disable_l2_media - detach TIPC bearer from an L2 interface
435  *
436  * Mark L2 bearer as inactive so that incoming buffers are thrown away
437  */
438 void tipc_disable_l2_media(struct tipc_bearer *b)
439 {
440         struct net_device *dev;
441
442         dev = (struct net_device *)rtnl_dereference(b->media_ptr);
443         dev_remove_pack(&b->pt);
444         RCU_INIT_POINTER(dev->tipc_ptr, NULL);
445         synchronize_net();
446         dev_put(dev);
447 }
448
449 /**
450  * tipc_l2_send_msg - send a TIPC packet out over an L2 interface
451  * @skb: the packet to be sent
452  * @b: the bearer through which the packet is to be sent
453  * @dest: peer destination address
454  */
455 int tipc_l2_send_msg(struct net *net, struct sk_buff *skb,
456                      struct tipc_bearer *b, struct tipc_media_addr *dest)
457 {
458         struct net_device *dev;
459         int delta;
460
461         dev = (struct net_device *)rcu_dereference_rtnl(b->media_ptr);
462         if (!dev)
463                 return 0;
464
465         delta = SKB_DATA_ALIGN(dev->hard_header_len - skb_headroom(skb));
466         if ((delta > 0) && pskb_expand_head(skb, delta, 0, GFP_ATOMIC)) {
467                 kfree_skb(skb);
468                 return 0;
469         }
470         skb_reset_network_header(skb);
471         skb->dev = dev;
472         skb->protocol = htons(ETH_P_TIPC);
473         dev_hard_header(skb, dev, ETH_P_TIPC, dest->value,
474                         dev->dev_addr, skb->len);
475         dev_queue_xmit(skb);
476         return 0;
477 }
478
479 bool tipc_bearer_bcast_support(struct net *net, u32 bearer_id)
480 {
481         bool supp = false;
482         struct tipc_bearer *b;
483
484         rcu_read_lock();
485         b = bearer_get(net, bearer_id);
486         if (b)
487                 supp = (b->bcast_addr.broadcast == TIPC_BROADCAST_SUPPORT);
488         rcu_read_unlock();
489         return supp;
490 }
491
492 int tipc_bearer_mtu(struct net *net, u32 bearer_id)
493 {
494         int mtu = 0;
495         struct tipc_bearer *b;
496
497         rcu_read_lock();
498         b = rcu_dereference_rtnl(tipc_net(net)->bearer_list[bearer_id]);
499         if (b)
500                 mtu = b->mtu;
501         rcu_read_unlock();
502         return mtu;
503 }
504
505 /* tipc_bearer_xmit_skb - sends buffer to destination over bearer
506  */
507 void tipc_bearer_xmit_skb(struct net *net, u32 bearer_id,
508                           struct sk_buff *skb,
509                           struct tipc_media_addr *dest)
510 {
511         struct tipc_msg *hdr = buf_msg(skb);
512         struct tipc_bearer *b;
513
514         rcu_read_lock();
515         b = bearer_get(net, bearer_id);
516         if (likely(b && (test_bit(0, &b->up) || msg_is_reset(hdr))))
517                 b->media->send_msg(net, skb, b, dest);
518         else
519                 kfree_skb(skb);
520         rcu_read_unlock();
521 }
522
523 /* tipc_bearer_xmit() -send buffer to destination over bearer
524  */
525 void tipc_bearer_xmit(struct net *net, u32 bearer_id,
526                       struct sk_buff_head *xmitq,
527                       struct tipc_media_addr *dst)
528 {
529         struct tipc_bearer *b;
530         struct sk_buff *skb, *tmp;
531
532         if (skb_queue_empty(xmitq))
533                 return;
534
535         rcu_read_lock();
536         b = bearer_get(net, bearer_id);
537         if (unlikely(!b))
538                 __skb_queue_purge(xmitq);
539         skb_queue_walk_safe(xmitq, skb, tmp) {
540                 __skb_dequeue(xmitq);
541                 if (likely(test_bit(0, &b->up) || msg_is_reset(buf_msg(skb))))
542                         b->media->send_msg(net, skb, b, dst);
543                 else
544                         kfree_skb(skb);
545         }
546         rcu_read_unlock();
547 }
548
549 /* tipc_bearer_bc_xmit() - broadcast buffers to all destinations
550  */
551 void tipc_bearer_bc_xmit(struct net *net, u32 bearer_id,
552                          struct sk_buff_head *xmitq)
553 {
554         struct tipc_net *tn = tipc_net(net);
555         int net_id = tn->net_id;
556         struct tipc_bearer *b;
557         struct sk_buff *skb, *tmp;
558         struct tipc_msg *hdr;
559
560         rcu_read_lock();
561         b = bearer_get(net, bearer_id);
562         if (unlikely(!b || !test_bit(0, &b->up)))
563                 __skb_queue_purge(xmitq);
564         skb_queue_walk_safe(xmitq, skb, tmp) {
565                 hdr = buf_msg(skb);
566                 msg_set_non_seq(hdr, 1);
567                 msg_set_mc_netid(hdr, net_id);
568                 __skb_dequeue(xmitq);
569                 b->media->send_msg(net, skb, b, &b->bcast_addr);
570         }
571         rcu_read_unlock();
572 }
573
574 /**
575  * tipc_l2_rcv_msg - handle incoming TIPC message from an interface
576  * @buf: the received packet
577  * @dev: the net device that the packet was received on
578  * @pt: the packet_type structure which was used to register this handler
579  * @orig_dev: the original receive net device in case the device is a bond
580  *
581  * Accept only packets explicitly sent to this node, or broadcast packets;
582  * ignores packets sent using interface multicast, and traffic sent to other
583  * nodes (which can happen if interface is running in promiscuous mode).
584  */
585 static int tipc_l2_rcv_msg(struct sk_buff *skb, struct net_device *dev,
586                            struct packet_type *pt, struct net_device *orig_dev)
587 {
588         struct tipc_bearer *b;
589
590         rcu_read_lock();
591         b = rcu_dereference_rtnl(dev->tipc_ptr) ?:
592                 rcu_dereference_rtnl(orig_dev->tipc_ptr);
593         if (likely(b && test_bit(0, &b->up) &&
594                    (skb->pkt_type <= PACKET_MULTICAST))) {
595                 skb->next = NULL;
596                 tipc_rcv(dev_net(b->pt.dev), skb, b);
597                 rcu_read_unlock();
598                 return NET_RX_SUCCESS;
599         }
600         rcu_read_unlock();
601         kfree_skb(skb);
602         return NET_RX_DROP;
603 }
604
605 /**
606  * tipc_l2_device_event - handle device events from network device
607  * @nb: the context of the notification
608  * @evt: the type of event
609  * @ptr: the net device that the event was on
610  *
611  * This function is called by the Ethernet driver in case of link
612  * change event.
613  */
614 static int tipc_l2_device_event(struct notifier_block *nb, unsigned long evt,
615                                 void *ptr)
616 {
617         struct net_device *dev = netdev_notifier_info_to_dev(ptr);
618         struct net *net = dev_net(dev);
619         struct tipc_bearer *b;
620
621         b = rtnl_dereference(dev->tipc_ptr);
622         if (!b)
623                 return NOTIFY_DONE;
624
625         switch (evt) {
626         case NETDEV_CHANGE:
627                 if (netif_carrier_ok(dev) && netif_oper_up(dev)) {
628                         test_and_set_bit_lock(0, &b->up);
629                         break;
630                 }
631                 /* fall through */
632         case NETDEV_GOING_DOWN:
633                 clear_bit_unlock(0, &b->up);
634                 tipc_reset_bearer(net, b);
635                 break;
636         case NETDEV_UP:
637                 test_and_set_bit_lock(0, &b->up);
638                 break;
639         case NETDEV_CHANGEMTU:
640                 if (tipc_mtu_bad(dev, 0)) {
641                         bearer_disable(net, b);
642                         break;
643                 }
644                 b->mtu = dev->mtu;
645                 tipc_reset_bearer(net, b);
646                 break;
647         case NETDEV_CHANGEADDR:
648                 b->media->raw2addr(b, &b->addr,
649                                    (char *)dev->dev_addr);
650                 tipc_reset_bearer(net, b);
651                 break;
652         case NETDEV_UNREGISTER:
653         case NETDEV_CHANGENAME:
654                 bearer_disable(net, b);
655                 break;
656         }
657         return NOTIFY_OK;
658 }
659
660 static struct notifier_block notifier = {
661         .notifier_call  = tipc_l2_device_event,
662         .priority       = 0,
663 };
664
665 int tipc_bearer_setup(void)
666 {
667         return register_netdevice_notifier(&notifier);
668 }
669
670 void tipc_bearer_cleanup(void)
671 {
672         unregister_netdevice_notifier(&notifier);
673 }
674
675 void tipc_bearer_stop(struct net *net)
676 {
677         struct tipc_net *tn = net_generic(net, tipc_net_id);
678         struct tipc_bearer *b;
679         u32 i;
680
681         for (i = 0; i < MAX_BEARERS; i++) {
682                 b = rtnl_dereference(tn->bearer_list[i]);
683                 if (b) {
684                         bearer_disable(net, b);
685                         tn->bearer_list[i] = NULL;
686                 }
687         }
688 }
689
690 /* Caller should hold rtnl_lock to protect the bearer */
691 static int __tipc_nl_add_bearer(struct tipc_nl_msg *msg,
692                                 struct tipc_bearer *bearer, int nlflags)
693 {
694         void *hdr;
695         struct nlattr *attrs;
696         struct nlattr *prop;
697
698         hdr = genlmsg_put(msg->skb, msg->portid, msg->seq, &tipc_genl_family,
699                           nlflags, TIPC_NL_BEARER_GET);
700         if (!hdr)
701                 return -EMSGSIZE;
702
703         attrs = nla_nest_start(msg->skb, TIPC_NLA_BEARER);
704         if (!attrs)
705                 goto msg_full;
706
707         if (nla_put_string(msg->skb, TIPC_NLA_BEARER_NAME, bearer->name))
708                 goto attr_msg_full;
709
710         prop = nla_nest_start(msg->skb, TIPC_NLA_BEARER_PROP);
711         if (!prop)
712                 goto prop_msg_full;
713         if (nla_put_u32(msg->skb, TIPC_NLA_PROP_PRIO, bearer->priority))
714                 goto prop_msg_full;
715         if (nla_put_u32(msg->skb, TIPC_NLA_PROP_TOL, bearer->tolerance))
716                 goto prop_msg_full;
717         if (nla_put_u32(msg->skb, TIPC_NLA_PROP_WIN, bearer->window))
718                 goto prop_msg_full;
719         if (bearer->media->type_id == TIPC_MEDIA_TYPE_UDP)
720                 if (nla_put_u32(msg->skb, TIPC_NLA_PROP_MTU, bearer->mtu))
721                         goto prop_msg_full;
722
723         nla_nest_end(msg->skb, prop);
724
725 #ifdef CONFIG_TIPC_MEDIA_UDP
726         if (bearer->media->type_id == TIPC_MEDIA_TYPE_UDP) {
727                 if (tipc_udp_nl_add_bearer_data(msg, bearer))
728                         goto attr_msg_full;
729         }
730 #endif
731
732         nla_nest_end(msg->skb, attrs);
733         genlmsg_end(msg->skb, hdr);
734
735         return 0;
736
737 prop_msg_full:
738         nla_nest_cancel(msg->skb, prop);
739 attr_msg_full:
740         nla_nest_cancel(msg->skb, attrs);
741 msg_full:
742         genlmsg_cancel(msg->skb, hdr);
743
744         return -EMSGSIZE;
745 }
746
747 int tipc_nl_bearer_dump(struct sk_buff *skb, struct netlink_callback *cb)
748 {
749         int err;
750         int i = cb->args[0];
751         struct tipc_bearer *bearer;
752         struct tipc_nl_msg msg;
753         struct net *net = sock_net(skb->sk);
754         struct tipc_net *tn = net_generic(net, tipc_net_id);
755
756         if (i == MAX_BEARERS)
757                 return 0;
758
759         msg.skb = skb;
760         msg.portid = NETLINK_CB(cb->skb).portid;
761         msg.seq = cb->nlh->nlmsg_seq;
762
763         rtnl_lock();
764         for (i = 0; i < MAX_BEARERS; i++) {
765                 bearer = rtnl_dereference(tn->bearer_list[i]);
766                 if (!bearer)
767                         continue;
768
769                 err = __tipc_nl_add_bearer(&msg, bearer, NLM_F_MULTI);
770                 if (err)
771                         break;
772         }
773         rtnl_unlock();
774
775         cb->args[0] = i;
776         return skb->len;
777 }
778
779 int tipc_nl_bearer_get(struct sk_buff *skb, struct genl_info *info)
780 {
781         int err;
782         char *name;
783         struct sk_buff *rep;
784         struct tipc_bearer *bearer;
785         struct tipc_nl_msg msg;
786         struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
787         struct net *net = genl_info_net(info);
788
789         if (!info->attrs[TIPC_NLA_BEARER])
790                 return -EINVAL;
791
792         err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
793                                info->attrs[TIPC_NLA_BEARER],
794                                tipc_nl_bearer_policy, info->extack);
795         if (err)
796                 return err;
797
798         if (!attrs[TIPC_NLA_BEARER_NAME])
799                 return -EINVAL;
800         name = nla_data(attrs[TIPC_NLA_BEARER_NAME]);
801
802         rep = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
803         if (!rep)
804                 return -ENOMEM;
805
806         msg.skb = rep;
807         msg.portid = info->snd_portid;
808         msg.seq = info->snd_seq;
809
810         rtnl_lock();
811         bearer = tipc_bearer_find(net, name);
812         if (!bearer) {
813                 err = -EINVAL;
814                 NL_SET_ERR_MSG(info->extack, "Bearer not found");
815                 goto err_out;
816         }
817
818         err = __tipc_nl_add_bearer(&msg, bearer, 0);
819         if (err)
820                 goto err_out;
821         rtnl_unlock();
822
823         return genlmsg_reply(rep, info);
824 err_out:
825         rtnl_unlock();
826         nlmsg_free(rep);
827
828         return err;
829 }
830
831 int __tipc_nl_bearer_disable(struct sk_buff *skb, struct genl_info *info)
832 {
833         int err;
834         char *name;
835         struct tipc_bearer *bearer;
836         struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
837         struct net *net = sock_net(skb->sk);
838
839         if (!info->attrs[TIPC_NLA_BEARER])
840                 return -EINVAL;
841
842         err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
843                                info->attrs[TIPC_NLA_BEARER],
844                                tipc_nl_bearer_policy, info->extack);
845         if (err)
846                 return err;
847
848         if (!attrs[TIPC_NLA_BEARER_NAME])
849                 return -EINVAL;
850
851         name = nla_data(attrs[TIPC_NLA_BEARER_NAME]);
852
853         bearer = tipc_bearer_find(net, name);
854         if (!bearer) {
855                 NL_SET_ERR_MSG(info->extack, "Bearer not found");
856                 return -EINVAL;
857         }
858
859         bearer_disable(net, bearer);
860
861         return 0;
862 }
863
864 int tipc_nl_bearer_disable(struct sk_buff *skb, struct genl_info *info)
865 {
866         int err;
867
868         rtnl_lock();
869         err = __tipc_nl_bearer_disable(skb, info);
870         rtnl_unlock();
871
872         return err;
873 }
874
875 int __tipc_nl_bearer_enable(struct sk_buff *skb, struct genl_info *info)
876 {
877         int err;
878         char *bearer;
879         struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
880         struct net *net = sock_net(skb->sk);
881         u32 domain = 0;
882         u32 prio;
883
884         prio = TIPC_MEDIA_LINK_PRI;
885
886         if (!info->attrs[TIPC_NLA_BEARER])
887                 return -EINVAL;
888
889         err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
890                                info->attrs[TIPC_NLA_BEARER],
891                                tipc_nl_bearer_policy, info->extack);
892         if (err)
893                 return err;
894
895         if (!attrs[TIPC_NLA_BEARER_NAME])
896                 return -EINVAL;
897
898         bearer = nla_data(attrs[TIPC_NLA_BEARER_NAME]);
899
900         if (attrs[TIPC_NLA_BEARER_DOMAIN])
901                 domain = nla_get_u32(attrs[TIPC_NLA_BEARER_DOMAIN]);
902
903         if (attrs[TIPC_NLA_BEARER_PROP]) {
904                 struct nlattr *props[TIPC_NLA_PROP_MAX + 1];
905
906                 err = tipc_nl_parse_link_prop(attrs[TIPC_NLA_BEARER_PROP],
907                                               props);
908                 if (err)
909                         return err;
910
911                 if (props[TIPC_NLA_PROP_PRIO])
912                         prio = nla_get_u32(props[TIPC_NLA_PROP_PRIO]);
913         }
914
915         return tipc_enable_bearer(net, bearer, domain, prio, attrs,
916                                   info->extack);
917 }
918
919 int tipc_nl_bearer_enable(struct sk_buff *skb, struct genl_info *info)
920 {
921         int err;
922
923         rtnl_lock();
924         err = __tipc_nl_bearer_enable(skb, info);
925         rtnl_unlock();
926
927         return err;
928 }
929
930 int tipc_nl_bearer_add(struct sk_buff *skb, struct genl_info *info)
931 {
932         int err;
933         char *name;
934         struct tipc_bearer *b;
935         struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
936         struct net *net = sock_net(skb->sk);
937
938         if (!info->attrs[TIPC_NLA_BEARER])
939                 return -EINVAL;
940
941         err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
942                                info->attrs[TIPC_NLA_BEARER],
943                                tipc_nl_bearer_policy, info->extack);
944         if (err)
945                 return err;
946
947         if (!attrs[TIPC_NLA_BEARER_NAME])
948                 return -EINVAL;
949         name = nla_data(attrs[TIPC_NLA_BEARER_NAME]);
950
951         rtnl_lock();
952         b = tipc_bearer_find(net, name);
953         if (!b) {
954                 rtnl_unlock();
955                 NL_SET_ERR_MSG(info->extack, "Bearer not found");
956                 return -EINVAL;
957         }
958
959 #ifdef CONFIG_TIPC_MEDIA_UDP
960         if (attrs[TIPC_NLA_BEARER_UDP_OPTS]) {
961                 err = tipc_udp_nl_bearer_add(b,
962                                              attrs[TIPC_NLA_BEARER_UDP_OPTS]);
963                 if (err) {
964                         rtnl_unlock();
965                         return err;
966                 }
967         }
968 #endif
969         rtnl_unlock();
970
971         return 0;
972 }
973
974 int __tipc_nl_bearer_set(struct sk_buff *skb, struct genl_info *info)
975 {
976         struct tipc_bearer *b;
977         struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
978         struct net *net = sock_net(skb->sk);
979         char *name;
980         int err;
981
982         if (!info->attrs[TIPC_NLA_BEARER])
983                 return -EINVAL;
984
985         err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
986                                info->attrs[TIPC_NLA_BEARER],
987                                tipc_nl_bearer_policy, info->extack);
988         if (err)
989                 return err;
990
991         if (!attrs[TIPC_NLA_BEARER_NAME])
992                 return -EINVAL;
993         name = nla_data(attrs[TIPC_NLA_BEARER_NAME]);
994
995         b = tipc_bearer_find(net, name);
996         if (!b) {
997                 NL_SET_ERR_MSG(info->extack, "Bearer not found");
998                 return -EINVAL;
999         }
1000
1001         if (attrs[TIPC_NLA_BEARER_PROP]) {
1002                 struct nlattr *props[TIPC_NLA_PROP_MAX + 1];
1003
1004                 err = tipc_nl_parse_link_prop(attrs[TIPC_NLA_BEARER_PROP],
1005                                               props);
1006                 if (err)
1007                         return err;
1008
1009                 if (props[TIPC_NLA_PROP_TOL]) {
1010                         b->tolerance = nla_get_u32(props[TIPC_NLA_PROP_TOL]);
1011                         tipc_node_apply_property(net, b, TIPC_NLA_PROP_TOL);
1012                 }
1013                 if (props[TIPC_NLA_PROP_PRIO])
1014                         b->priority = nla_get_u32(props[TIPC_NLA_PROP_PRIO]);
1015                 if (props[TIPC_NLA_PROP_WIN])
1016                         b->window = nla_get_u32(props[TIPC_NLA_PROP_WIN]);
1017                 if (props[TIPC_NLA_PROP_MTU]) {
1018                         if (b->media->type_id != TIPC_MEDIA_TYPE_UDP) {
1019                                 NL_SET_ERR_MSG(info->extack,
1020                                                "MTU property is unsupported");
1021                                 return -EINVAL;
1022                         }
1023 #ifdef CONFIG_TIPC_MEDIA_UDP
1024                         if (tipc_udp_mtu_bad(nla_get_u32
1025                                              (props[TIPC_NLA_PROP_MTU]))) {
1026                                 NL_SET_ERR_MSG(info->extack,
1027                                                "MTU value is out-of-range");
1028                                 return -EINVAL;
1029                         }
1030                         b->mtu = nla_get_u32(props[TIPC_NLA_PROP_MTU]);
1031                         tipc_node_apply_property(net, b, TIPC_NLA_PROP_MTU);
1032 #endif
1033                 }
1034         }
1035
1036         return 0;
1037 }
1038
1039 int tipc_nl_bearer_set(struct sk_buff *skb, struct genl_info *info)
1040 {
1041         int err;
1042
1043         rtnl_lock();
1044         err = __tipc_nl_bearer_set(skb, info);
1045         rtnl_unlock();
1046
1047         return err;
1048 }
1049
1050 static int __tipc_nl_add_media(struct tipc_nl_msg *msg,
1051                                struct tipc_media *media, int nlflags)
1052 {
1053         void *hdr;
1054         struct nlattr *attrs;
1055         struct nlattr *prop;
1056
1057         hdr = genlmsg_put(msg->skb, msg->portid, msg->seq, &tipc_genl_family,
1058                           nlflags, TIPC_NL_MEDIA_GET);
1059         if (!hdr)
1060                 return -EMSGSIZE;
1061
1062         attrs = nla_nest_start(msg->skb, TIPC_NLA_MEDIA);
1063         if (!attrs)
1064                 goto msg_full;
1065
1066         if (nla_put_string(msg->skb, TIPC_NLA_MEDIA_NAME, media->name))
1067                 goto attr_msg_full;
1068
1069         prop = nla_nest_start(msg->skb, TIPC_NLA_MEDIA_PROP);
1070         if (!prop)
1071                 goto prop_msg_full;
1072         if (nla_put_u32(msg->skb, TIPC_NLA_PROP_PRIO, media->priority))
1073                 goto prop_msg_full;
1074         if (nla_put_u32(msg->skb, TIPC_NLA_PROP_TOL, media->tolerance))
1075                 goto prop_msg_full;
1076         if (nla_put_u32(msg->skb, TIPC_NLA_PROP_WIN, media->window))
1077                 goto prop_msg_full;
1078         if (media->type_id == TIPC_MEDIA_TYPE_UDP)
1079                 if (nla_put_u32(msg->skb, TIPC_NLA_PROP_MTU, media->mtu))
1080                         goto prop_msg_full;
1081
1082         nla_nest_end(msg->skb, prop);
1083         nla_nest_end(msg->skb, attrs);
1084         genlmsg_end(msg->skb, hdr);
1085
1086         return 0;
1087
1088 prop_msg_full:
1089         nla_nest_cancel(msg->skb, prop);
1090 attr_msg_full:
1091         nla_nest_cancel(msg->skb, attrs);
1092 msg_full:
1093         genlmsg_cancel(msg->skb, hdr);
1094
1095         return -EMSGSIZE;
1096 }
1097
1098 int tipc_nl_media_dump(struct sk_buff *skb, struct netlink_callback *cb)
1099 {
1100         int err;
1101         int i = cb->args[0];
1102         struct tipc_nl_msg msg;
1103
1104         if (i == MAX_MEDIA)
1105                 return 0;
1106
1107         msg.skb = skb;
1108         msg.portid = NETLINK_CB(cb->skb).portid;
1109         msg.seq = cb->nlh->nlmsg_seq;
1110
1111         rtnl_lock();
1112         for (; media_info_array[i] != NULL; i++) {
1113                 err = __tipc_nl_add_media(&msg, media_info_array[i],
1114                                           NLM_F_MULTI);
1115                 if (err)
1116                         break;
1117         }
1118         rtnl_unlock();
1119
1120         cb->args[0] = i;
1121         return skb->len;
1122 }
1123
1124 int tipc_nl_media_get(struct sk_buff *skb, struct genl_info *info)
1125 {
1126         int err;
1127         char *name;
1128         struct tipc_nl_msg msg;
1129         struct tipc_media *media;
1130         struct sk_buff *rep;
1131         struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
1132
1133         if (!info->attrs[TIPC_NLA_MEDIA])
1134                 return -EINVAL;
1135
1136         err = nla_parse_nested(attrs, TIPC_NLA_MEDIA_MAX,
1137                                info->attrs[TIPC_NLA_MEDIA],
1138                                tipc_nl_media_policy, info->extack);
1139         if (err)
1140                 return err;
1141
1142         if (!attrs[TIPC_NLA_MEDIA_NAME])
1143                 return -EINVAL;
1144         name = nla_data(attrs[TIPC_NLA_MEDIA_NAME]);
1145
1146         rep = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
1147         if (!rep)
1148                 return -ENOMEM;
1149
1150         msg.skb = rep;
1151         msg.portid = info->snd_portid;
1152         msg.seq = info->snd_seq;
1153
1154         rtnl_lock();
1155         media = tipc_media_find(name);
1156         if (!media) {
1157                 NL_SET_ERR_MSG(info->extack, "Media not found");
1158                 err = -EINVAL;
1159                 goto err_out;
1160         }
1161
1162         err = __tipc_nl_add_media(&msg, media, 0);
1163         if (err)
1164                 goto err_out;
1165         rtnl_unlock();
1166
1167         return genlmsg_reply(rep, info);
1168 err_out:
1169         rtnl_unlock();
1170         nlmsg_free(rep);
1171
1172         return err;
1173 }
1174
1175 int __tipc_nl_media_set(struct sk_buff *skb, struct genl_info *info)
1176 {
1177         int err;
1178         char *name;
1179         struct tipc_media *m;
1180         struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
1181
1182         if (!info->attrs[TIPC_NLA_MEDIA])
1183                 return -EINVAL;
1184
1185         err = nla_parse_nested(attrs, TIPC_NLA_MEDIA_MAX,
1186                                info->attrs[TIPC_NLA_MEDIA],
1187                                tipc_nl_media_policy, info->extack);
1188
1189         if (!attrs[TIPC_NLA_MEDIA_NAME])
1190                 return -EINVAL;
1191         name = nla_data(attrs[TIPC_NLA_MEDIA_NAME]);
1192
1193         m = tipc_media_find(name);
1194         if (!m) {
1195                 NL_SET_ERR_MSG(info->extack, "Media not found");
1196                 return -EINVAL;
1197         }
1198         if (attrs[TIPC_NLA_MEDIA_PROP]) {
1199                 struct nlattr *props[TIPC_NLA_PROP_MAX + 1];
1200
1201                 err = tipc_nl_parse_link_prop(attrs[TIPC_NLA_MEDIA_PROP],
1202                                               props);
1203                 if (err)
1204                         return err;
1205
1206                 if (props[TIPC_NLA_PROP_TOL])
1207                         m->tolerance = nla_get_u32(props[TIPC_NLA_PROP_TOL]);
1208                 if (props[TIPC_NLA_PROP_PRIO])
1209                         m->priority = nla_get_u32(props[TIPC_NLA_PROP_PRIO]);
1210                 if (props[TIPC_NLA_PROP_WIN])
1211                         m->window = nla_get_u32(props[TIPC_NLA_PROP_WIN]);
1212                 if (props[TIPC_NLA_PROP_MTU]) {
1213                         if (m->type_id != TIPC_MEDIA_TYPE_UDP) {
1214                                 NL_SET_ERR_MSG(info->extack,
1215                                                "MTU property is unsupported");
1216                                 return -EINVAL;
1217                         }
1218 #ifdef CONFIG_TIPC_MEDIA_UDP
1219                         if (tipc_udp_mtu_bad(nla_get_u32
1220                                              (props[TIPC_NLA_PROP_MTU]))) {
1221                                 NL_SET_ERR_MSG(info->extack,
1222                                                "MTU value is out-of-range");
1223                                 return -EINVAL;
1224                         }
1225                         m->mtu = nla_get_u32(props[TIPC_NLA_PROP_MTU]);
1226 #endif
1227                 }
1228         }
1229
1230         return 0;
1231 }
1232
1233 int tipc_nl_media_set(struct sk_buff *skb, struct genl_info *info)
1234 {
1235         int err;
1236
1237         rtnl_lock();
1238         err = __tipc_nl_media_set(skb, info);
1239         rtnl_unlock();
1240
1241         return err;
1242 }