GNU Linux-libre 4.19.245-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                 errstr = "illegal name";
250                 NL_SET_ERR_MSG(extack, "Illegal name");
251                 goto rejected;
252         }
253
254         if (prio > TIPC_MAX_LINK_PRI && prio != TIPC_MEDIA_LINK_PRI) {
255                 errstr = "illegal priority";
256                 NL_SET_ERR_MSG(extack, "Illegal priority");
257                 goto rejected;
258         }
259
260         m = tipc_media_find(b_names.media_name);
261         if (!m) {
262                 errstr = "media not registered";
263                 NL_SET_ERR_MSG(extack, "Media not registered");
264                 goto rejected;
265         }
266
267         if (prio == TIPC_MEDIA_LINK_PRI)
268                 prio = m->priority;
269
270         /* Check new bearer vs existing ones and find free bearer id if any */
271         bearer_id = MAX_BEARERS;
272         i = MAX_BEARERS;
273         while (i-- != 0) {
274                 b = rtnl_dereference(tn->bearer_list[i]);
275                 if (!b) {
276                         bearer_id = i;
277                         continue;
278                 }
279                 if (!strcmp(name, b->name)) {
280                         errstr = "already enabled";
281                         NL_SET_ERR_MSG(extack, "Already enabled");
282                         goto rejected;
283                 }
284
285                 if (b->priority == prio &&
286                     (++with_this_prio > 2)) {
287                         pr_warn("Bearer <%s>: already 2 bearers with priority %u\n",
288                                 name, prio);
289
290                         if (prio == TIPC_MIN_LINK_PRI) {
291                                 errstr = "cannot adjust to lower";
292                                 NL_SET_ERR_MSG(extack, "Cannot adjust to lower");
293                                 goto rejected;
294                         }
295
296                         pr_warn("Bearer <%s>: trying with adjusted priority\n",
297                                 name);
298                         prio--;
299                         bearer_id = MAX_BEARERS;
300                         i = MAX_BEARERS;
301                         with_this_prio = 1;
302                 }
303         }
304
305         if (bearer_id >= MAX_BEARERS) {
306                 errstr = "max 3 bearers permitted";
307                 NL_SET_ERR_MSG(extack, "Max 3 bearers permitted");
308                 goto rejected;
309         }
310
311         b = kzalloc(sizeof(*b), GFP_ATOMIC);
312         if (!b)
313                 return -ENOMEM;
314
315         strcpy(b->name, name);
316         b->media = m;
317         res = m->enable_media(net, b, attr);
318         if (res) {
319                 kfree(b);
320                 errstr = "failed to enable media";
321                 NL_SET_ERR_MSG(extack, "Failed to enable media");
322                 goto rejected;
323         }
324
325         b->identity = bearer_id;
326         b->tolerance = m->tolerance;
327         b->window = m->window;
328         b->domain = disc_domain;
329         b->net_plane = bearer_id + 'A';
330         b->priority = prio;
331         test_and_set_bit_lock(0, &b->up);
332
333         res = tipc_disc_create(net, b, &b->bcast_addr, &skb);
334         if (res) {
335                 bearer_disable(net, b);
336                 errstr = "failed to create discoverer";
337                 NL_SET_ERR_MSG(extack, "Failed to create discoverer");
338                 goto rejected;
339         }
340
341         rcu_assign_pointer(tn->bearer_list[bearer_id], b);
342         if (skb)
343                 tipc_bearer_xmit_skb(net, bearer_id, skb, &b->bcast_addr);
344
345         if (tipc_mon_create(net, bearer_id)) {
346                 bearer_disable(net, b);
347                 return -ENOMEM;
348         }
349
350         pr_info("Enabled bearer <%s>, priority %u\n", name, prio);
351
352         return res;
353 rejected:
354         pr_warn("Enabling of bearer <%s> rejected, %s\n", name, errstr);
355         return res;
356 }
357
358 /**
359  * tipc_reset_bearer - Reset all links established over this bearer
360  */
361 static int tipc_reset_bearer(struct net *net, struct tipc_bearer *b)
362 {
363         pr_info("Resetting bearer <%s>\n", b->name);
364         tipc_node_delete_links(net, b->identity);
365         tipc_disc_reset(net, b);
366         return 0;
367 }
368
369 /**
370  * bearer_disable
371  *
372  * Note: This routine assumes caller holds RTNL lock.
373  */
374 static void bearer_disable(struct net *net, struct tipc_bearer *b)
375 {
376         struct tipc_net *tn = tipc_net(net);
377         int bearer_id = b->identity;
378
379         pr_info("Disabling bearer <%s>\n", b->name);
380         clear_bit_unlock(0, &b->up);
381         tipc_node_delete_links(net, bearer_id);
382         b->media->disable_media(b);
383         RCU_INIT_POINTER(b->media_ptr, NULL);
384         if (b->disc)
385                 tipc_disc_delete(b->disc);
386         RCU_INIT_POINTER(tn->bearer_list[bearer_id], NULL);
387         kfree_rcu(b, rcu);
388         tipc_mon_delete(net, bearer_id);
389 }
390
391 int tipc_enable_l2_media(struct net *net, struct tipc_bearer *b,
392                          struct nlattr *attr[])
393 {
394         char *dev_name = strchr((const char *)b->name, ':') + 1;
395         int hwaddr_len = b->media->hwaddr_len;
396         u8 node_id[NODE_ID_LEN] = {0,};
397         struct net_device *dev;
398
399         /* Find device with specified name */
400         dev = dev_get_by_name(net, dev_name);
401         if (!dev)
402                 return -ENODEV;
403         if (tipc_mtu_bad(dev, 0)) {
404                 dev_put(dev);
405                 return -EINVAL;
406         }
407
408         /* Autoconfigure own node identity if needed */
409         if (!tipc_own_id(net) && hwaddr_len <= NODE_ID_LEN) {
410                 memcpy(node_id, dev->dev_addr, hwaddr_len);
411                 tipc_net_init(net, node_id, 0);
412         }
413         if (!tipc_own_id(net)) {
414                 dev_put(dev);
415                 pr_warn("Failed to obtain node identity\n");
416                 return -EINVAL;
417         }
418
419         /* Associate TIPC bearer with L2 bearer */
420         rcu_assign_pointer(b->media_ptr, dev);
421         b->pt.dev = dev;
422         b->pt.type = htons(ETH_P_TIPC);
423         b->pt.func = tipc_l2_rcv_msg;
424         dev_add_pack(&b->pt);
425         memset(&b->bcast_addr, 0, sizeof(b->bcast_addr));
426         memcpy(b->bcast_addr.value, dev->broadcast, hwaddr_len);
427         b->bcast_addr.media_id = b->media->type_id;
428         b->bcast_addr.broadcast = TIPC_BROADCAST_SUPPORT;
429         b->mtu = dev->mtu;
430         b->media->raw2addr(b, &b->addr, (char *)dev->dev_addr);
431         rcu_assign_pointer(dev->tipc_ptr, b);
432         return 0;
433 }
434
435 /* tipc_disable_l2_media - detach TIPC bearer from an L2 interface
436  *
437  * Mark L2 bearer as inactive so that incoming buffers are thrown away
438  */
439 void tipc_disable_l2_media(struct tipc_bearer *b)
440 {
441         struct net_device *dev;
442
443         dev = (struct net_device *)rtnl_dereference(b->media_ptr);
444         dev_remove_pack(&b->pt);
445         RCU_INIT_POINTER(dev->tipc_ptr, NULL);
446         synchronize_net();
447         dev_put(dev);
448 }
449
450 /**
451  * tipc_l2_send_msg - send a TIPC packet out over an L2 interface
452  * @skb: the packet to be sent
453  * @b: the bearer through which the packet is to be sent
454  * @dest: peer destination address
455  */
456 int tipc_l2_send_msg(struct net *net, struct sk_buff *skb,
457                      struct tipc_bearer *b, struct tipc_media_addr *dest)
458 {
459         struct net_device *dev;
460         int delta;
461
462         dev = (struct net_device *)rcu_dereference_rtnl(b->media_ptr);
463         if (!dev)
464                 return 0;
465
466         delta = SKB_DATA_ALIGN(dev->hard_header_len - skb_headroom(skb));
467         if ((delta > 0) && pskb_expand_head(skb, delta, 0, GFP_ATOMIC)) {
468                 kfree_skb(skb);
469                 return 0;
470         }
471         skb_reset_network_header(skb);
472         skb->dev = dev;
473         skb->protocol = htons(ETH_P_TIPC);
474         dev_hard_header(skb, dev, ETH_P_TIPC, dest->value,
475                         dev->dev_addr, skb->len);
476         dev_queue_xmit(skb);
477         return 0;
478 }
479
480 bool tipc_bearer_bcast_support(struct net *net, u32 bearer_id)
481 {
482         bool supp = false;
483         struct tipc_bearer *b;
484
485         rcu_read_lock();
486         b = bearer_get(net, bearer_id);
487         if (b)
488                 supp = (b->bcast_addr.broadcast == TIPC_BROADCAST_SUPPORT);
489         rcu_read_unlock();
490         return supp;
491 }
492
493 int tipc_bearer_mtu(struct net *net, u32 bearer_id)
494 {
495         int mtu = 0;
496         struct tipc_bearer *b;
497
498         rcu_read_lock();
499         b = rcu_dereference_rtnl(tipc_net(net)->bearer_list[bearer_id]);
500         if (b)
501                 mtu = b->mtu;
502         rcu_read_unlock();
503         return mtu;
504 }
505
506 /* tipc_bearer_xmit_skb - sends buffer to destination over bearer
507  */
508 void tipc_bearer_xmit_skb(struct net *net, u32 bearer_id,
509                           struct sk_buff *skb,
510                           struct tipc_media_addr *dest)
511 {
512         struct tipc_msg *hdr = buf_msg(skb);
513         struct tipc_bearer *b;
514
515         rcu_read_lock();
516         b = bearer_get(net, bearer_id);
517         if (likely(b && (test_bit(0, &b->up) || msg_is_reset(hdr))))
518                 b->media->send_msg(net, skb, b, dest);
519         else
520                 kfree_skb(skb);
521         rcu_read_unlock();
522 }
523
524 /* tipc_bearer_xmit() -send buffer to destination over bearer
525  */
526 void tipc_bearer_xmit(struct net *net, u32 bearer_id,
527                       struct sk_buff_head *xmitq,
528                       struct tipc_media_addr *dst)
529 {
530         struct tipc_bearer *b;
531         struct sk_buff *skb, *tmp;
532
533         if (skb_queue_empty(xmitq))
534                 return;
535
536         rcu_read_lock();
537         b = bearer_get(net, bearer_id);
538         if (unlikely(!b))
539                 __skb_queue_purge(xmitq);
540         skb_queue_walk_safe(xmitq, skb, tmp) {
541                 __skb_dequeue(xmitq);
542                 if (likely(test_bit(0, &b->up) || msg_is_reset(buf_msg(skb))))
543                         b->media->send_msg(net, skb, b, dst);
544                 else
545                         kfree_skb(skb);
546         }
547         rcu_read_unlock();
548 }
549
550 /* tipc_bearer_bc_xmit() - broadcast buffers to all destinations
551  */
552 void tipc_bearer_bc_xmit(struct net *net, u32 bearer_id,
553                          struct sk_buff_head *xmitq)
554 {
555         struct tipc_net *tn = tipc_net(net);
556         int net_id = tn->net_id;
557         struct tipc_bearer *b;
558         struct sk_buff *skb, *tmp;
559         struct tipc_msg *hdr;
560
561         rcu_read_lock();
562         b = bearer_get(net, bearer_id);
563         if (unlikely(!b || !test_bit(0, &b->up)))
564                 __skb_queue_purge(xmitq);
565         skb_queue_walk_safe(xmitq, skb, tmp) {
566                 hdr = buf_msg(skb);
567                 msg_set_non_seq(hdr, 1);
568                 msg_set_mc_netid(hdr, net_id);
569                 __skb_dequeue(xmitq);
570                 b->media->send_msg(net, skb, b, &b->bcast_addr);
571         }
572         rcu_read_unlock();
573 }
574
575 /**
576  * tipc_l2_rcv_msg - handle incoming TIPC message from an interface
577  * @buf: the received packet
578  * @dev: the net device that the packet was received on
579  * @pt: the packet_type structure which was used to register this handler
580  * @orig_dev: the original receive net device in case the device is a bond
581  *
582  * Accept only packets explicitly sent to this node, or broadcast packets;
583  * ignores packets sent using interface multicast, and traffic sent to other
584  * nodes (which can happen if interface is running in promiscuous mode).
585  */
586 static int tipc_l2_rcv_msg(struct sk_buff *skb, struct net_device *dev,
587                            struct packet_type *pt, struct net_device *orig_dev)
588 {
589         struct tipc_bearer *b;
590
591         rcu_read_lock();
592         b = rcu_dereference_rtnl(dev->tipc_ptr) ?:
593                 rcu_dereference_rtnl(orig_dev->tipc_ptr);
594         if (likely(b && test_bit(0, &b->up) &&
595                    (skb->pkt_type <= PACKET_MULTICAST))) {
596                 skb->next = NULL;
597                 tipc_rcv(dev_net(b->pt.dev), skb, b);
598                 rcu_read_unlock();
599                 return NET_RX_SUCCESS;
600         }
601         rcu_read_unlock();
602         kfree_skb(skb);
603         return NET_RX_DROP;
604 }
605
606 /**
607  * tipc_l2_device_event - handle device events from network device
608  * @nb: the context of the notification
609  * @evt: the type of event
610  * @ptr: the net device that the event was on
611  *
612  * This function is called by the Ethernet driver in case of link
613  * change event.
614  */
615 static int tipc_l2_device_event(struct notifier_block *nb, unsigned long evt,
616                                 void *ptr)
617 {
618         struct net_device *dev = netdev_notifier_info_to_dev(ptr);
619         struct net *net = dev_net(dev);
620         struct tipc_bearer *b;
621
622         b = rtnl_dereference(dev->tipc_ptr);
623         if (!b)
624                 return NOTIFY_DONE;
625
626         switch (evt) {
627         case NETDEV_CHANGE:
628                 if (netif_carrier_ok(dev) && netif_oper_up(dev)) {
629                         test_and_set_bit_lock(0, &b->up);
630                         break;
631                 }
632                 /* fall through */
633         case NETDEV_GOING_DOWN:
634                 clear_bit_unlock(0, &b->up);
635                 tipc_reset_bearer(net, b);
636                 break;
637         case NETDEV_UP:
638                 test_and_set_bit_lock(0, &b->up);
639                 break;
640         case NETDEV_CHANGEMTU:
641                 if (tipc_mtu_bad(dev, 0)) {
642                         bearer_disable(net, b);
643                         break;
644                 }
645                 b->mtu = dev->mtu;
646                 tipc_reset_bearer(net, b);
647                 break;
648         case NETDEV_CHANGEADDR:
649                 b->media->raw2addr(b, &b->addr,
650                                    (char *)dev->dev_addr);
651                 tipc_reset_bearer(net, b);
652                 break;
653         case NETDEV_UNREGISTER:
654         case NETDEV_CHANGENAME:
655                 bearer_disable(net, b);
656                 break;
657         }
658         return NOTIFY_OK;
659 }
660
661 static struct notifier_block notifier = {
662         .notifier_call  = tipc_l2_device_event,
663         .priority       = 0,
664 };
665
666 int tipc_bearer_setup(void)
667 {
668         return register_netdevice_notifier(&notifier);
669 }
670
671 void tipc_bearer_cleanup(void)
672 {
673         unregister_netdevice_notifier(&notifier);
674 }
675
676 void tipc_bearer_stop(struct net *net)
677 {
678         struct tipc_net *tn = net_generic(net, tipc_net_id);
679         struct tipc_bearer *b;
680         u32 i;
681
682         for (i = 0; i < MAX_BEARERS; i++) {
683                 b = rtnl_dereference(tn->bearer_list[i]);
684                 if (b) {
685                         bearer_disable(net, b);
686                         tn->bearer_list[i] = NULL;
687                 }
688         }
689 }
690
691 /* Caller should hold rtnl_lock to protect the bearer */
692 static int __tipc_nl_add_bearer(struct tipc_nl_msg *msg,
693                                 struct tipc_bearer *bearer, int nlflags)
694 {
695         void *hdr;
696         struct nlattr *attrs;
697         struct nlattr *prop;
698
699         hdr = genlmsg_put(msg->skb, msg->portid, msg->seq, &tipc_genl_family,
700                           nlflags, TIPC_NL_BEARER_GET);
701         if (!hdr)
702                 return -EMSGSIZE;
703
704         attrs = nla_nest_start(msg->skb, TIPC_NLA_BEARER);
705         if (!attrs)
706                 goto msg_full;
707
708         if (nla_put_string(msg->skb, TIPC_NLA_BEARER_NAME, bearer->name))
709                 goto attr_msg_full;
710
711         prop = nla_nest_start(msg->skb, TIPC_NLA_BEARER_PROP);
712         if (!prop)
713                 goto prop_msg_full;
714         if (nla_put_u32(msg->skb, TIPC_NLA_PROP_PRIO, bearer->priority))
715                 goto prop_msg_full;
716         if (nla_put_u32(msg->skb, TIPC_NLA_PROP_TOL, bearer->tolerance))
717                 goto prop_msg_full;
718         if (nla_put_u32(msg->skb, TIPC_NLA_PROP_WIN, bearer->window))
719                 goto prop_msg_full;
720         if (bearer->media->type_id == TIPC_MEDIA_TYPE_UDP)
721                 if (nla_put_u32(msg->skb, TIPC_NLA_PROP_MTU, bearer->mtu))
722                         goto prop_msg_full;
723
724         nla_nest_end(msg->skb, prop);
725
726 #ifdef CONFIG_TIPC_MEDIA_UDP
727         if (bearer->media->type_id == TIPC_MEDIA_TYPE_UDP) {
728                 if (tipc_udp_nl_add_bearer_data(msg, bearer))
729                         goto attr_msg_full;
730         }
731 #endif
732
733         nla_nest_end(msg->skb, attrs);
734         genlmsg_end(msg->skb, hdr);
735
736         return 0;
737
738 prop_msg_full:
739         nla_nest_cancel(msg->skb, prop);
740 attr_msg_full:
741         nla_nest_cancel(msg->skb, attrs);
742 msg_full:
743         genlmsg_cancel(msg->skb, hdr);
744
745         return -EMSGSIZE;
746 }
747
748 int tipc_nl_bearer_dump(struct sk_buff *skb, struct netlink_callback *cb)
749 {
750         int err;
751         int i = cb->args[0];
752         struct tipc_bearer *bearer;
753         struct tipc_nl_msg msg;
754         struct net *net = sock_net(skb->sk);
755         struct tipc_net *tn = net_generic(net, tipc_net_id);
756
757         if (i == MAX_BEARERS)
758                 return 0;
759
760         msg.skb = skb;
761         msg.portid = NETLINK_CB(cb->skb).portid;
762         msg.seq = cb->nlh->nlmsg_seq;
763
764         rtnl_lock();
765         for (i = 0; i < MAX_BEARERS; i++) {
766                 bearer = rtnl_dereference(tn->bearer_list[i]);
767                 if (!bearer)
768                         continue;
769
770                 err = __tipc_nl_add_bearer(&msg, bearer, NLM_F_MULTI);
771                 if (err)
772                         break;
773         }
774         rtnl_unlock();
775
776         cb->args[0] = i;
777         return skb->len;
778 }
779
780 int tipc_nl_bearer_get(struct sk_buff *skb, struct genl_info *info)
781 {
782         int err;
783         char *name;
784         struct sk_buff *rep;
785         struct tipc_bearer *bearer;
786         struct tipc_nl_msg msg;
787         struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
788         struct net *net = genl_info_net(info);
789
790         if (!info->attrs[TIPC_NLA_BEARER])
791                 return -EINVAL;
792
793         err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
794                                info->attrs[TIPC_NLA_BEARER],
795                                tipc_nl_bearer_policy, info->extack);
796         if (err)
797                 return err;
798
799         if (!attrs[TIPC_NLA_BEARER_NAME])
800                 return -EINVAL;
801         name = nla_data(attrs[TIPC_NLA_BEARER_NAME]);
802
803         rep = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
804         if (!rep)
805                 return -ENOMEM;
806
807         msg.skb = rep;
808         msg.portid = info->snd_portid;
809         msg.seq = info->snd_seq;
810
811         rtnl_lock();
812         bearer = tipc_bearer_find(net, name);
813         if (!bearer) {
814                 err = -EINVAL;
815                 NL_SET_ERR_MSG(info->extack, "Bearer not found");
816                 goto err_out;
817         }
818
819         err = __tipc_nl_add_bearer(&msg, bearer, 0);
820         if (err)
821                 goto err_out;
822         rtnl_unlock();
823
824         return genlmsg_reply(rep, info);
825 err_out:
826         rtnl_unlock();
827         nlmsg_free(rep);
828
829         return err;
830 }
831
832 int __tipc_nl_bearer_disable(struct sk_buff *skb, struct genl_info *info)
833 {
834         int err;
835         char *name;
836         struct tipc_bearer *bearer;
837         struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
838         struct net *net = sock_net(skb->sk);
839
840         if (!info->attrs[TIPC_NLA_BEARER])
841                 return -EINVAL;
842
843         err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
844                                info->attrs[TIPC_NLA_BEARER],
845                                tipc_nl_bearer_policy, info->extack);
846         if (err)
847                 return err;
848
849         if (!attrs[TIPC_NLA_BEARER_NAME])
850                 return -EINVAL;
851
852         name = nla_data(attrs[TIPC_NLA_BEARER_NAME]);
853
854         bearer = tipc_bearer_find(net, name);
855         if (!bearer) {
856                 NL_SET_ERR_MSG(info->extack, "Bearer not found");
857                 return -EINVAL;
858         }
859
860         bearer_disable(net, bearer);
861
862         return 0;
863 }
864
865 int tipc_nl_bearer_disable(struct sk_buff *skb, struct genl_info *info)
866 {
867         int err;
868
869         rtnl_lock();
870         err = __tipc_nl_bearer_disable(skb, info);
871         rtnl_unlock();
872
873         return err;
874 }
875
876 int __tipc_nl_bearer_enable(struct sk_buff *skb, struct genl_info *info)
877 {
878         int err;
879         char *bearer;
880         struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
881         struct net *net = sock_net(skb->sk);
882         u32 domain = 0;
883         u32 prio;
884
885         prio = TIPC_MEDIA_LINK_PRI;
886
887         if (!info->attrs[TIPC_NLA_BEARER])
888                 return -EINVAL;
889
890         err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
891                                info->attrs[TIPC_NLA_BEARER],
892                                tipc_nl_bearer_policy, info->extack);
893         if (err)
894                 return err;
895
896         if (!attrs[TIPC_NLA_BEARER_NAME])
897                 return -EINVAL;
898
899         bearer = nla_data(attrs[TIPC_NLA_BEARER_NAME]);
900
901         if (attrs[TIPC_NLA_BEARER_DOMAIN])
902                 domain = nla_get_u32(attrs[TIPC_NLA_BEARER_DOMAIN]);
903
904         if (attrs[TIPC_NLA_BEARER_PROP]) {
905                 struct nlattr *props[TIPC_NLA_PROP_MAX + 1];
906
907                 err = tipc_nl_parse_link_prop(attrs[TIPC_NLA_BEARER_PROP],
908                                               props);
909                 if (err)
910                         return err;
911
912                 if (props[TIPC_NLA_PROP_PRIO])
913                         prio = nla_get_u32(props[TIPC_NLA_PROP_PRIO]);
914         }
915
916         return tipc_enable_bearer(net, bearer, domain, prio, attrs,
917                                   info->extack);
918 }
919
920 int tipc_nl_bearer_enable(struct sk_buff *skb, struct genl_info *info)
921 {
922         int err;
923
924         rtnl_lock();
925         err = __tipc_nl_bearer_enable(skb, info);
926         rtnl_unlock();
927
928         return err;
929 }
930
931 int tipc_nl_bearer_add(struct sk_buff *skb, struct genl_info *info)
932 {
933         int err;
934         char *name;
935         struct tipc_bearer *b;
936         struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
937         struct net *net = sock_net(skb->sk);
938
939         if (!info->attrs[TIPC_NLA_BEARER])
940                 return -EINVAL;
941
942         err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
943                                info->attrs[TIPC_NLA_BEARER],
944                                tipc_nl_bearer_policy, info->extack);
945         if (err)
946                 return err;
947
948         if (!attrs[TIPC_NLA_BEARER_NAME])
949                 return -EINVAL;
950         name = nla_data(attrs[TIPC_NLA_BEARER_NAME]);
951
952         rtnl_lock();
953         b = tipc_bearer_find(net, name);
954         if (!b) {
955                 rtnl_unlock();
956                 NL_SET_ERR_MSG(info->extack, "Bearer not found");
957                 return -EINVAL;
958         }
959
960 #ifdef CONFIG_TIPC_MEDIA_UDP
961         if (attrs[TIPC_NLA_BEARER_UDP_OPTS]) {
962                 err = tipc_udp_nl_bearer_add(b,
963                                              attrs[TIPC_NLA_BEARER_UDP_OPTS]);
964                 if (err) {
965                         rtnl_unlock();
966                         return err;
967                 }
968         }
969 #endif
970         rtnl_unlock();
971
972         return 0;
973 }
974
975 int __tipc_nl_bearer_set(struct sk_buff *skb, struct genl_info *info)
976 {
977         struct tipc_bearer *b;
978         struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
979         struct net *net = sock_net(skb->sk);
980         char *name;
981         int err;
982
983         if (!info->attrs[TIPC_NLA_BEARER])
984                 return -EINVAL;
985
986         err = nla_parse_nested(attrs, TIPC_NLA_BEARER_MAX,
987                                info->attrs[TIPC_NLA_BEARER],
988                                tipc_nl_bearer_policy, info->extack);
989         if (err)
990                 return err;
991
992         if (!attrs[TIPC_NLA_BEARER_NAME])
993                 return -EINVAL;
994         name = nla_data(attrs[TIPC_NLA_BEARER_NAME]);
995
996         b = tipc_bearer_find(net, name);
997         if (!b) {
998                 NL_SET_ERR_MSG(info->extack, "Bearer not found");
999                 return -EINVAL;
1000         }
1001
1002         if (attrs[TIPC_NLA_BEARER_PROP]) {
1003                 struct nlattr *props[TIPC_NLA_PROP_MAX + 1];
1004
1005                 err = tipc_nl_parse_link_prop(attrs[TIPC_NLA_BEARER_PROP],
1006                                               props);
1007                 if (err)
1008                         return err;
1009
1010                 if (props[TIPC_NLA_PROP_TOL]) {
1011                         b->tolerance = nla_get_u32(props[TIPC_NLA_PROP_TOL]);
1012                         tipc_node_apply_property(net, b, TIPC_NLA_PROP_TOL);
1013                 }
1014                 if (props[TIPC_NLA_PROP_PRIO])
1015                         b->priority = nla_get_u32(props[TIPC_NLA_PROP_PRIO]);
1016                 if (props[TIPC_NLA_PROP_WIN])
1017                         b->window = nla_get_u32(props[TIPC_NLA_PROP_WIN]);
1018                 if (props[TIPC_NLA_PROP_MTU]) {
1019                         if (b->media->type_id != TIPC_MEDIA_TYPE_UDP) {
1020                                 NL_SET_ERR_MSG(info->extack,
1021                                                "MTU property is unsupported");
1022                                 return -EINVAL;
1023                         }
1024 #ifdef CONFIG_TIPC_MEDIA_UDP
1025                         if (tipc_udp_mtu_bad(nla_get_u32
1026                                              (props[TIPC_NLA_PROP_MTU]))) {
1027                                 NL_SET_ERR_MSG(info->extack,
1028                                                "MTU value is out-of-range");
1029                                 return -EINVAL;
1030                         }
1031                         b->mtu = nla_get_u32(props[TIPC_NLA_PROP_MTU]);
1032                         tipc_node_apply_property(net, b, TIPC_NLA_PROP_MTU);
1033 #endif
1034                 }
1035         }
1036
1037         return 0;
1038 }
1039
1040 int tipc_nl_bearer_set(struct sk_buff *skb, struct genl_info *info)
1041 {
1042         int err;
1043
1044         rtnl_lock();
1045         err = __tipc_nl_bearer_set(skb, info);
1046         rtnl_unlock();
1047
1048         return err;
1049 }
1050
1051 static int __tipc_nl_add_media(struct tipc_nl_msg *msg,
1052                                struct tipc_media *media, int nlflags)
1053 {
1054         void *hdr;
1055         struct nlattr *attrs;
1056         struct nlattr *prop;
1057
1058         hdr = genlmsg_put(msg->skb, msg->portid, msg->seq, &tipc_genl_family,
1059                           nlflags, TIPC_NL_MEDIA_GET);
1060         if (!hdr)
1061                 return -EMSGSIZE;
1062
1063         attrs = nla_nest_start(msg->skb, TIPC_NLA_MEDIA);
1064         if (!attrs)
1065                 goto msg_full;
1066
1067         if (nla_put_string(msg->skb, TIPC_NLA_MEDIA_NAME, media->name))
1068                 goto attr_msg_full;
1069
1070         prop = nla_nest_start(msg->skb, TIPC_NLA_MEDIA_PROP);
1071         if (!prop)
1072                 goto prop_msg_full;
1073         if (nla_put_u32(msg->skb, TIPC_NLA_PROP_PRIO, media->priority))
1074                 goto prop_msg_full;
1075         if (nla_put_u32(msg->skb, TIPC_NLA_PROP_TOL, media->tolerance))
1076                 goto prop_msg_full;
1077         if (nla_put_u32(msg->skb, TIPC_NLA_PROP_WIN, media->window))
1078                 goto prop_msg_full;
1079         if (media->type_id == TIPC_MEDIA_TYPE_UDP)
1080                 if (nla_put_u32(msg->skb, TIPC_NLA_PROP_MTU, media->mtu))
1081                         goto prop_msg_full;
1082
1083         nla_nest_end(msg->skb, prop);
1084         nla_nest_end(msg->skb, attrs);
1085         genlmsg_end(msg->skb, hdr);
1086
1087         return 0;
1088
1089 prop_msg_full:
1090         nla_nest_cancel(msg->skb, prop);
1091 attr_msg_full:
1092         nla_nest_cancel(msg->skb, attrs);
1093 msg_full:
1094         genlmsg_cancel(msg->skb, hdr);
1095
1096         return -EMSGSIZE;
1097 }
1098
1099 int tipc_nl_media_dump(struct sk_buff *skb, struct netlink_callback *cb)
1100 {
1101         int err;
1102         int i = cb->args[0];
1103         struct tipc_nl_msg msg;
1104
1105         if (i == MAX_MEDIA)
1106                 return 0;
1107
1108         msg.skb = skb;
1109         msg.portid = NETLINK_CB(cb->skb).portid;
1110         msg.seq = cb->nlh->nlmsg_seq;
1111
1112         rtnl_lock();
1113         for (; media_info_array[i] != NULL; i++) {
1114                 err = __tipc_nl_add_media(&msg, media_info_array[i],
1115                                           NLM_F_MULTI);
1116                 if (err)
1117                         break;
1118         }
1119         rtnl_unlock();
1120
1121         cb->args[0] = i;
1122         return skb->len;
1123 }
1124
1125 int tipc_nl_media_get(struct sk_buff *skb, struct genl_info *info)
1126 {
1127         int err;
1128         char *name;
1129         struct tipc_nl_msg msg;
1130         struct tipc_media *media;
1131         struct sk_buff *rep;
1132         struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
1133
1134         if (!info->attrs[TIPC_NLA_MEDIA])
1135                 return -EINVAL;
1136
1137         err = nla_parse_nested(attrs, TIPC_NLA_MEDIA_MAX,
1138                                info->attrs[TIPC_NLA_MEDIA],
1139                                tipc_nl_media_policy, info->extack);
1140         if (err)
1141                 return err;
1142
1143         if (!attrs[TIPC_NLA_MEDIA_NAME])
1144                 return -EINVAL;
1145         name = nla_data(attrs[TIPC_NLA_MEDIA_NAME]);
1146
1147         rep = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
1148         if (!rep)
1149                 return -ENOMEM;
1150
1151         msg.skb = rep;
1152         msg.portid = info->snd_portid;
1153         msg.seq = info->snd_seq;
1154
1155         rtnl_lock();
1156         media = tipc_media_find(name);
1157         if (!media) {
1158                 NL_SET_ERR_MSG(info->extack, "Media not found");
1159                 err = -EINVAL;
1160                 goto err_out;
1161         }
1162
1163         err = __tipc_nl_add_media(&msg, media, 0);
1164         if (err)
1165                 goto err_out;
1166         rtnl_unlock();
1167
1168         return genlmsg_reply(rep, info);
1169 err_out:
1170         rtnl_unlock();
1171         nlmsg_free(rep);
1172
1173         return err;
1174 }
1175
1176 int __tipc_nl_media_set(struct sk_buff *skb, struct genl_info *info)
1177 {
1178         int err;
1179         char *name;
1180         struct tipc_media *m;
1181         struct nlattr *attrs[TIPC_NLA_BEARER_MAX + 1];
1182
1183         if (!info->attrs[TIPC_NLA_MEDIA])
1184                 return -EINVAL;
1185
1186         err = nla_parse_nested(attrs, TIPC_NLA_MEDIA_MAX,
1187                                info->attrs[TIPC_NLA_MEDIA],
1188                                tipc_nl_media_policy, info->extack);
1189
1190         if (!attrs[TIPC_NLA_MEDIA_NAME])
1191                 return -EINVAL;
1192         name = nla_data(attrs[TIPC_NLA_MEDIA_NAME]);
1193
1194         m = tipc_media_find(name);
1195         if (!m) {
1196                 NL_SET_ERR_MSG(info->extack, "Media not found");
1197                 return -EINVAL;
1198         }
1199         if (attrs[TIPC_NLA_MEDIA_PROP]) {
1200                 struct nlattr *props[TIPC_NLA_PROP_MAX + 1];
1201
1202                 err = tipc_nl_parse_link_prop(attrs[TIPC_NLA_MEDIA_PROP],
1203                                               props);
1204                 if (err)
1205                         return err;
1206
1207                 if (props[TIPC_NLA_PROP_TOL])
1208                         m->tolerance = nla_get_u32(props[TIPC_NLA_PROP_TOL]);
1209                 if (props[TIPC_NLA_PROP_PRIO])
1210                         m->priority = nla_get_u32(props[TIPC_NLA_PROP_PRIO]);
1211                 if (props[TIPC_NLA_PROP_WIN])
1212                         m->window = nla_get_u32(props[TIPC_NLA_PROP_WIN]);
1213                 if (props[TIPC_NLA_PROP_MTU]) {
1214                         if (m->type_id != TIPC_MEDIA_TYPE_UDP) {
1215                                 NL_SET_ERR_MSG(info->extack,
1216                                                "MTU property is unsupported");
1217                                 return -EINVAL;
1218                         }
1219 #ifdef CONFIG_TIPC_MEDIA_UDP
1220                         if (tipc_udp_mtu_bad(nla_get_u32
1221                                              (props[TIPC_NLA_PROP_MTU]))) {
1222                                 NL_SET_ERR_MSG(info->extack,
1223                                                "MTU value is out-of-range");
1224                                 return -EINVAL;
1225                         }
1226                         m->mtu = nla_get_u32(props[TIPC_NLA_PROP_MTU]);
1227 #endif
1228                 }
1229         }
1230
1231         return 0;
1232 }
1233
1234 int tipc_nl_media_set(struct sk_buff *skb, struct genl_info *info)
1235 {
1236         int err;
1237
1238         rtnl_lock();
1239         err = __tipc_nl_media_set(skb, info);
1240         rtnl_unlock();
1241
1242         return err;
1243 }