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