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