net: ipmr: move pimsm_enabled to pim.h and rename
[deliverable/linux.git] / net / ipv4 / ipmr.c
CommitLineData
1da177e4
LT
1/*
2 * IP multicast routing support for mrouted 3.6/3.8
3 *
113aa838 4 * (c) 1995 Alan Cox, <alan@lxorguk.ukuu.org.uk>
1da177e4
LT
5 * Linux Consultancy and Custom Driver Development
6 *
7 * This program is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License
9 * as published by the Free Software Foundation; either version
10 * 2 of the License, or (at your option) any later version.
11 *
1da177e4
LT
12 * Fixes:
13 * Michael Chastain : Incorrect size of copying.
14 * Alan Cox : Added the cache manager code
15 * Alan Cox : Fixed the clone/copy bug and device race.
16 * Mike McLagan : Routing by source
17 * Malcolm Beattie : Buffer handling fixes.
18 * Alexey Kuznetsov : Double buffer free and other fixes.
19 * SVR Anand : Fixed several multicast bugs and problems.
20 * Alexey Kuznetsov : Status, optimisations and more.
21 * Brad Parker : Better behaviour on mrouted upcall
22 * overflow.
23 * Carlos Picoto : PIMv1 Support
24 * Pavlin Ivanov Radoslavov: PIMv2 Registers must checksum only PIM header
f77f13e2 25 * Relax this requirement to work with older peers.
1da177e4
LT
26 *
27 */
28
1da177e4
LT
29#include <asm/uaccess.h>
30#include <linux/types.h>
4fc268d2 31#include <linux/capability.h>
1da177e4
LT
32#include <linux/errno.h>
33#include <linux/timer.h>
34#include <linux/mm.h>
35#include <linux/kernel.h>
36#include <linux/fcntl.h>
37#include <linux/stat.h>
38#include <linux/socket.h>
39#include <linux/in.h>
40#include <linux/inet.h>
41#include <linux/netdevice.h>
42#include <linux/inetdevice.h>
43#include <linux/igmp.h>
44#include <linux/proc_fs.h>
45#include <linux/seq_file.h>
46#include <linux/mroute.h>
47#include <linux/init.h>
46f25dff 48#include <linux/if_ether.h>
5a0e3ad6 49#include <linux/slab.h>
457c4cbc 50#include <net/net_namespace.h>
1da177e4
LT
51#include <net/ip.h>
52#include <net/protocol.h>
53#include <linux/skbuff.h>
14c85021 54#include <net/route.h>
1da177e4
LT
55#include <net/sock.h>
56#include <net/icmp.h>
57#include <net/udp.h>
58#include <net/raw.h>
59#include <linux/notifier.h>
60#include <linux/if_arp.h>
61#include <linux/netfilter_ipv4.h>
709b46e8 62#include <linux/compat.h>
bc3b2d7f 63#include <linux/export.h>
c5441932 64#include <net/ip_tunnels.h>
1da177e4 65#include <net/checksum.h>
dc5fc579 66#include <net/netlink.h>
f0ad0860 67#include <net/fib_rules.h>
d67b8c61 68#include <linux/netconf.h>
1da177e4 69
f0ad0860
PM
70struct ipmr_rule {
71 struct fib_rule common;
72};
73
74struct ipmr_result {
75 struct mr_table *mrt;
76};
77
1da177e4 78/* Big lock, protecting vif table, mrt cache and mroute socket state.
a8cb16dd 79 * Note that the changes are semaphored via rtnl_lock.
1da177e4
LT
80 */
81
82static DEFINE_RWLOCK(mrt_lock);
83
7ef8f65d 84/* Multicast router control variables */
1da177e4 85
1da177e4
LT
86/* Special spinlock for queue of unresolved entries */
87static DEFINE_SPINLOCK(mfc_unres_lock);
88
89/* We return to original Alan's scheme. Hash table of resolved
a8cb16dd
ED
90 * entries is changed only in process context and protected
91 * with weak lock mrt_lock. Queue of unresolved entries is protected
92 * with strong spinlock mfc_unres_lock.
93 *
94 * In this case data path is free of exclusive locks at all.
1da177e4
LT
95 */
96
e18b890b 97static struct kmem_cache *mrt_cachep __read_mostly;
1da177e4 98
f0ad0860 99static struct mr_table *ipmr_new_table(struct net *net, u32 id);
acbb219d
FR
100static void ipmr_free_table(struct mr_table *mrt);
101
c4854ec8
RR
102static void ip_mr_forward(struct net *net, struct mr_table *mrt,
103 struct sk_buff *skb, struct mfc_cache *cache,
104 int local);
0c12295a 105static int ipmr_cache_report(struct mr_table *mrt,
4feb88e5 106 struct sk_buff *pkt, vifi_t vifi, int assert);
cb6a4e46
PM
107static int __ipmr_fill_mroute(struct mr_table *mrt, struct sk_buff *skb,
108 struct mfc_cache *c, struct rtmsg *rtm);
8cd3ac9f
ND
109static void mroute_netlink_event(struct mr_table *mrt, struct mfc_cache *mfc,
110 int cmd);
acbb219d 111static void mroute_clean_tables(struct mr_table *mrt);
f0ad0860
PM
112static void ipmr_expire_process(unsigned long arg);
113
114#ifdef CONFIG_IP_MROUTE_MULTIPLE_TABLES
115#define ipmr_for_each_table(mrt, net) \
116 list_for_each_entry_rcu(mrt, &net->ipv4.mr_tables, list)
117
118static struct mr_table *ipmr_get_table(struct net *net, u32 id)
119{
120 struct mr_table *mrt;
121
122 ipmr_for_each_table(mrt, net) {
123 if (mrt->id == id)
124 return mrt;
125 }
126 return NULL;
127}
128
da91981b 129static int ipmr_fib_lookup(struct net *net, struct flowi4 *flp4,
f0ad0860
PM
130 struct mr_table **mrt)
131{
f0ad0860 132 int err;
95f4a45d
HFS
133 struct ipmr_result res;
134 struct fib_lookup_arg arg = {
135 .result = &res,
136 .flags = FIB_LOOKUP_NOREF,
137 };
f0ad0860 138
da91981b
DM
139 err = fib_rules_lookup(net->ipv4.mr_rules_ops,
140 flowi4_to_flowi(flp4), 0, &arg);
f0ad0860
PM
141 if (err < 0)
142 return err;
143 *mrt = res.mrt;
144 return 0;
145}
146
147static int ipmr_rule_action(struct fib_rule *rule, struct flowi *flp,
148 int flags, struct fib_lookup_arg *arg)
149{
150 struct ipmr_result *res = arg->result;
151 struct mr_table *mrt;
1da177e4 152
f0ad0860
PM
153 switch (rule->action) {
154 case FR_ACT_TO_TBL:
155 break;
156 case FR_ACT_UNREACHABLE:
157 return -ENETUNREACH;
158 case FR_ACT_PROHIBIT:
159 return -EACCES;
160 case FR_ACT_BLACKHOLE:
161 default:
162 return -EINVAL;
163 }
164
165 mrt = ipmr_get_table(rule->fr_net, rule->table);
51456b29 166 if (!mrt)
f0ad0860
PM
167 return -EAGAIN;
168 res->mrt = mrt;
169 return 0;
170}
171
172static int ipmr_rule_match(struct fib_rule *rule, struct flowi *fl, int flags)
173{
174 return 1;
175}
176
177static const struct nla_policy ipmr_rule_policy[FRA_MAX + 1] = {
178 FRA_GENERIC_POLICY,
179};
180
181static int ipmr_rule_configure(struct fib_rule *rule, struct sk_buff *skb,
182 struct fib_rule_hdr *frh, struct nlattr **tb)
183{
184 return 0;
185}
186
187static int ipmr_rule_compare(struct fib_rule *rule, struct fib_rule_hdr *frh,
188 struct nlattr **tb)
189{
190 return 1;
191}
192
193static int ipmr_rule_fill(struct fib_rule *rule, struct sk_buff *skb,
194 struct fib_rule_hdr *frh)
195{
196 frh->dst_len = 0;
197 frh->src_len = 0;
198 frh->tos = 0;
199 return 0;
200}
201
04a6f82c 202static const struct fib_rules_ops __net_initconst ipmr_rules_ops_template = {
25239cee 203 .family = RTNL_FAMILY_IPMR,
f0ad0860
PM
204 .rule_size = sizeof(struct ipmr_rule),
205 .addr_size = sizeof(u32),
206 .action = ipmr_rule_action,
207 .match = ipmr_rule_match,
208 .configure = ipmr_rule_configure,
209 .compare = ipmr_rule_compare,
f0ad0860
PM
210 .fill = ipmr_rule_fill,
211 .nlgroup = RTNLGRP_IPV4_RULE,
212 .policy = ipmr_rule_policy,
213 .owner = THIS_MODULE,
214};
215
216static int __net_init ipmr_rules_init(struct net *net)
217{
218 struct fib_rules_ops *ops;
219 struct mr_table *mrt;
220 int err;
221
222 ops = fib_rules_register(&ipmr_rules_ops_template, net);
223 if (IS_ERR(ops))
224 return PTR_ERR(ops);
225
226 INIT_LIST_HEAD(&net->ipv4.mr_tables);
227
228 mrt = ipmr_new_table(net, RT_TABLE_DEFAULT);
1113ebbc
NA
229 if (IS_ERR(mrt)) {
230 err = PTR_ERR(mrt);
f0ad0860
PM
231 goto err1;
232 }
233
234 err = fib_default_rule_add(ops, 0x7fff, RT_TABLE_DEFAULT, 0);
235 if (err < 0)
236 goto err2;
237
238 net->ipv4.mr_rules_ops = ops;
239 return 0;
240
241err2:
f243e5a7 242 ipmr_free_table(mrt);
f0ad0860
PM
243err1:
244 fib_rules_unregister(ops);
245 return err;
246}
247
248static void __net_exit ipmr_rules_exit(struct net *net)
249{
250 struct mr_table *mrt, *next;
251
ed785309 252 rtnl_lock();
035320d5
ED
253 list_for_each_entry_safe(mrt, next, &net->ipv4.mr_tables, list) {
254 list_del(&mrt->list);
acbb219d 255 ipmr_free_table(mrt);
035320d5 256 }
f0ad0860 257 fib_rules_unregister(net->ipv4.mr_rules_ops);
419df12f 258 rtnl_unlock();
f0ad0860
PM
259}
260#else
261#define ipmr_for_each_table(mrt, net) \
262 for (mrt = net->ipv4.mrt; mrt; mrt = NULL)
263
264static struct mr_table *ipmr_get_table(struct net *net, u32 id)
265{
266 return net->ipv4.mrt;
267}
268
da91981b 269static int ipmr_fib_lookup(struct net *net, struct flowi4 *flp4,
f0ad0860
PM
270 struct mr_table **mrt)
271{
272 *mrt = net->ipv4.mrt;
273 return 0;
274}
275
276static int __net_init ipmr_rules_init(struct net *net)
277{
1113ebbc
NA
278 struct mr_table *mrt;
279
280 mrt = ipmr_new_table(net, RT_TABLE_DEFAULT);
281 if (IS_ERR(mrt))
282 return PTR_ERR(mrt);
283 net->ipv4.mrt = mrt;
284 return 0;
f0ad0860
PM
285}
286
287static void __net_exit ipmr_rules_exit(struct net *net)
288{
ed785309 289 rtnl_lock();
acbb219d 290 ipmr_free_table(net->ipv4.mrt);
ed785309
WC
291 net->ipv4.mrt = NULL;
292 rtnl_unlock();
f0ad0860
PM
293}
294#endif
295
296static struct mr_table *ipmr_new_table(struct net *net, u32 id)
297{
298 struct mr_table *mrt;
299 unsigned int i;
1da177e4 300
1113ebbc
NA
301 /* "pimreg%u" should not exceed 16 bytes (IFNAMSIZ) */
302 if (id != RT_TABLE_DEFAULT && id >= 1000000000)
303 return ERR_PTR(-EINVAL);
304
f0ad0860 305 mrt = ipmr_get_table(net, id);
00db4124 306 if (mrt)
f0ad0860
PM
307 return mrt;
308
309 mrt = kzalloc(sizeof(*mrt), GFP_KERNEL);
51456b29 310 if (!mrt)
1113ebbc 311 return ERR_PTR(-ENOMEM);
8de53dfb 312 write_pnet(&mrt->net, net);
f0ad0860
PM
313 mrt->id = id;
314
315 /* Forwarding cache */
316 for (i = 0; i < MFC_LINES; i++)
317 INIT_LIST_HEAD(&mrt->mfc_cache_array[i]);
318
319 INIT_LIST_HEAD(&mrt->mfc_unres_queue);
320
321 setup_timer(&mrt->ipmr_expire_timer, ipmr_expire_process,
322 (unsigned long)mrt);
323
f0ad0860 324 mrt->mroute_reg_vif_num = -1;
f0ad0860
PM
325#ifdef CONFIG_IP_MROUTE_MULTIPLE_TABLES
326 list_add_tail_rcu(&mrt->list, &net->ipv4.mr_tables);
327#endif
328 return mrt;
329}
1da177e4 330
acbb219d
FR
331static void ipmr_free_table(struct mr_table *mrt)
332{
333 del_timer_sync(&mrt->ipmr_expire_timer);
334 mroute_clean_tables(mrt);
335 kfree(mrt);
336}
337
1da177e4
LT
338/* Service routines creating virtual interfaces: DVMRP tunnels and PIMREG */
339
d607032d
WC
340static void ipmr_del_tunnel(struct net_device *dev, struct vifctl *v)
341{
4feb88e5
BT
342 struct net *net = dev_net(dev);
343
d607032d
WC
344 dev_close(dev);
345
4feb88e5 346 dev = __dev_get_by_name(net, "tunl0");
d607032d 347 if (dev) {
5bc3eb7e 348 const struct net_device_ops *ops = dev->netdev_ops;
d607032d 349 struct ifreq ifr;
d607032d
WC
350 struct ip_tunnel_parm p;
351
352 memset(&p, 0, sizeof(p));
353 p.iph.daddr = v->vifc_rmt_addr.s_addr;
354 p.iph.saddr = v->vifc_lcl_addr.s_addr;
355 p.iph.version = 4;
356 p.iph.ihl = 5;
357 p.iph.protocol = IPPROTO_IPIP;
358 sprintf(p.name, "dvmrp%d", v->vifc_vifi);
359 ifr.ifr_ifru.ifru_data = (__force void __user *)&p;
360
5bc3eb7e
SH
361 if (ops->ndo_do_ioctl) {
362 mm_segment_t oldfs = get_fs();
363
364 set_fs(KERNEL_DS);
365 ops->ndo_do_ioctl(dev, &ifr, SIOCDELTUNNEL);
366 set_fs(oldfs);
367 }
d607032d
WC
368 }
369}
370
a0b47736
NA
371/* Initialize ipmr pimreg/tunnel in_device */
372static bool ipmr_init_vif_indev(const struct net_device *dev)
373{
374 struct in_device *in_dev;
375
376 ASSERT_RTNL();
377
378 in_dev = __in_dev_get_rtnl(dev);
379 if (!in_dev)
380 return false;
381 ipv4_devconf_setall(in_dev);
382 neigh_parms_data_state_setall(in_dev->arp_parms);
383 IPV4_DEVCONF(in_dev->cnf, RP_FILTER) = 0;
384
385 return true;
386}
387
7ef8f65d 388static struct net_device *ipmr_new_tunnel(struct net *net, struct vifctl *v)
1da177e4
LT
389{
390 struct net_device *dev;
391
4feb88e5 392 dev = __dev_get_by_name(net, "tunl0");
1da177e4
LT
393
394 if (dev) {
5bc3eb7e 395 const struct net_device_ops *ops = dev->netdev_ops;
1da177e4
LT
396 int err;
397 struct ifreq ifr;
1da177e4 398 struct ip_tunnel_parm p;
1da177e4
LT
399
400 memset(&p, 0, sizeof(p));
401 p.iph.daddr = v->vifc_rmt_addr.s_addr;
402 p.iph.saddr = v->vifc_lcl_addr.s_addr;
403 p.iph.version = 4;
404 p.iph.ihl = 5;
405 p.iph.protocol = IPPROTO_IPIP;
406 sprintf(p.name, "dvmrp%d", v->vifc_vifi);
ba93ef74 407 ifr.ifr_ifru.ifru_data = (__force void __user *)&p;
1da177e4 408
5bc3eb7e
SH
409 if (ops->ndo_do_ioctl) {
410 mm_segment_t oldfs = get_fs();
411
412 set_fs(KERNEL_DS);
413 err = ops->ndo_do_ioctl(dev, &ifr, SIOCADDTUNNEL);
414 set_fs(oldfs);
a8cb16dd 415 } else {
5bc3eb7e 416 err = -EOPNOTSUPP;
a8cb16dd 417 }
1da177e4
LT
418 dev = NULL;
419
4feb88e5
BT
420 if (err == 0 &&
421 (dev = __dev_get_by_name(net, p.name)) != NULL) {
1da177e4 422 dev->flags |= IFF_MULTICAST;
a0b47736 423 if (!ipmr_init_vif_indev(dev))
1da177e4 424 goto failure;
1da177e4
LT
425 if (dev_open(dev))
426 goto failure;
7dc00c82 427 dev_hold(dev);
1da177e4
LT
428 }
429 }
430 return dev;
431
432failure:
433 /* allow the register to be completed before unregistering. */
434 rtnl_unlock();
435 rtnl_lock();
436
437 unregister_netdevice(dev);
438 return NULL;
439}
440
c316c629 441#if defined(CONFIG_IP_PIMSM_V1) || defined(CONFIG_IP_PIMSM_V2)
6fef4c0c 442static netdev_tx_t reg_vif_xmit(struct sk_buff *skb, struct net_device *dev)
1da177e4 443{
4feb88e5 444 struct net *net = dev_net(dev);
f0ad0860 445 struct mr_table *mrt;
da91981b
DM
446 struct flowi4 fl4 = {
447 .flowi4_oif = dev->ifindex,
6a662719 448 .flowi4_iif = skb->skb_iif ? : LOOPBACK_IFINDEX,
da91981b 449 .flowi4_mark = skb->mark,
f0ad0860
PM
450 };
451 int err;
452
da91981b 453 err = ipmr_fib_lookup(net, &fl4, &mrt);
e40dbc51
BG
454 if (err < 0) {
455 kfree_skb(skb);
f0ad0860 456 return err;
e40dbc51 457 }
4feb88e5 458
1da177e4 459 read_lock(&mrt_lock);
cf3677ae
PE
460 dev->stats.tx_bytes += skb->len;
461 dev->stats.tx_packets++;
0c12295a 462 ipmr_cache_report(mrt, skb, mrt->mroute_reg_vif_num, IGMPMSG_WHOLEPKT);
1da177e4
LT
463 read_unlock(&mrt_lock);
464 kfree_skb(skb);
6ed10654 465 return NETDEV_TX_OK;
1da177e4
LT
466}
467
ee9b9596
ND
468static int reg_vif_get_iflink(const struct net_device *dev)
469{
470 return 0;
471}
472
007c3838
SH
473static const struct net_device_ops reg_vif_netdev_ops = {
474 .ndo_start_xmit = reg_vif_xmit,
ee9b9596 475 .ndo_get_iflink = reg_vif_get_iflink,
007c3838
SH
476};
477
1da177e4
LT
478static void reg_vif_setup(struct net_device *dev)
479{
480 dev->type = ARPHRD_PIMREG;
46f25dff 481 dev->mtu = ETH_DATA_LEN - sizeof(struct iphdr) - 8;
1da177e4 482 dev->flags = IFF_NOARP;
70cb4a45 483 dev->netdev_ops = &reg_vif_netdev_ops;
1da177e4 484 dev->destructor = free_netdev;
403dbb97 485 dev->features |= NETIF_F_NETNS_LOCAL;
1da177e4
LT
486}
487
f0ad0860 488static struct net_device *ipmr_reg_vif(struct net *net, struct mr_table *mrt)
1da177e4
LT
489{
490 struct net_device *dev;
f0ad0860 491 char name[IFNAMSIZ];
1da177e4 492
f0ad0860
PM
493 if (mrt->id == RT_TABLE_DEFAULT)
494 sprintf(name, "pimreg");
495 else
496 sprintf(name, "pimreg%u", mrt->id);
1da177e4 497
c835a677 498 dev = alloc_netdev(0, name, NET_NAME_UNKNOWN, reg_vif_setup);
1da177e4 499
51456b29 500 if (!dev)
1da177e4
LT
501 return NULL;
502
403dbb97
TG
503 dev_net_set(dev, net);
504
1da177e4
LT
505 if (register_netdevice(dev)) {
506 free_netdev(dev);
507 return NULL;
508 }
1da177e4 509
a0b47736 510 if (!ipmr_init_vif_indev(dev))
1da177e4 511 goto failure;
1da177e4
LT
512 if (dev_open(dev))
513 goto failure;
514
7dc00c82
WC
515 dev_hold(dev);
516
1da177e4
LT
517 return dev;
518
519failure:
520 /* allow the register to be completed before unregistering. */
521 rtnl_unlock();
522 rtnl_lock();
523
524 unregister_netdevice(dev);
525 return NULL;
526}
c316c629
NA
527
528/* called with rcu_read_lock() */
529static int __pim_rcv(struct mr_table *mrt, struct sk_buff *skb,
530 unsigned int pimlen)
531{
532 struct net_device *reg_dev = NULL;
533 struct iphdr *encap;
534
535 encap = (struct iphdr *)(skb_transport_header(skb) + pimlen);
7ef8f65d 536 /* Check that:
c316c629
NA
537 * a. packet is really sent to a multicast group
538 * b. packet is not a NULL-REGISTER
539 * c. packet is not truncated
540 */
541 if (!ipv4_is_multicast(encap->daddr) ||
542 encap->tot_len == 0 ||
543 ntohs(encap->tot_len) + pimlen > skb->len)
544 return 1;
545
546 read_lock(&mrt_lock);
547 if (mrt->mroute_reg_vif_num >= 0)
548 reg_dev = mrt->vif_table[mrt->mroute_reg_vif_num].dev;
549 read_unlock(&mrt_lock);
550
551 if (!reg_dev)
552 return 1;
553
554 skb->mac_header = skb->network_header;
555 skb_pull(skb, (u8 *)encap - skb->data);
556 skb_reset_network_header(skb);
557 skb->protocol = htons(ETH_P_IP);
558 skb->ip_summed = CHECKSUM_NONE;
559
560 skb_tunnel_rx(skb, reg_dev, dev_net(reg_dev));
561
562 netif_rx(skb);
563
564 return NET_RX_SUCCESS;
565}
566#else
567static struct net_device *ipmr_reg_vif(struct net *net, struct mr_table *mrt)
568{
569 return NULL;
570}
1da177e4
LT
571#endif
572
2c53040f
BH
573/**
574 * vif_delete - Delete a VIF entry
7dc00c82 575 * @notify: Set to 1, if the caller is a notifier_call
1da177e4 576 */
0c12295a 577static int vif_delete(struct mr_table *mrt, int vifi, int notify,
d17fa6fa 578 struct list_head *head)
1da177e4
LT
579{
580 struct vif_device *v;
581 struct net_device *dev;
582 struct in_device *in_dev;
583
0c12295a 584 if (vifi < 0 || vifi >= mrt->maxvif)
1da177e4
LT
585 return -EADDRNOTAVAIL;
586
0c12295a 587 v = &mrt->vif_table[vifi];
1da177e4
LT
588
589 write_lock_bh(&mrt_lock);
590 dev = v->dev;
591 v->dev = NULL;
592
593 if (!dev) {
594 write_unlock_bh(&mrt_lock);
595 return -EADDRNOTAVAIL;
596 }
597
0c12295a
PM
598 if (vifi == mrt->mroute_reg_vif_num)
599 mrt->mroute_reg_vif_num = -1;
1da177e4 600
a8cb16dd 601 if (vifi + 1 == mrt->maxvif) {
1da177e4 602 int tmp;
a8cb16dd
ED
603
604 for (tmp = vifi - 1; tmp >= 0; tmp--) {
0c12295a 605 if (VIF_EXISTS(mrt, tmp))
1da177e4
LT
606 break;
607 }
0c12295a 608 mrt->maxvif = tmp+1;
1da177e4
LT
609 }
610
611 write_unlock_bh(&mrt_lock);
612
613 dev_set_allmulti(dev, -1);
614
a8cb16dd
ED
615 in_dev = __in_dev_get_rtnl(dev);
616 if (in_dev) {
42f811b8 617 IPV4_DEVCONF(in_dev->cnf, MC_FORWARDING)--;
d67b8c61
ND
618 inet_netconf_notify_devconf(dev_net(dev),
619 NETCONFA_MC_FORWARDING,
620 dev->ifindex, &in_dev->cnf);
1da177e4
LT
621 ip_rt_multicast_event(in_dev);
622 }
623
a8cb16dd 624 if (v->flags & (VIFF_TUNNEL | VIFF_REGISTER) && !notify)
d17fa6fa 625 unregister_netdevice_queue(dev, head);
1da177e4
LT
626
627 dev_put(dev);
628 return 0;
629}
630
a8c9486b 631static void ipmr_cache_free_rcu(struct rcu_head *head)
5c0a66f5 632{
a8c9486b
ED
633 struct mfc_cache *c = container_of(head, struct mfc_cache, rcu);
634
5c0a66f5
BT
635 kmem_cache_free(mrt_cachep, c);
636}
637
a8c9486b
ED
638static inline void ipmr_cache_free(struct mfc_cache *c)
639{
640 call_rcu(&c->rcu, ipmr_cache_free_rcu);
641}
642
1da177e4 643/* Destroy an unresolved cache entry, killing queued skbs
a8cb16dd 644 * and reporting error to netlink readers.
1da177e4 645 */
0c12295a 646static void ipmr_destroy_unres(struct mr_table *mrt, struct mfc_cache *c)
1da177e4 647{
8de53dfb 648 struct net *net = read_pnet(&mrt->net);
1da177e4 649 struct sk_buff *skb;
9ef1d4c7 650 struct nlmsgerr *e;
1da177e4 651
0c12295a 652 atomic_dec(&mrt->cache_resolve_queue_len);
1da177e4 653
c354e124 654 while ((skb = skb_dequeue(&c->mfc_un.unres.unresolved))) {
eddc9ec5 655 if (ip_hdr(skb)->version == 0) {
1da177e4
LT
656 struct nlmsghdr *nlh = (struct nlmsghdr *)skb_pull(skb, sizeof(struct iphdr));
657 nlh->nlmsg_type = NLMSG_ERROR;
573ce260 658 nlh->nlmsg_len = nlmsg_msg_size(sizeof(struct nlmsgerr));
1da177e4 659 skb_trim(skb, nlh->nlmsg_len);
573ce260 660 e = nlmsg_data(nlh);
9ef1d4c7
PM
661 e->error = -ETIMEDOUT;
662 memset(&e->msg, 0, sizeof(e->msg));
2942e900 663
15e47304 664 rtnl_unicast(skb, net, NETLINK_CB(skb).portid);
a8cb16dd 665 } else {
1da177e4 666 kfree_skb(skb);
a8cb16dd 667 }
1da177e4
LT
668 }
669
5c0a66f5 670 ipmr_cache_free(c);
1da177e4
LT
671}
672
e258beb2 673/* Timer process for the unresolved queue. */
e258beb2 674static void ipmr_expire_process(unsigned long arg)
1da177e4 675{
0c12295a 676 struct mr_table *mrt = (struct mr_table *)arg;
1da177e4
LT
677 unsigned long now;
678 unsigned long expires;
862465f2 679 struct mfc_cache *c, *next;
1da177e4
LT
680
681 if (!spin_trylock(&mfc_unres_lock)) {
0c12295a 682 mod_timer(&mrt->ipmr_expire_timer, jiffies+HZ/10);
1da177e4
LT
683 return;
684 }
685
0c12295a 686 if (list_empty(&mrt->mfc_unres_queue))
1da177e4
LT
687 goto out;
688
689 now = jiffies;
690 expires = 10*HZ;
1da177e4 691
0c12295a 692 list_for_each_entry_safe(c, next, &mrt->mfc_unres_queue, list) {
1da177e4
LT
693 if (time_after(c->mfc_un.unres.expires, now)) {
694 unsigned long interval = c->mfc_un.unres.expires - now;
695 if (interval < expires)
696 expires = interval;
1da177e4
LT
697 continue;
698 }
699
862465f2 700 list_del(&c->list);
8cd3ac9f 701 mroute_netlink_event(mrt, c, RTM_DELROUTE);
0c12295a 702 ipmr_destroy_unres(mrt, c);
1da177e4
LT
703 }
704
0c12295a
PM
705 if (!list_empty(&mrt->mfc_unres_queue))
706 mod_timer(&mrt->ipmr_expire_timer, jiffies + expires);
1da177e4
LT
707
708out:
709 spin_unlock(&mfc_unres_lock);
710}
711
712/* Fill oifs list. It is called under write locked mrt_lock. */
0c12295a 713static void ipmr_update_thresholds(struct mr_table *mrt, struct mfc_cache *cache,
d658f8a0 714 unsigned char *ttls)
1da177e4
LT
715{
716 int vifi;
717
718 cache->mfc_un.res.minvif = MAXVIFS;
719 cache->mfc_un.res.maxvif = 0;
720 memset(cache->mfc_un.res.ttls, 255, MAXVIFS);
721
0c12295a
PM
722 for (vifi = 0; vifi < mrt->maxvif; vifi++) {
723 if (VIF_EXISTS(mrt, vifi) &&
cf958ae3 724 ttls[vifi] && ttls[vifi] < 255) {
1da177e4
LT
725 cache->mfc_un.res.ttls[vifi] = ttls[vifi];
726 if (cache->mfc_un.res.minvif > vifi)
727 cache->mfc_un.res.minvif = vifi;
728 if (cache->mfc_un.res.maxvif <= vifi)
729 cache->mfc_un.res.maxvif = vifi + 1;
730 }
731 }
732}
733
0c12295a
PM
734static int vif_add(struct net *net, struct mr_table *mrt,
735 struct vifctl *vifc, int mrtsock)
1da177e4
LT
736{
737 int vifi = vifc->vifc_vifi;
0c12295a 738 struct vif_device *v = &mrt->vif_table[vifi];
1da177e4
LT
739 struct net_device *dev;
740 struct in_device *in_dev;
d607032d 741 int err;
1da177e4
LT
742
743 /* Is vif busy ? */
0c12295a 744 if (VIF_EXISTS(mrt, vifi))
1da177e4
LT
745 return -EADDRINUSE;
746
747 switch (vifc->vifc_flags) {
1da177e4 748 case VIFF_REGISTER:
1973a4ea 749 if (!ipmr_pimsm_enabled())
c316c629
NA
750 return -EINVAL;
751 /* Special Purpose VIF in PIM
1da177e4
LT
752 * All the packets will be sent to the daemon
753 */
0c12295a 754 if (mrt->mroute_reg_vif_num >= 0)
1da177e4 755 return -EADDRINUSE;
f0ad0860 756 dev = ipmr_reg_vif(net, mrt);
1da177e4
LT
757 if (!dev)
758 return -ENOBUFS;
d607032d
WC
759 err = dev_set_allmulti(dev, 1);
760 if (err) {
761 unregister_netdevice(dev);
7dc00c82 762 dev_put(dev);
d607032d
WC
763 return err;
764 }
1da177e4 765 break;
e905a9ed 766 case VIFF_TUNNEL:
4feb88e5 767 dev = ipmr_new_tunnel(net, vifc);
1da177e4
LT
768 if (!dev)
769 return -ENOBUFS;
d607032d
WC
770 err = dev_set_allmulti(dev, 1);
771 if (err) {
772 ipmr_del_tunnel(dev, vifc);
7dc00c82 773 dev_put(dev);
d607032d
WC
774 return err;
775 }
1da177e4 776 break;
ee5e81f0 777 case VIFF_USE_IFINDEX:
1da177e4 778 case 0:
ee5e81f0
I
779 if (vifc->vifc_flags == VIFF_USE_IFINDEX) {
780 dev = dev_get_by_index(net, vifc->vifc_lcl_ifindex);
51456b29 781 if (dev && !__in_dev_get_rtnl(dev)) {
ee5e81f0
I
782 dev_put(dev);
783 return -EADDRNOTAVAIL;
784 }
a8cb16dd 785 } else {
ee5e81f0 786 dev = ip_dev_find(net, vifc->vifc_lcl_addr.s_addr);
a8cb16dd 787 }
1da177e4
LT
788 if (!dev)
789 return -EADDRNOTAVAIL;
d607032d 790 err = dev_set_allmulti(dev, 1);
7dc00c82
WC
791 if (err) {
792 dev_put(dev);
d607032d 793 return err;
7dc00c82 794 }
1da177e4
LT
795 break;
796 default:
797 return -EINVAL;
798 }
799
a8cb16dd
ED
800 in_dev = __in_dev_get_rtnl(dev);
801 if (!in_dev) {
d0490cfd 802 dev_put(dev);
1da177e4 803 return -EADDRNOTAVAIL;
d0490cfd 804 }
42f811b8 805 IPV4_DEVCONF(in_dev->cnf, MC_FORWARDING)++;
d67b8c61
ND
806 inet_netconf_notify_devconf(net, NETCONFA_MC_FORWARDING, dev->ifindex,
807 &in_dev->cnf);
1da177e4
LT
808 ip_rt_multicast_event(in_dev);
809
a8cb16dd
ED
810 /* Fill in the VIF structures */
811
c354e124
JK
812 v->rate_limit = vifc->vifc_rate_limit;
813 v->local = vifc->vifc_lcl_addr.s_addr;
814 v->remote = vifc->vifc_rmt_addr.s_addr;
815 v->flags = vifc->vifc_flags;
1da177e4
LT
816 if (!mrtsock)
817 v->flags |= VIFF_STATIC;
c354e124 818 v->threshold = vifc->vifc_threshold;
1da177e4
LT
819 v->bytes_in = 0;
820 v->bytes_out = 0;
821 v->pkt_in = 0;
822 v->pkt_out = 0;
823 v->link = dev->ifindex;
a8cb16dd 824 if (v->flags & (VIFF_TUNNEL | VIFF_REGISTER))
a54acb3a 825 v->link = dev_get_iflink(dev);
1da177e4
LT
826
827 /* And finish update writing critical data */
828 write_lock_bh(&mrt_lock);
c354e124 829 v->dev = dev;
a8cb16dd 830 if (v->flags & VIFF_REGISTER)
0c12295a 831 mrt->mroute_reg_vif_num = vifi;
0c12295a
PM
832 if (vifi+1 > mrt->maxvif)
833 mrt->maxvif = vifi+1;
1da177e4
LT
834 write_unlock_bh(&mrt_lock);
835 return 0;
836}
837
a8c9486b 838/* called with rcu_read_lock() */
0c12295a 839static struct mfc_cache *ipmr_cache_find(struct mr_table *mrt,
4feb88e5
BT
840 __be32 origin,
841 __be32 mcastgrp)
1da177e4 842{
c354e124 843 int line = MFC_HASH(mcastgrp, origin);
1da177e4
LT
844 struct mfc_cache *c;
845
a8c9486b 846 list_for_each_entry_rcu(c, &mrt->mfc_cache_array[line], list) {
862465f2
PM
847 if (c->mfc_origin == origin && c->mfc_mcastgrp == mcastgrp)
848 return c;
1da177e4 849 }
862465f2 850 return NULL;
1da177e4
LT
851}
852
660b26dc
ND
853/* Look for a (*,*,oif) entry */
854static struct mfc_cache *ipmr_cache_find_any_parent(struct mr_table *mrt,
855 int vifi)
856{
360eb5da 857 int line = MFC_HASH(htonl(INADDR_ANY), htonl(INADDR_ANY));
660b26dc
ND
858 struct mfc_cache *c;
859
860 list_for_each_entry_rcu(c, &mrt->mfc_cache_array[line], list)
360eb5da
ND
861 if (c->mfc_origin == htonl(INADDR_ANY) &&
862 c->mfc_mcastgrp == htonl(INADDR_ANY) &&
660b26dc
ND
863 c->mfc_un.res.ttls[vifi] < 255)
864 return c;
865
866 return NULL;
867}
868
869/* Look for a (*,G) entry */
870static struct mfc_cache *ipmr_cache_find_any(struct mr_table *mrt,
871 __be32 mcastgrp, int vifi)
872{
360eb5da 873 int line = MFC_HASH(mcastgrp, htonl(INADDR_ANY));
660b26dc
ND
874 struct mfc_cache *c, *proxy;
875
360eb5da 876 if (mcastgrp == htonl(INADDR_ANY))
660b26dc
ND
877 goto skip;
878
879 list_for_each_entry_rcu(c, &mrt->mfc_cache_array[line], list)
360eb5da 880 if (c->mfc_origin == htonl(INADDR_ANY) &&
660b26dc
ND
881 c->mfc_mcastgrp == mcastgrp) {
882 if (c->mfc_un.res.ttls[vifi] < 255)
883 return c;
884
885 /* It's ok if the vifi is part of the static tree */
886 proxy = ipmr_cache_find_any_parent(mrt,
887 c->mfc_parent);
888 if (proxy && proxy->mfc_un.res.ttls[vifi] < 255)
889 return c;
890 }
891
892skip:
893 return ipmr_cache_find_any_parent(mrt, vifi);
894}
895
7ef8f65d 896/* Allocate a multicast cache entry */
d658f8a0 897static struct mfc_cache *ipmr_cache_alloc(void)
1da177e4 898{
c354e124 899 struct mfc_cache *c = kmem_cache_zalloc(mrt_cachep, GFP_KERNEL);
a8c9486b
ED
900
901 if (c)
902 c->mfc_un.res.minvif = MAXVIFS;
1da177e4
LT
903 return c;
904}
905
d658f8a0 906static struct mfc_cache *ipmr_cache_alloc_unres(void)
1da177e4 907{
c354e124 908 struct mfc_cache *c = kmem_cache_zalloc(mrt_cachep, GFP_ATOMIC);
a8c9486b
ED
909
910 if (c) {
911 skb_queue_head_init(&c->mfc_un.unres.unresolved);
912 c->mfc_un.unres.expires = jiffies + 10*HZ;
913 }
1da177e4
LT
914 return c;
915}
916
7ef8f65d 917/* A cache entry has gone into a resolved state from queued */
0c12295a
PM
918static void ipmr_cache_resolve(struct net *net, struct mr_table *mrt,
919 struct mfc_cache *uc, struct mfc_cache *c)
1da177e4
LT
920{
921 struct sk_buff *skb;
9ef1d4c7 922 struct nlmsgerr *e;
1da177e4 923
a8cb16dd 924 /* Play the pending entries through our router */
c354e124 925 while ((skb = __skb_dequeue(&uc->mfc_un.unres.unresolved))) {
eddc9ec5 926 if (ip_hdr(skb)->version == 0) {
1da177e4
LT
927 struct nlmsghdr *nlh = (struct nlmsghdr *)skb_pull(skb, sizeof(struct iphdr));
928
573ce260 929 if (__ipmr_fill_mroute(mrt, skb, c, nlmsg_data(nlh)) > 0) {
a8cb16dd
ED
930 nlh->nlmsg_len = skb_tail_pointer(skb) -
931 (u8 *)nlh;
1da177e4
LT
932 } else {
933 nlh->nlmsg_type = NLMSG_ERROR;
573ce260 934 nlh->nlmsg_len = nlmsg_msg_size(sizeof(struct nlmsgerr));
1da177e4 935 skb_trim(skb, nlh->nlmsg_len);
573ce260 936 e = nlmsg_data(nlh);
9ef1d4c7
PM
937 e->error = -EMSGSIZE;
938 memset(&e->msg, 0, sizeof(e->msg));
1da177e4 939 }
2942e900 940
15e47304 941 rtnl_unicast(skb, net, NETLINK_CB(skb).portid);
a8cb16dd 942 } else {
0c12295a 943 ip_mr_forward(net, mrt, skb, c, 0);
a8cb16dd 944 }
1da177e4
LT
945 }
946}
947
c316c629
NA
948/* Bounce a cache query up to mrouted. We could use netlink for this but mrouted
949 * expects the following bizarre scheme.
1da177e4 950 *
c316c629 951 * Called under mrt_lock.
1da177e4 952 */
0c12295a 953static int ipmr_cache_report(struct mr_table *mrt,
4feb88e5 954 struct sk_buff *pkt, vifi_t vifi, int assert)
1da177e4 955{
c9bdd4b5 956 const int ihl = ip_hdrlen(pkt);
c316c629 957 struct sock *mroute_sk;
1da177e4
LT
958 struct igmphdr *igmp;
959 struct igmpmsg *msg;
c316c629 960 struct sk_buff *skb;
1da177e4
LT
961 int ret;
962
1da177e4
LT
963 if (assert == IGMPMSG_WHOLEPKT)
964 skb = skb_realloc_headroom(pkt, sizeof(struct iphdr));
965 else
1da177e4
LT
966 skb = alloc_skb(128, GFP_ATOMIC);
967
132adf54 968 if (!skb)
1da177e4
LT
969 return -ENOBUFS;
970
1da177e4
LT
971 if (assert == IGMPMSG_WHOLEPKT) {
972 /* Ugly, but we have no choice with this interface.
a8cb16dd
ED
973 * Duplicate old header, fix ihl, length etc.
974 * And all this only to mangle msg->im_msgtype and
975 * to set msg->im_mbz to "mbz" :-)
1da177e4 976 */
878c8145
ACM
977 skb_push(skb, sizeof(struct iphdr));
978 skb_reset_network_header(skb);
badff6d0 979 skb_reset_transport_header(skb);
0272ffc4 980 msg = (struct igmpmsg *)skb_network_header(skb);
d56f90a7 981 memcpy(msg, skb_network_header(pkt), sizeof(struct iphdr));
1da177e4
LT
982 msg->im_msgtype = IGMPMSG_WHOLEPKT;
983 msg->im_mbz = 0;
0c12295a 984 msg->im_vif = mrt->mroute_reg_vif_num;
eddc9ec5
ACM
985 ip_hdr(skb)->ihl = sizeof(struct iphdr) >> 2;
986 ip_hdr(skb)->tot_len = htons(ntohs(ip_hdr(pkt)->tot_len) +
987 sizeof(struct iphdr));
c316c629
NA
988 } else {
989 /* Copy the IP header */
990 skb_set_network_header(skb, skb->len);
991 skb_put(skb, ihl);
992 skb_copy_to_linear_data(skb, pkt->data, ihl);
993 /* Flag to the kernel this is a route add */
994 ip_hdr(skb)->protocol = 0;
995 msg = (struct igmpmsg *)skb_network_header(skb);
996 msg->im_vif = vifi;
997 skb_dst_set(skb, dst_clone(skb_dst(pkt)));
998 /* Add our header */
999 igmp = (struct igmphdr *)skb_put(skb, sizeof(struct igmphdr));
1000 igmp->type = assert;
1001 msg->im_msgtype = assert;
1002 igmp->code = 0;
1003 ip_hdr(skb)->tot_len = htons(skb->len); /* Fix the length */
1004 skb->transport_header = skb->network_header;
e905a9ed 1005 }
1da177e4 1006
4c968709
ED
1007 rcu_read_lock();
1008 mroute_sk = rcu_dereference(mrt->mroute_sk);
51456b29 1009 if (!mroute_sk) {
4c968709 1010 rcu_read_unlock();
1da177e4
LT
1011 kfree_skb(skb);
1012 return -EINVAL;
1013 }
1014
a8cb16dd 1015 /* Deliver to mrouted */
4c968709
ED
1016 ret = sock_queue_rcv_skb(mroute_sk, skb);
1017 rcu_read_unlock();
70a269e6 1018 if (ret < 0) {
e87cc472 1019 net_warn_ratelimited("mroute: pending queue full, dropping entries\n");
1da177e4
LT
1020 kfree_skb(skb);
1021 }
1022
1023 return ret;
1024}
1025
7ef8f65d
NA
1026/* Queue a packet for resolution. It gets locked cache entry! */
1027static int ipmr_cache_unresolved(struct mr_table *mrt, vifi_t vifi,
1028 struct sk_buff *skb)
1da177e4 1029{
862465f2 1030 bool found = false;
1da177e4
LT
1031 int err;
1032 struct mfc_cache *c;
eddc9ec5 1033 const struct iphdr *iph = ip_hdr(skb);
1da177e4
LT
1034
1035 spin_lock_bh(&mfc_unres_lock);
0c12295a 1036 list_for_each_entry(c, &mrt->mfc_unres_queue, list) {
e258beb2 1037 if (c->mfc_mcastgrp == iph->daddr &&
862465f2
PM
1038 c->mfc_origin == iph->saddr) {
1039 found = true;
1da177e4 1040 break;
862465f2 1041 }
1da177e4
LT
1042 }
1043
862465f2 1044 if (!found) {
a8cb16dd 1045 /* Create a new entry if allowable */
0c12295a 1046 if (atomic_read(&mrt->cache_resolve_queue_len) >= 10 ||
d658f8a0 1047 (c = ipmr_cache_alloc_unres()) == NULL) {
1da177e4
LT
1048 spin_unlock_bh(&mfc_unres_lock);
1049
1050 kfree_skb(skb);
1051 return -ENOBUFS;
1052 }
1053
a8cb16dd 1054 /* Fill in the new cache entry */
eddc9ec5
ACM
1055 c->mfc_parent = -1;
1056 c->mfc_origin = iph->saddr;
1057 c->mfc_mcastgrp = iph->daddr;
1da177e4 1058
a8cb16dd 1059 /* Reflect first query at mrouted. */
0c12295a 1060 err = ipmr_cache_report(mrt, skb, vifi, IGMPMSG_NOCACHE);
4feb88e5 1061 if (err < 0) {
e905a9ed 1062 /* If the report failed throw the cache entry
1da177e4
LT
1063 out - Brad Parker
1064 */
1065 spin_unlock_bh(&mfc_unres_lock);
1066
5c0a66f5 1067 ipmr_cache_free(c);
1da177e4
LT
1068 kfree_skb(skb);
1069 return err;
1070 }
1071
0c12295a
PM
1072 atomic_inc(&mrt->cache_resolve_queue_len);
1073 list_add(&c->list, &mrt->mfc_unres_queue);
8cd3ac9f 1074 mroute_netlink_event(mrt, c, RTM_NEWROUTE);
1da177e4 1075
278554bd
DM
1076 if (atomic_read(&mrt->cache_resolve_queue_len) == 1)
1077 mod_timer(&mrt->ipmr_expire_timer, c->mfc_un.unres.expires);
1da177e4
LT
1078 }
1079
a8cb16dd 1080 /* See if we can append the packet */
a8cb16dd 1081 if (c->mfc_un.unres.unresolved.qlen > 3) {
1da177e4
LT
1082 kfree_skb(skb);
1083 err = -ENOBUFS;
1084 } else {
c354e124 1085 skb_queue_tail(&c->mfc_un.unres.unresolved, skb);
1da177e4
LT
1086 err = 0;
1087 }
1088
1089 spin_unlock_bh(&mfc_unres_lock);
1090 return err;
1091}
1092
7ef8f65d 1093/* MFC cache manipulation by user space mroute daemon */
1da177e4 1094
660b26dc 1095static int ipmr_mfc_delete(struct mr_table *mrt, struct mfcctl *mfc, int parent)
1da177e4
LT
1096{
1097 int line;
862465f2 1098 struct mfc_cache *c, *next;
1da177e4 1099
c354e124 1100 line = MFC_HASH(mfc->mfcc_mcastgrp.s_addr, mfc->mfcc_origin.s_addr);
1da177e4 1101
0c12295a 1102 list_for_each_entry_safe(c, next, &mrt->mfc_cache_array[line], list) {
1da177e4 1103 if (c->mfc_origin == mfc->mfcc_origin.s_addr &&
660b26dc
ND
1104 c->mfc_mcastgrp == mfc->mfcc_mcastgrp.s_addr &&
1105 (parent == -1 || parent == c->mfc_parent)) {
a8c9486b 1106 list_del_rcu(&c->list);
8cd3ac9f 1107 mroute_netlink_event(mrt, c, RTM_DELROUTE);
5c0a66f5 1108 ipmr_cache_free(c);
1da177e4
LT
1109 return 0;
1110 }
1111 }
1112 return -ENOENT;
1113}
1114
0c12295a 1115static int ipmr_mfc_add(struct net *net, struct mr_table *mrt,
660b26dc 1116 struct mfcctl *mfc, int mrtsock, int parent)
1da177e4 1117{
862465f2 1118 bool found = false;
1da177e4 1119 int line;
862465f2 1120 struct mfc_cache *uc, *c;
1da177e4 1121
a50436f2
PM
1122 if (mfc->mfcc_parent >= MAXVIFS)
1123 return -ENFILE;
1124
c354e124 1125 line = MFC_HASH(mfc->mfcc_mcastgrp.s_addr, mfc->mfcc_origin.s_addr);
1da177e4 1126
0c12295a 1127 list_for_each_entry(c, &mrt->mfc_cache_array[line], list) {
1da177e4 1128 if (c->mfc_origin == mfc->mfcc_origin.s_addr &&
660b26dc
ND
1129 c->mfc_mcastgrp == mfc->mfcc_mcastgrp.s_addr &&
1130 (parent == -1 || parent == c->mfc_parent)) {
862465f2 1131 found = true;
1da177e4 1132 break;
862465f2 1133 }
1da177e4
LT
1134 }
1135
862465f2 1136 if (found) {
1da177e4
LT
1137 write_lock_bh(&mrt_lock);
1138 c->mfc_parent = mfc->mfcc_parent;
0c12295a 1139 ipmr_update_thresholds(mrt, c, mfc->mfcc_ttls);
1da177e4
LT
1140 if (!mrtsock)
1141 c->mfc_flags |= MFC_STATIC;
1142 write_unlock_bh(&mrt_lock);
8cd3ac9f 1143 mroute_netlink_event(mrt, c, RTM_NEWROUTE);
1da177e4
LT
1144 return 0;
1145 }
1146
360eb5da 1147 if (mfc->mfcc_mcastgrp.s_addr != htonl(INADDR_ANY) &&
660b26dc 1148 !ipv4_is_multicast(mfc->mfcc_mcastgrp.s_addr))
1da177e4
LT
1149 return -EINVAL;
1150
d658f8a0 1151 c = ipmr_cache_alloc();
51456b29 1152 if (!c)
1da177e4
LT
1153 return -ENOMEM;
1154
c354e124
JK
1155 c->mfc_origin = mfc->mfcc_origin.s_addr;
1156 c->mfc_mcastgrp = mfc->mfcc_mcastgrp.s_addr;
1157 c->mfc_parent = mfc->mfcc_parent;
0c12295a 1158 ipmr_update_thresholds(mrt, c, mfc->mfcc_ttls);
1da177e4
LT
1159 if (!mrtsock)
1160 c->mfc_flags |= MFC_STATIC;
1161
a8c9486b 1162 list_add_rcu(&c->list, &mrt->mfc_cache_array[line]);
1da177e4 1163
7ef8f65d
NA
1164 /* Check to see if we resolved a queued list. If so we
1165 * need to send on the frames and tidy up.
1da177e4 1166 */
b0ebb739 1167 found = false;
1da177e4 1168 spin_lock_bh(&mfc_unres_lock);
0c12295a 1169 list_for_each_entry(uc, &mrt->mfc_unres_queue, list) {
e258beb2 1170 if (uc->mfc_origin == c->mfc_origin &&
1da177e4 1171 uc->mfc_mcastgrp == c->mfc_mcastgrp) {
862465f2 1172 list_del(&uc->list);
0c12295a 1173 atomic_dec(&mrt->cache_resolve_queue_len);
b0ebb739 1174 found = true;
1da177e4
LT
1175 break;
1176 }
1177 }
0c12295a
PM
1178 if (list_empty(&mrt->mfc_unres_queue))
1179 del_timer(&mrt->ipmr_expire_timer);
1da177e4
LT
1180 spin_unlock_bh(&mfc_unres_lock);
1181
b0ebb739 1182 if (found) {
0c12295a 1183 ipmr_cache_resolve(net, mrt, uc, c);
5c0a66f5 1184 ipmr_cache_free(uc);
1da177e4 1185 }
8cd3ac9f 1186 mroute_netlink_event(mrt, c, RTM_NEWROUTE);
1da177e4
LT
1187 return 0;
1188}
1189
7ef8f65d 1190/* Close the multicast socket, and clear the vif tables etc */
0c12295a 1191static void mroute_clean_tables(struct mr_table *mrt)
1da177e4
LT
1192{
1193 int i;
d17fa6fa 1194 LIST_HEAD(list);
862465f2 1195 struct mfc_cache *c, *next;
e905a9ed 1196
a8cb16dd 1197 /* Shut down all active vif entries */
0c12295a 1198 for (i = 0; i < mrt->maxvif; i++) {
a8cb16dd 1199 if (!(mrt->vif_table[i].flags & VIFF_STATIC))
0c12295a 1200 vif_delete(mrt, i, 0, &list);
1da177e4 1201 }
d17fa6fa 1202 unregister_netdevice_many(&list);
1da177e4 1203
a8cb16dd 1204 /* Wipe the cache */
862465f2 1205 for (i = 0; i < MFC_LINES; i++) {
0c12295a 1206 list_for_each_entry_safe(c, next, &mrt->mfc_cache_array[i], list) {
a8c9486b 1207 if (c->mfc_flags & MFC_STATIC)
1da177e4 1208 continue;
a8c9486b 1209 list_del_rcu(&c->list);
8cd3ac9f 1210 mroute_netlink_event(mrt, c, RTM_DELROUTE);
5c0a66f5 1211 ipmr_cache_free(c);
1da177e4
LT
1212 }
1213 }
1214
0c12295a 1215 if (atomic_read(&mrt->cache_resolve_queue_len) != 0) {
1da177e4 1216 spin_lock_bh(&mfc_unres_lock);
0c12295a 1217 list_for_each_entry_safe(c, next, &mrt->mfc_unres_queue, list) {
862465f2 1218 list_del(&c->list);
8cd3ac9f 1219 mroute_netlink_event(mrt, c, RTM_DELROUTE);
0c12295a 1220 ipmr_destroy_unres(mrt, c);
1da177e4
LT
1221 }
1222 spin_unlock_bh(&mfc_unres_lock);
1223 }
1224}
1225
4c968709
ED
1226/* called from ip_ra_control(), before an RCU grace period,
1227 * we dont need to call synchronize_rcu() here
1228 */
1da177e4
LT
1229static void mrtsock_destruct(struct sock *sk)
1230{
4feb88e5 1231 struct net *net = sock_net(sk);
f0ad0860 1232 struct mr_table *mrt;
4feb88e5 1233
1da177e4 1234 rtnl_lock();
f0ad0860 1235 ipmr_for_each_table(mrt, net) {
4c968709 1236 if (sk == rtnl_dereference(mrt->mroute_sk)) {
f0ad0860 1237 IPV4_DEVCONF_ALL(net, MC_FORWARDING)--;
d67b8c61
ND
1238 inet_netconf_notify_devconf(net, NETCONFA_MC_FORWARDING,
1239 NETCONFA_IFINDEX_ALL,
1240 net->ipv4.devconf_all);
a9b3cd7f 1241 RCU_INIT_POINTER(mrt->mroute_sk, NULL);
f0ad0860
PM
1242 mroute_clean_tables(mrt);
1243 }
1da177e4
LT
1244 }
1245 rtnl_unlock();
1246}
1247
7ef8f65d
NA
1248/* Socket options and virtual interface manipulation. The whole
1249 * virtual interface system is a complete heap, but unfortunately
1250 * that's how BSD mrouted happens to think. Maybe one day with a proper
1251 * MOSPF/PIM router set up we can clean this up.
1da177e4 1252 */
e905a9ed 1253
29e97d21
NA
1254int ip_mroute_setsockopt(struct sock *sk, int optname, char __user *optval,
1255 unsigned int optlen)
1da177e4 1256{
4feb88e5 1257 struct net *net = sock_net(sk);
29e97d21 1258 int val, ret = 0, parent = 0;
f0ad0860 1259 struct mr_table *mrt;
29e97d21
NA
1260 struct vifctl vif;
1261 struct mfcctl mfc;
1262 u32 uval;
f0ad0860 1263
29e97d21
NA
1264 /* There's one exception to the lock - MRT_DONE which needs to unlock */
1265 rtnl_lock();
5e1859fb 1266 if (sk->sk_type != SOCK_RAW ||
29e97d21
NA
1267 inet_sk(sk)->inet_num != IPPROTO_IGMP) {
1268 ret = -EOPNOTSUPP;
1269 goto out_unlock;
1270 }
5e1859fb 1271
f0ad0860 1272 mrt = ipmr_get_table(net, raw_sk(sk)->ipmr_table ? : RT_TABLE_DEFAULT);
29e97d21
NA
1273 if (!mrt) {
1274 ret = -ENOENT;
1275 goto out_unlock;
1276 }
132adf54 1277 if (optname != MRT_INIT) {
33d480ce 1278 if (sk != rcu_access_pointer(mrt->mroute_sk) &&
29e97d21
NA
1279 !ns_capable(net->user_ns, CAP_NET_ADMIN)) {
1280 ret = -EACCES;
1281 goto out_unlock;
1282 }
1da177e4
LT
1283 }
1284
132adf54
SH
1285 switch (optname) {
1286 case MRT_INIT:
c354e124 1287 if (optlen != sizeof(int))
29e97d21
NA
1288 ret = -EINVAL;
1289 if (rtnl_dereference(mrt->mroute_sk))
1290 ret = -EADDRINUSE;
1291 if (ret)
1292 break;
132adf54
SH
1293
1294 ret = ip_ra_control(sk, 1, mrtsock_destruct);
1295 if (ret == 0) {
cf778b00 1296 rcu_assign_pointer(mrt->mroute_sk, sk);
4feb88e5 1297 IPV4_DEVCONF_ALL(net, MC_FORWARDING)++;
d67b8c61
ND
1298 inet_netconf_notify_devconf(net, NETCONFA_MC_FORWARDING,
1299 NETCONFA_IFINDEX_ALL,
1300 net->ipv4.devconf_all);
132adf54 1301 }
29e97d21 1302 break;
132adf54 1303 case MRT_DONE:
29e97d21
NA
1304 if (sk != rcu_access_pointer(mrt->mroute_sk)) {
1305 ret = -EACCES;
1306 } else {
1307 /* We need to unlock here because mrtsock_destruct takes
1308 * care of rtnl itself and we can't change that due to
1309 * the IP_ROUTER_ALERT setsockopt which runs without it.
1310 */
1311 rtnl_unlock();
1312 ret = ip_ra_control(sk, 0, NULL);
1313 goto out;
1314 }
1315 break;
132adf54
SH
1316 case MRT_ADD_VIF:
1317 case MRT_DEL_VIF:
29e97d21
NA
1318 if (optlen != sizeof(vif)) {
1319 ret = -EINVAL;
1320 break;
1321 }
1322 if (copy_from_user(&vif, optval, sizeof(vif))) {
1323 ret = -EFAULT;
1324 break;
1325 }
1326 if (vif.vifc_vifi >= MAXVIFS) {
1327 ret = -ENFILE;
1328 break;
1329 }
c354e124 1330 if (optname == MRT_ADD_VIF) {
4c968709
ED
1331 ret = vif_add(net, mrt, &vif,
1332 sk == rtnl_dereference(mrt->mroute_sk));
132adf54 1333 } else {
0c12295a 1334 ret = vif_delete(mrt, vif.vifc_vifi, 0, NULL);
132adf54 1335 }
29e97d21 1336 break;
7ef8f65d
NA
1337 /* Manipulate the forwarding caches. These live
1338 * in a sort of kernel/user symbiosis.
1339 */
132adf54
SH
1340 case MRT_ADD_MFC:
1341 case MRT_DEL_MFC:
660b26dc
ND
1342 parent = -1;
1343 case MRT_ADD_MFC_PROXY:
1344 case MRT_DEL_MFC_PROXY:
29e97d21
NA
1345 if (optlen != sizeof(mfc)) {
1346 ret = -EINVAL;
1347 break;
1348 }
1349 if (copy_from_user(&mfc, optval, sizeof(mfc))) {
1350 ret = -EFAULT;
1351 break;
1352 }
660b26dc
ND
1353 if (parent == 0)
1354 parent = mfc.mfcc_parent;
660b26dc
ND
1355 if (optname == MRT_DEL_MFC || optname == MRT_DEL_MFC_PROXY)
1356 ret = ipmr_mfc_delete(mrt, &mfc, parent);
132adf54 1357 else
4c968709 1358 ret = ipmr_mfc_add(net, mrt, &mfc,
660b26dc
ND
1359 sk == rtnl_dereference(mrt->mroute_sk),
1360 parent);
29e97d21 1361 break;
7ef8f65d 1362 /* Control PIM assert. */
132adf54 1363 case MRT_ASSERT:
29e97d21
NA
1364 if (optlen != sizeof(val)) {
1365 ret = -EINVAL;
1366 break;
1367 }
1368 if (get_user(val, (int __user *)optval)) {
1369 ret = -EFAULT;
1370 break;
1371 }
1372 mrt->mroute_do_assert = val;
1373 break;
132adf54 1374 case MRT_PIM:
1973a4ea 1375 if (!ipmr_pimsm_enabled()) {
29e97d21
NA
1376 ret = -ENOPROTOOPT;
1377 break;
1378 }
1379 if (optlen != sizeof(val)) {
1380 ret = -EINVAL;
1381 break;
1382 }
1383 if (get_user(val, (int __user *)optval)) {
1384 ret = -EFAULT;
1385 break;
1386 }
ba93ef74 1387
29e97d21
NA
1388 val = !!val;
1389 if (val != mrt->mroute_do_pim) {
1390 mrt->mroute_do_pim = val;
1391 mrt->mroute_do_assert = val;
1da177e4 1392 }
29e97d21 1393 break;
f0ad0860 1394 case MRT_TABLE:
29e97d21
NA
1395 if (!IS_BUILTIN(CONFIG_IP_MROUTE_MULTIPLE_TABLES)) {
1396 ret = -ENOPROTOOPT;
1397 break;
1398 }
1399 if (optlen != sizeof(uval)) {
1400 ret = -EINVAL;
1401 break;
1402 }
1403 if (get_user(uval, (u32 __user *)optval)) {
1404 ret = -EFAULT;
1405 break;
1406 }
f0ad0860 1407
4c968709
ED
1408 if (sk == rtnl_dereference(mrt->mroute_sk)) {
1409 ret = -EBUSY;
1410 } else {
29e97d21 1411 mrt = ipmr_new_table(net, uval);
1113ebbc
NA
1412 if (IS_ERR(mrt))
1413 ret = PTR_ERR(mrt);
5e1859fb 1414 else
29e97d21 1415 raw_sk(sk)->ipmr_table = uval;
4c968709 1416 }
29e97d21 1417 break;
7ef8f65d 1418 /* Spurious command, or MRT_VERSION which you cannot set. */
132adf54 1419 default:
29e97d21 1420 ret = -ENOPROTOOPT;
1da177e4 1421 }
29e97d21
NA
1422out_unlock:
1423 rtnl_unlock();
1424out:
1425 return ret;
1da177e4
LT
1426}
1427
7ef8f65d 1428/* Getsock opt support for the multicast routing system. */
c354e124 1429int ip_mroute_getsockopt(struct sock *sk, int optname, char __user *optval, int __user *optlen)
1da177e4
LT
1430{
1431 int olr;
1432 int val;
4feb88e5 1433 struct net *net = sock_net(sk);
f0ad0860
PM
1434 struct mr_table *mrt;
1435
5e1859fb
ED
1436 if (sk->sk_type != SOCK_RAW ||
1437 inet_sk(sk)->inet_num != IPPROTO_IGMP)
1438 return -EOPNOTSUPP;
1439
f0ad0860 1440 mrt = ipmr_get_table(net, raw_sk(sk)->ipmr_table ? : RT_TABLE_DEFAULT);
51456b29 1441 if (!mrt)
f0ad0860 1442 return -ENOENT;
1da177e4 1443
fe9ef3ce
NA
1444 switch (optname) {
1445 case MRT_VERSION:
1446 val = 0x0305;
1447 break;
1448 case MRT_PIM:
1973a4ea 1449 if (!ipmr_pimsm_enabled())
fe9ef3ce
NA
1450 return -ENOPROTOOPT;
1451 val = mrt->mroute_do_pim;
1452 break;
1453 case MRT_ASSERT:
1454 val = mrt->mroute_do_assert;
1455 break;
1456 default:
1da177e4 1457 return -ENOPROTOOPT;
fe9ef3ce 1458 }
1da177e4
LT
1459
1460 if (get_user(olr, optlen))
1461 return -EFAULT;
1da177e4
LT
1462 olr = min_t(unsigned int, olr, sizeof(int));
1463 if (olr < 0)
1464 return -EINVAL;
c354e124 1465 if (put_user(olr, optlen))
1da177e4 1466 return -EFAULT;
c354e124 1467 if (copy_to_user(optval, &val, olr))
1da177e4
LT
1468 return -EFAULT;
1469 return 0;
1470}
1471
7ef8f65d 1472/* The IP multicast ioctl support routines. */
1da177e4
LT
1473int ipmr_ioctl(struct sock *sk, int cmd, void __user *arg)
1474{
1475 struct sioc_sg_req sr;
1476 struct sioc_vif_req vr;
1477 struct vif_device *vif;
1478 struct mfc_cache *c;
4feb88e5 1479 struct net *net = sock_net(sk);
f0ad0860
PM
1480 struct mr_table *mrt;
1481
1482 mrt = ipmr_get_table(net, raw_sk(sk)->ipmr_table ? : RT_TABLE_DEFAULT);
51456b29 1483 if (!mrt)
f0ad0860 1484 return -ENOENT;
e905a9ed 1485
132adf54
SH
1486 switch (cmd) {
1487 case SIOCGETVIFCNT:
c354e124 1488 if (copy_from_user(&vr, arg, sizeof(vr)))
132adf54 1489 return -EFAULT;
0c12295a 1490 if (vr.vifi >= mrt->maxvif)
132adf54
SH
1491 return -EINVAL;
1492 read_lock(&mrt_lock);
0c12295a
PM
1493 vif = &mrt->vif_table[vr.vifi];
1494 if (VIF_EXISTS(mrt, vr.vifi)) {
c354e124
JK
1495 vr.icount = vif->pkt_in;
1496 vr.ocount = vif->pkt_out;
1497 vr.ibytes = vif->bytes_in;
1498 vr.obytes = vif->bytes_out;
1da177e4 1499 read_unlock(&mrt_lock);
1da177e4 1500
c354e124 1501 if (copy_to_user(arg, &vr, sizeof(vr)))
132adf54
SH
1502 return -EFAULT;
1503 return 0;
1504 }
1505 read_unlock(&mrt_lock);
1506 return -EADDRNOTAVAIL;
1507 case SIOCGETSGCNT:
c354e124 1508 if (copy_from_user(&sr, arg, sizeof(sr)))
132adf54
SH
1509 return -EFAULT;
1510
a8c9486b 1511 rcu_read_lock();
0c12295a 1512 c = ipmr_cache_find(mrt, sr.src.s_addr, sr.grp.s_addr);
132adf54
SH
1513 if (c) {
1514 sr.pktcnt = c->mfc_un.res.pkt;
1515 sr.bytecnt = c->mfc_un.res.bytes;
1516 sr.wrong_if = c->mfc_un.res.wrong_if;
a8c9486b 1517 rcu_read_unlock();
132adf54 1518
c354e124 1519 if (copy_to_user(arg, &sr, sizeof(sr)))
132adf54
SH
1520 return -EFAULT;
1521 return 0;
1522 }
a8c9486b 1523 rcu_read_unlock();
132adf54
SH
1524 return -EADDRNOTAVAIL;
1525 default:
1526 return -ENOIOCTLCMD;
1da177e4
LT
1527 }
1528}
1529
709b46e8
EB
1530#ifdef CONFIG_COMPAT
1531struct compat_sioc_sg_req {
1532 struct in_addr src;
1533 struct in_addr grp;
1534 compat_ulong_t pktcnt;
1535 compat_ulong_t bytecnt;
1536 compat_ulong_t wrong_if;
1537};
1538
ca6b8bb0
DM
1539struct compat_sioc_vif_req {
1540 vifi_t vifi; /* Which iface */
1541 compat_ulong_t icount;
1542 compat_ulong_t ocount;
1543 compat_ulong_t ibytes;
1544 compat_ulong_t obytes;
1545};
1546
709b46e8
EB
1547int ipmr_compat_ioctl(struct sock *sk, unsigned int cmd, void __user *arg)
1548{
0033d5ad 1549 struct compat_sioc_sg_req sr;
ca6b8bb0
DM
1550 struct compat_sioc_vif_req vr;
1551 struct vif_device *vif;
709b46e8
EB
1552 struct mfc_cache *c;
1553 struct net *net = sock_net(sk);
1554 struct mr_table *mrt;
1555
1556 mrt = ipmr_get_table(net, raw_sk(sk)->ipmr_table ? : RT_TABLE_DEFAULT);
51456b29 1557 if (!mrt)
709b46e8
EB
1558 return -ENOENT;
1559
1560 switch (cmd) {
ca6b8bb0
DM
1561 case SIOCGETVIFCNT:
1562 if (copy_from_user(&vr, arg, sizeof(vr)))
1563 return -EFAULT;
1564 if (vr.vifi >= mrt->maxvif)
1565 return -EINVAL;
1566 read_lock(&mrt_lock);
1567 vif = &mrt->vif_table[vr.vifi];
1568 if (VIF_EXISTS(mrt, vr.vifi)) {
1569 vr.icount = vif->pkt_in;
1570 vr.ocount = vif->pkt_out;
1571 vr.ibytes = vif->bytes_in;
1572 vr.obytes = vif->bytes_out;
1573 read_unlock(&mrt_lock);
1574
1575 if (copy_to_user(arg, &vr, sizeof(vr)))
1576 return -EFAULT;
1577 return 0;
1578 }
1579 read_unlock(&mrt_lock);
1580 return -EADDRNOTAVAIL;
709b46e8
EB
1581 case SIOCGETSGCNT:
1582 if (copy_from_user(&sr, arg, sizeof(sr)))
1583 return -EFAULT;
1584
1585 rcu_read_lock();
1586 c = ipmr_cache_find(mrt, sr.src.s_addr, sr.grp.s_addr);
1587 if (c) {
1588 sr.pktcnt = c->mfc_un.res.pkt;
1589 sr.bytecnt = c->mfc_un.res.bytes;
1590 sr.wrong_if = c->mfc_un.res.wrong_if;
1591 rcu_read_unlock();
1592
1593 if (copy_to_user(arg, &sr, sizeof(sr)))
1594 return -EFAULT;
1595 return 0;
1596 }
1597 rcu_read_unlock();
1598 return -EADDRNOTAVAIL;
1599 default:
1600 return -ENOIOCTLCMD;
1601 }
1602}
1603#endif
1604
1da177e4
LT
1605static int ipmr_device_event(struct notifier_block *this, unsigned long event, void *ptr)
1606{
351638e7 1607 struct net_device *dev = netdev_notifier_info_to_dev(ptr);
4feb88e5 1608 struct net *net = dev_net(dev);
f0ad0860 1609 struct mr_table *mrt;
1da177e4
LT
1610 struct vif_device *v;
1611 int ct;
e9dc8653 1612
1da177e4
LT
1613 if (event != NETDEV_UNREGISTER)
1614 return NOTIFY_DONE;
f0ad0860
PM
1615
1616 ipmr_for_each_table(mrt, net) {
1617 v = &mrt->vif_table[0];
1618 for (ct = 0; ct < mrt->maxvif; ct++, v++) {
1619 if (v->dev == dev)
e92036a6 1620 vif_delete(mrt, ct, 1, NULL);
f0ad0860 1621 }
1da177e4
LT
1622 }
1623 return NOTIFY_DONE;
1624}
1625
c354e124 1626static struct notifier_block ip_mr_notifier = {
1da177e4
LT
1627 .notifier_call = ipmr_device_event,
1628};
1629
7ef8f65d
NA
1630/* Encapsulate a packet by attaching a valid IPIP header to it.
1631 * This avoids tunnel drivers and other mess and gives us the speed so
1632 * important for multicast video.
1da177e4 1633 */
b6a7719a
HFS
1634static void ip_encap(struct net *net, struct sk_buff *skb,
1635 __be32 saddr, __be32 daddr)
1da177e4 1636{
8856dfa3 1637 struct iphdr *iph;
b71d1d42 1638 const struct iphdr *old_iph = ip_hdr(skb);
8856dfa3
ACM
1639
1640 skb_push(skb, sizeof(struct iphdr));
b0e380b1 1641 skb->transport_header = skb->network_header;
8856dfa3 1642 skb_reset_network_header(skb);
eddc9ec5 1643 iph = ip_hdr(skb);
1da177e4 1644
a8cb16dd 1645 iph->version = 4;
e023dd64
ACM
1646 iph->tos = old_iph->tos;
1647 iph->ttl = old_iph->ttl;
1da177e4
LT
1648 iph->frag_off = 0;
1649 iph->daddr = daddr;
1650 iph->saddr = saddr;
1651 iph->protocol = IPPROTO_IPIP;
1652 iph->ihl = 5;
1653 iph->tot_len = htons(skb->len);
b6a7719a 1654 ip_select_ident(net, skb, NULL);
1da177e4
LT
1655 ip_send_check(iph);
1656
1da177e4
LT
1657 memset(&(IPCB(skb)->opt), 0, sizeof(IPCB(skb)->opt));
1658 nf_reset(skb);
1659}
1660
0c4b51f0
EB
1661static inline int ipmr_forward_finish(struct net *net, struct sock *sk,
1662 struct sk_buff *skb)
1da177e4 1663{
a8cb16dd 1664 struct ip_options *opt = &(IPCB(skb)->opt);
1da177e4 1665
73186df8
DM
1666 IP_INC_STATS(net, IPSTATS_MIB_OUTFORWDATAGRAMS);
1667 IP_ADD_STATS(net, IPSTATS_MIB_OUTOCTETS, skb->len);
1da177e4
LT
1668
1669 if (unlikely(opt->optlen))
1670 ip_forward_options(skb);
1671
13206b6b 1672 return dst_output(net, sk, skb);
1da177e4
LT
1673}
1674
7ef8f65d 1675/* Processing handlers for ipmr_forward */
1da177e4 1676
0c12295a
PM
1677static void ipmr_queue_xmit(struct net *net, struct mr_table *mrt,
1678 struct sk_buff *skb, struct mfc_cache *c, int vifi)
1da177e4 1679{
eddc9ec5 1680 const struct iphdr *iph = ip_hdr(skb);
0c12295a 1681 struct vif_device *vif = &mrt->vif_table[vifi];
1da177e4
LT
1682 struct net_device *dev;
1683 struct rtable *rt;
31e4543d 1684 struct flowi4 fl4;
1da177e4
LT
1685 int encap = 0;
1686
51456b29 1687 if (!vif->dev)
1da177e4
LT
1688 goto out_free;
1689
1da177e4
LT
1690 if (vif->flags & VIFF_REGISTER) {
1691 vif->pkt_out++;
c354e124 1692 vif->bytes_out += skb->len;
cf3677ae
PE
1693 vif->dev->stats.tx_bytes += skb->len;
1694 vif->dev->stats.tx_packets++;
0c12295a 1695 ipmr_cache_report(mrt, skb, vifi, IGMPMSG_WHOLEPKT);
69ebbf58 1696 goto out_free;
1da177e4 1697 }
1da177e4 1698
a8cb16dd 1699 if (vif->flags & VIFF_TUNNEL) {
31e4543d 1700 rt = ip_route_output_ports(net, &fl4, NULL,
78fbfd8a
DM
1701 vif->remote, vif->local,
1702 0, 0,
1703 IPPROTO_IPIP,
1704 RT_TOS(iph->tos), vif->link);
b23dd4fe 1705 if (IS_ERR(rt))
1da177e4
LT
1706 goto out_free;
1707 encap = sizeof(struct iphdr);
1708 } else {
31e4543d 1709 rt = ip_route_output_ports(net, &fl4, NULL, iph->daddr, 0,
78fbfd8a
DM
1710 0, 0,
1711 IPPROTO_IPIP,
1712 RT_TOS(iph->tos), vif->link);
b23dd4fe 1713 if (IS_ERR(rt))
1da177e4
LT
1714 goto out_free;
1715 }
1716
d8d1f30b 1717 dev = rt->dst.dev;
1da177e4 1718
d8d1f30b 1719 if (skb->len+encap > dst_mtu(&rt->dst) && (ntohs(iph->frag_off) & IP_DF)) {
1da177e4 1720 /* Do not fragment multicasts. Alas, IPv4 does not
a8cb16dd
ED
1721 * allow to send ICMP, so that packets will disappear
1722 * to blackhole.
1da177e4 1723 */
73186df8 1724 IP_INC_STATS(net, IPSTATS_MIB_FRAGFAILS);
1da177e4
LT
1725 ip_rt_put(rt);
1726 goto out_free;
1727 }
1728
d8d1f30b 1729 encap += LL_RESERVED_SPACE(dev) + rt->dst.header_len;
1da177e4
LT
1730
1731 if (skb_cow(skb, encap)) {
e905a9ed 1732 ip_rt_put(rt);
1da177e4
LT
1733 goto out_free;
1734 }
1735
1736 vif->pkt_out++;
c354e124 1737 vif->bytes_out += skb->len;
1da177e4 1738
adf30907 1739 skb_dst_drop(skb);
d8d1f30b 1740 skb_dst_set(skb, &rt->dst);
eddc9ec5 1741 ip_decrease_ttl(ip_hdr(skb));
1da177e4
LT
1742
1743 /* FIXME: forward and output firewalls used to be called here.
a8cb16dd
ED
1744 * What do we do with netfilter? -- RR
1745 */
1da177e4 1746 if (vif->flags & VIFF_TUNNEL) {
b6a7719a 1747 ip_encap(net, skb, vif->local, vif->remote);
1da177e4 1748 /* FIXME: extra output firewall step used to be here. --RR */
2f4c02d4
PE
1749 vif->dev->stats.tx_packets++;
1750 vif->dev->stats.tx_bytes += skb->len;
1da177e4
LT
1751 }
1752
1753 IPCB(skb)->flags |= IPSKB_FORWARDED;
1754
7ef8f65d 1755 /* RFC1584 teaches, that DVMRP/PIM router must deliver packets locally
1da177e4
LT
1756 * not only before forwarding, but after forwarding on all output
1757 * interfaces. It is clear, if mrouter runs a multicasting
1758 * program, it should receive packets not depending to what interface
1759 * program is joined.
1760 * If we will not make it, the program will have to join on all
1761 * interfaces. On the other hand, multihoming host (or router, but
1762 * not mrouter) cannot join to more than one interface - it will
1763 * result in receiving multiple packets.
1764 */
29a26a56
EB
1765 NF_HOOK(NFPROTO_IPV4, NF_INET_FORWARD,
1766 net, NULL, skb, skb->dev, dev,
1da177e4
LT
1767 ipmr_forward_finish);
1768 return;
1769
1770out_free:
1771 kfree_skb(skb);
1da177e4
LT
1772}
1773
0c12295a 1774static int ipmr_find_vif(struct mr_table *mrt, struct net_device *dev)
1da177e4
LT
1775{
1776 int ct;
0c12295a
PM
1777
1778 for (ct = mrt->maxvif-1; ct >= 0; ct--) {
1779 if (mrt->vif_table[ct].dev == dev)
1da177e4
LT
1780 break;
1781 }
1782 return ct;
1783}
1784
1785/* "local" means that we should preserve one skb (for local delivery) */
c4854ec8
RR
1786static void ip_mr_forward(struct net *net, struct mr_table *mrt,
1787 struct sk_buff *skb, struct mfc_cache *cache,
1788 int local)
1da177e4
LT
1789{
1790 int psend = -1;
1791 int vif, ct;
660b26dc 1792 int true_vifi = ipmr_find_vif(mrt, skb->dev);
1da177e4
LT
1793
1794 vif = cache->mfc_parent;
1795 cache->mfc_un.res.pkt++;
1796 cache->mfc_un.res.bytes += skb->len;
1797
360eb5da 1798 if (cache->mfc_origin == htonl(INADDR_ANY) && true_vifi >= 0) {
660b26dc
ND
1799 struct mfc_cache *cache_proxy;
1800
1801 /* For an (*,G) entry, we only check that the incomming
1802 * interface is part of the static tree.
1803 */
1804 cache_proxy = ipmr_cache_find_any_parent(mrt, vif);
1805 if (cache_proxy &&
1806 cache_proxy->mfc_un.res.ttls[true_vifi] < 255)
1807 goto forward;
1808 }
1809
7ef8f65d 1810 /* Wrong interface: drop packet and (maybe) send PIM assert. */
0c12295a 1811 if (mrt->vif_table[vif].dev != skb->dev) {
c7537967 1812 if (rt_is_output_route(skb_rtable(skb))) {
1da177e4 1813 /* It is our own packet, looped back.
a8cb16dd
ED
1814 * Very complicated situation...
1815 *
1816 * The best workaround until routing daemons will be
1817 * fixed is not to redistribute packet, if it was
1818 * send through wrong interface. It means, that
1819 * multicast applications WILL NOT work for
1820 * (S,G), which have default multicast route pointing
1821 * to wrong oif. In any case, it is not a good
1822 * idea to use multicasting applications on router.
1da177e4
LT
1823 */
1824 goto dont_forward;
1825 }
1826
1827 cache->mfc_un.res.wrong_if++;
1da177e4 1828
0c12295a 1829 if (true_vifi >= 0 && mrt->mroute_do_assert &&
1da177e4 1830 /* pimsm uses asserts, when switching from RPT to SPT,
a8cb16dd
ED
1831 * so that we cannot check that packet arrived on an oif.
1832 * It is bad, but otherwise we would need to move pretty
1833 * large chunk of pimd to kernel. Ough... --ANK
1da177e4 1834 */
0c12295a 1835 (mrt->mroute_do_pim ||
6f9374a9 1836 cache->mfc_un.res.ttls[true_vifi] < 255) &&
e905a9ed 1837 time_after(jiffies,
1da177e4
LT
1838 cache->mfc_un.res.last_assert + MFC_ASSERT_THRESH)) {
1839 cache->mfc_un.res.last_assert = jiffies;
0c12295a 1840 ipmr_cache_report(mrt, skb, true_vifi, IGMPMSG_WRONGVIF);
1da177e4
LT
1841 }
1842 goto dont_forward;
1843 }
1844
660b26dc 1845forward:
0c12295a
PM
1846 mrt->vif_table[vif].pkt_in++;
1847 mrt->vif_table[vif].bytes_in += skb->len;
1da177e4 1848
7ef8f65d 1849 /* Forward the frame */
360eb5da
ND
1850 if (cache->mfc_origin == htonl(INADDR_ANY) &&
1851 cache->mfc_mcastgrp == htonl(INADDR_ANY)) {
660b26dc
ND
1852 if (true_vifi >= 0 &&
1853 true_vifi != cache->mfc_parent &&
1854 ip_hdr(skb)->ttl >
1855 cache->mfc_un.res.ttls[cache->mfc_parent]) {
1856 /* It's an (*,*) entry and the packet is not coming from
1857 * the upstream: forward the packet to the upstream
1858 * only.
1859 */
1860 psend = cache->mfc_parent;
1861 goto last_forward;
1862 }
1863 goto dont_forward;
1864 }
a8cb16dd
ED
1865 for (ct = cache->mfc_un.res.maxvif - 1;
1866 ct >= cache->mfc_un.res.minvif; ct--) {
660b26dc 1867 /* For (*,G) entry, don't forward to the incoming interface */
360eb5da
ND
1868 if ((cache->mfc_origin != htonl(INADDR_ANY) ||
1869 ct != true_vifi) &&
660b26dc 1870 ip_hdr(skb)->ttl > cache->mfc_un.res.ttls[ct]) {
1da177e4
LT
1871 if (psend != -1) {
1872 struct sk_buff *skb2 = skb_clone(skb, GFP_ATOMIC);
a8cb16dd 1873
1da177e4 1874 if (skb2)
0c12295a
PM
1875 ipmr_queue_xmit(net, mrt, skb2, cache,
1876 psend);
1da177e4 1877 }
c354e124 1878 psend = ct;
1da177e4
LT
1879 }
1880 }
660b26dc 1881last_forward:
1da177e4
LT
1882 if (psend != -1) {
1883 if (local) {
1884 struct sk_buff *skb2 = skb_clone(skb, GFP_ATOMIC);
a8cb16dd 1885
1da177e4 1886 if (skb2)
0c12295a 1887 ipmr_queue_xmit(net, mrt, skb2, cache, psend);
1da177e4 1888 } else {
0c12295a 1889 ipmr_queue_xmit(net, mrt, skb, cache, psend);
c4854ec8 1890 return;
1da177e4
LT
1891 }
1892 }
1893
1894dont_forward:
1895 if (!local)
1896 kfree_skb(skb);
1da177e4
LT
1897}
1898
417da66f 1899static struct mr_table *ipmr_rt_fib_lookup(struct net *net, struct sk_buff *skb)
ee3f1aaf 1900{
417da66f
DM
1901 struct rtable *rt = skb_rtable(skb);
1902 struct iphdr *iph = ip_hdr(skb);
da91981b 1903 struct flowi4 fl4 = {
417da66f
DM
1904 .daddr = iph->daddr,
1905 .saddr = iph->saddr,
b0fe4a31 1906 .flowi4_tos = RT_TOS(iph->tos),
4fd551d7
DM
1907 .flowi4_oif = (rt_is_output_route(rt) ?
1908 skb->dev->ifindex : 0),
1909 .flowi4_iif = (rt_is_output_route(rt) ?
1fb9489b 1910 LOOPBACK_IFINDEX :
4fd551d7 1911 skb->dev->ifindex),
b4869889 1912 .flowi4_mark = skb->mark,
ee3f1aaf
DM
1913 };
1914 struct mr_table *mrt;
1915 int err;
1916
da91981b 1917 err = ipmr_fib_lookup(net, &fl4, &mrt);
ee3f1aaf
DM
1918 if (err)
1919 return ERR_PTR(err);
1920 return mrt;
1921}
1da177e4 1922
7ef8f65d
NA
1923/* Multicast packets for forwarding arrive here
1924 * Called with rcu_read_lock();
1da177e4 1925 */
1da177e4
LT
1926int ip_mr_input(struct sk_buff *skb)
1927{
1928 struct mfc_cache *cache;
4feb88e5 1929 struct net *net = dev_net(skb->dev);
511c3f92 1930 int local = skb_rtable(skb)->rt_flags & RTCF_LOCAL;
f0ad0860 1931 struct mr_table *mrt;
1da177e4
LT
1932
1933 /* Packet is looped back after forward, it should not be
a8cb16dd 1934 * forwarded second time, but still can be delivered locally.
1da177e4 1935 */
4c968709 1936 if (IPCB(skb)->flags & IPSKB_FORWARDED)
1da177e4
LT
1937 goto dont_forward;
1938
417da66f 1939 mrt = ipmr_rt_fib_lookup(net, skb);
ee3f1aaf
DM
1940 if (IS_ERR(mrt)) {
1941 kfree_skb(skb);
1942 return PTR_ERR(mrt);
e40dbc51 1943 }
1da177e4 1944 if (!local) {
4c968709
ED
1945 if (IPCB(skb)->opt.router_alert) {
1946 if (ip_call_ra_chain(skb))
1947 return 0;
1948 } else if (ip_hdr(skb)->protocol == IPPROTO_IGMP) {
1949 /* IGMPv1 (and broken IGMPv2 implementations sort of
1950 * Cisco IOS <= 11.2(8)) do not put router alert
1951 * option to IGMP packets destined to routable
1952 * groups. It is very bad, because it means
1953 * that we can forward NO IGMP messages.
1954 */
1955 struct sock *mroute_sk;
1956
1957 mroute_sk = rcu_dereference(mrt->mroute_sk);
1958 if (mroute_sk) {
1959 nf_reset(skb);
1960 raw_rcv(mroute_sk, skb);
1961 return 0;
1962 }
1da177e4
LT
1963 }
1964 }
1965
a8c9486b 1966 /* already under rcu_read_lock() */
0c12295a 1967 cache = ipmr_cache_find(mrt, ip_hdr(skb)->saddr, ip_hdr(skb)->daddr);
51456b29 1968 if (!cache) {
660b26dc
ND
1969 int vif = ipmr_find_vif(mrt, skb->dev);
1970
1971 if (vif >= 0)
1972 cache = ipmr_cache_find_any(mrt, ip_hdr(skb)->daddr,
1973 vif);
1974 }
1da177e4 1975
7ef8f65d 1976 /* No usable cache entry */
51456b29 1977 if (!cache) {
1da177e4
LT
1978 int vif;
1979
1980 if (local) {
1981 struct sk_buff *skb2 = skb_clone(skb, GFP_ATOMIC);
1982 ip_local_deliver(skb);
51456b29 1983 if (!skb2)
1da177e4 1984 return -ENOBUFS;
1da177e4
LT
1985 skb = skb2;
1986 }
1987
a8c9486b 1988 read_lock(&mrt_lock);
0c12295a 1989 vif = ipmr_find_vif(mrt, skb->dev);
1da177e4 1990 if (vif >= 0) {
0eae88f3 1991 int err2 = ipmr_cache_unresolved(mrt, vif, skb);
1da177e4
LT
1992 read_unlock(&mrt_lock);
1993
0eae88f3 1994 return err2;
1da177e4
LT
1995 }
1996 read_unlock(&mrt_lock);
1997 kfree_skb(skb);
1998 return -ENODEV;
1999 }
2000
a8c9486b 2001 read_lock(&mrt_lock);
0c12295a 2002 ip_mr_forward(net, mrt, skb, cache, local);
1da177e4
LT
2003 read_unlock(&mrt_lock);
2004
2005 if (local)
2006 return ip_local_deliver(skb);
2007
2008 return 0;
2009
2010dont_forward:
2011 if (local)
2012 return ip_local_deliver(skb);
2013 kfree_skb(skb);
2014 return 0;
2015}
2016
b1879204 2017#ifdef CONFIG_IP_PIMSM_V1
7ef8f65d 2018/* Handle IGMP messages of PIMv1 */
a8cb16dd 2019int pim_rcv_v1(struct sk_buff *skb)
b1879204
IJ
2020{
2021 struct igmphdr *pim;
4feb88e5 2022 struct net *net = dev_net(skb->dev);
f0ad0860 2023 struct mr_table *mrt;
b1879204
IJ
2024
2025 if (!pskb_may_pull(skb, sizeof(*pim) + sizeof(struct iphdr)))
2026 goto drop;
2027
2028 pim = igmp_hdr(skb);
2029
417da66f 2030 mrt = ipmr_rt_fib_lookup(net, skb);
ee3f1aaf
DM
2031 if (IS_ERR(mrt))
2032 goto drop;
0c12295a 2033 if (!mrt->mroute_do_pim ||
b1879204
IJ
2034 pim->group != PIM_V1_VERSION || pim->code != PIM_V1_REGISTER)
2035 goto drop;
2036
f0ad0860 2037 if (__pim_rcv(mrt, skb, sizeof(*pim))) {
b1879204
IJ
2038drop:
2039 kfree_skb(skb);
2040 }
1da177e4
LT
2041 return 0;
2042}
2043#endif
2044
2045#ifdef CONFIG_IP_PIMSM_V2
a8cb16dd 2046static int pim_rcv(struct sk_buff *skb)
1da177e4
LT
2047{
2048 struct pimreghdr *pim;
f0ad0860
PM
2049 struct net *net = dev_net(skb->dev);
2050 struct mr_table *mrt;
1da177e4 2051
b1879204 2052 if (!pskb_may_pull(skb, sizeof(*pim) + sizeof(struct iphdr)))
1da177e4
LT
2053 goto drop;
2054
9c70220b 2055 pim = (struct pimreghdr *)skb_transport_header(skb);
a8cb16dd
ED
2056 if (pim->type != ((PIM_VERSION << 4) | (PIM_REGISTER)) ||
2057 (pim->flags & PIM_NULL_REGISTER) ||
e905a9ed 2058 (ip_compute_csum((void *)pim, sizeof(*pim)) != 0 &&
d3bc23e7 2059 csum_fold(skb_checksum(skb, 0, skb->len, 0))))
1da177e4
LT
2060 goto drop;
2061
417da66f 2062 mrt = ipmr_rt_fib_lookup(net, skb);
ee3f1aaf
DM
2063 if (IS_ERR(mrt))
2064 goto drop;
f0ad0860 2065 if (__pim_rcv(mrt, skb, sizeof(*pim))) {
b1879204
IJ
2066drop:
2067 kfree_skb(skb);
2068 }
1da177e4
LT
2069 return 0;
2070}
2071#endif
2072
cb6a4e46
PM
2073static int __ipmr_fill_mroute(struct mr_table *mrt, struct sk_buff *skb,
2074 struct mfc_cache *c, struct rtmsg *rtm)
1da177e4
LT
2075{
2076 int ct;
2077 struct rtnexthop *nhp;
92a395e5 2078 struct nlattr *mp_attr;
adfa85e4 2079 struct rta_mfc_stats mfcs;
1da177e4 2080
7438189b 2081 /* If cache is unresolved, don't try to parse IIF and OIF */
ed0f160a 2082 if (c->mfc_parent >= MAXVIFS)
7438189b
ND
2083 return -ENOENT;
2084
92a395e5
TG
2085 if (VIF_EXISTS(mrt, c->mfc_parent) &&
2086 nla_put_u32(skb, RTA_IIF, mrt->vif_table[c->mfc_parent].dev->ifindex) < 0)
2087 return -EMSGSIZE;
1da177e4 2088
92a395e5
TG
2089 if (!(mp_attr = nla_nest_start(skb, RTA_MULTIPATH)))
2090 return -EMSGSIZE;
1da177e4
LT
2091
2092 for (ct = c->mfc_un.res.minvif; ct < c->mfc_un.res.maxvif; ct++) {
0c12295a 2093 if (VIF_EXISTS(mrt, ct) && c->mfc_un.res.ttls[ct] < 255) {
92a395e5
TG
2094 if (!(nhp = nla_reserve_nohdr(skb, sizeof(*nhp)))) {
2095 nla_nest_cancel(skb, mp_attr);
2096 return -EMSGSIZE;
2097 }
2098
1da177e4
LT
2099 nhp->rtnh_flags = 0;
2100 nhp->rtnh_hops = c->mfc_un.res.ttls[ct];
0c12295a 2101 nhp->rtnh_ifindex = mrt->vif_table[ct].dev->ifindex;
1da177e4
LT
2102 nhp->rtnh_len = sizeof(*nhp);
2103 }
2104 }
92a395e5
TG
2105
2106 nla_nest_end(skb, mp_attr);
2107
adfa85e4
ND
2108 mfcs.mfcs_packets = c->mfc_un.res.pkt;
2109 mfcs.mfcs_bytes = c->mfc_un.res.bytes;
2110 mfcs.mfcs_wrong_if = c->mfc_un.res.wrong_if;
2111 if (nla_put(skb, RTA_MFC_STATS, sizeof(mfcs), &mfcs) < 0)
2112 return -EMSGSIZE;
2113
1da177e4
LT
2114 rtm->rtm_type = RTN_MULTICAST;
2115 return 1;
1da177e4
LT
2116}
2117
9a1b9496
DM
2118int ipmr_get_route(struct net *net, struct sk_buff *skb,
2119 __be32 saddr, __be32 daddr,
2120 struct rtmsg *rtm, int nowait)
1da177e4 2121{
1da177e4 2122 struct mfc_cache *cache;
9a1b9496
DM
2123 struct mr_table *mrt;
2124 int err;
1da177e4 2125
f0ad0860 2126 mrt = ipmr_get_table(net, RT_TABLE_DEFAULT);
51456b29 2127 if (!mrt)
f0ad0860
PM
2128 return -ENOENT;
2129
a8c9486b 2130 rcu_read_lock();
9a1b9496 2131 cache = ipmr_cache_find(mrt, saddr, daddr);
51456b29 2132 if (!cache && skb->dev) {
660b26dc 2133 int vif = ipmr_find_vif(mrt, skb->dev);
1da177e4 2134
660b26dc
ND
2135 if (vif >= 0)
2136 cache = ipmr_cache_find_any(mrt, daddr, vif);
2137 }
51456b29 2138 if (!cache) {
72287490 2139 struct sk_buff *skb2;
eddc9ec5 2140 struct iphdr *iph;
1da177e4 2141 struct net_device *dev;
a8cb16dd 2142 int vif = -1;
1da177e4
LT
2143
2144 if (nowait) {
a8c9486b 2145 rcu_read_unlock();
1da177e4
LT
2146 return -EAGAIN;
2147 }
2148
2149 dev = skb->dev;
a8c9486b 2150 read_lock(&mrt_lock);
a8cb16dd
ED
2151 if (dev)
2152 vif = ipmr_find_vif(mrt, dev);
2153 if (vif < 0) {
1da177e4 2154 read_unlock(&mrt_lock);
a8c9486b 2155 rcu_read_unlock();
1da177e4
LT
2156 return -ENODEV;
2157 }
72287490
AK
2158 skb2 = skb_clone(skb, GFP_ATOMIC);
2159 if (!skb2) {
2160 read_unlock(&mrt_lock);
a8c9486b 2161 rcu_read_unlock();
72287490
AK
2162 return -ENOMEM;
2163 }
2164
e2d1bca7
ACM
2165 skb_push(skb2, sizeof(struct iphdr));
2166 skb_reset_network_header(skb2);
eddc9ec5
ACM
2167 iph = ip_hdr(skb2);
2168 iph->ihl = sizeof(struct iphdr) >> 2;
9a1b9496
DM
2169 iph->saddr = saddr;
2170 iph->daddr = daddr;
eddc9ec5 2171 iph->version = 0;
0c12295a 2172 err = ipmr_cache_unresolved(mrt, vif, skb2);
1da177e4 2173 read_unlock(&mrt_lock);
a8c9486b 2174 rcu_read_unlock();
1da177e4
LT
2175 return err;
2176 }
2177
a8c9486b 2178 read_lock(&mrt_lock);
cb6a4e46 2179 err = __ipmr_fill_mroute(mrt, skb, cache, rtm);
1da177e4 2180 read_unlock(&mrt_lock);
a8c9486b 2181 rcu_read_unlock();
1da177e4
LT
2182 return err;
2183}
2184
cb6a4e46 2185static int ipmr_fill_mroute(struct mr_table *mrt, struct sk_buff *skb,
65886f43
ND
2186 u32 portid, u32 seq, struct mfc_cache *c, int cmd,
2187 int flags)
cb6a4e46
PM
2188{
2189 struct nlmsghdr *nlh;
2190 struct rtmsg *rtm;
1eb99af5 2191 int err;
cb6a4e46 2192
65886f43 2193 nlh = nlmsg_put(skb, portid, seq, cmd, sizeof(*rtm), flags);
51456b29 2194 if (!nlh)
cb6a4e46
PM
2195 return -EMSGSIZE;
2196
2197 rtm = nlmsg_data(nlh);
2198 rtm->rtm_family = RTNL_FAMILY_IPMR;
2199 rtm->rtm_dst_len = 32;
2200 rtm->rtm_src_len = 32;
2201 rtm->rtm_tos = 0;
2202 rtm->rtm_table = mrt->id;
f3756b79
DM
2203 if (nla_put_u32(skb, RTA_TABLE, mrt->id))
2204 goto nla_put_failure;
cb6a4e46
PM
2205 rtm->rtm_type = RTN_MULTICAST;
2206 rtm->rtm_scope = RT_SCOPE_UNIVERSE;
9a68ac72
ND
2207 if (c->mfc_flags & MFC_STATIC)
2208 rtm->rtm_protocol = RTPROT_STATIC;
2209 else
2210 rtm->rtm_protocol = RTPROT_MROUTED;
cb6a4e46
PM
2211 rtm->rtm_flags = 0;
2212
930345ea
JB
2213 if (nla_put_in_addr(skb, RTA_SRC, c->mfc_origin) ||
2214 nla_put_in_addr(skb, RTA_DST, c->mfc_mcastgrp))
f3756b79 2215 goto nla_put_failure;
1eb99af5
ND
2216 err = __ipmr_fill_mroute(mrt, skb, c, rtm);
2217 /* do not break the dump if cache is unresolved */
2218 if (err < 0 && err != -ENOENT)
cb6a4e46
PM
2219 goto nla_put_failure;
2220
053c095a
JB
2221 nlmsg_end(skb, nlh);
2222 return 0;
cb6a4e46
PM
2223
2224nla_put_failure:
2225 nlmsg_cancel(skb, nlh);
2226 return -EMSGSIZE;
2227}
2228
8cd3ac9f
ND
2229static size_t mroute_msgsize(bool unresolved, int maxvif)
2230{
2231 size_t len =
2232 NLMSG_ALIGN(sizeof(struct rtmsg))
2233 + nla_total_size(4) /* RTA_TABLE */
2234 + nla_total_size(4) /* RTA_SRC */
2235 + nla_total_size(4) /* RTA_DST */
2236 ;
2237
2238 if (!unresolved)
2239 len = len
2240 + nla_total_size(4) /* RTA_IIF */
2241 + nla_total_size(0) /* RTA_MULTIPATH */
2242 + maxvif * NLA_ALIGN(sizeof(struct rtnexthop))
2243 /* RTA_MFC_STATS */
2244 + nla_total_size(sizeof(struct rta_mfc_stats))
2245 ;
2246
2247 return len;
2248}
2249
2250static void mroute_netlink_event(struct mr_table *mrt, struct mfc_cache *mfc,
2251 int cmd)
2252{
2253 struct net *net = read_pnet(&mrt->net);
2254 struct sk_buff *skb;
2255 int err = -ENOBUFS;
2256
2257 skb = nlmsg_new(mroute_msgsize(mfc->mfc_parent >= MAXVIFS, mrt->maxvif),
2258 GFP_ATOMIC);
51456b29 2259 if (!skb)
8cd3ac9f
ND
2260 goto errout;
2261
65886f43 2262 err = ipmr_fill_mroute(mrt, skb, 0, 0, mfc, cmd, 0);
8cd3ac9f
ND
2263 if (err < 0)
2264 goto errout;
2265
2266 rtnl_notify(skb, net, 0, RTNLGRP_IPV4_MROUTE, NULL, GFP_ATOMIC);
2267 return;
2268
2269errout:
2270 kfree_skb(skb);
2271 if (err < 0)
2272 rtnl_set_sk_err(net, RTNLGRP_IPV4_MROUTE, err);
2273}
2274
cb6a4e46
PM
2275static int ipmr_rtm_dumproute(struct sk_buff *skb, struct netlink_callback *cb)
2276{
2277 struct net *net = sock_net(skb->sk);
2278 struct mr_table *mrt;
2279 struct mfc_cache *mfc;
2280 unsigned int t = 0, s_t;
2281 unsigned int h = 0, s_h;
2282 unsigned int e = 0, s_e;
2283
2284 s_t = cb->args[0];
2285 s_h = cb->args[1];
2286 s_e = cb->args[2];
2287
a8c9486b 2288 rcu_read_lock();
cb6a4e46
PM
2289 ipmr_for_each_table(mrt, net) {
2290 if (t < s_t)
2291 goto next_table;
2292 if (t > s_t)
2293 s_h = 0;
2294 for (h = s_h; h < MFC_LINES; h++) {
a8c9486b 2295 list_for_each_entry_rcu(mfc, &mrt->mfc_cache_array[h], list) {
cb6a4e46
PM
2296 if (e < s_e)
2297 goto next_entry;
2298 if (ipmr_fill_mroute(mrt, skb,
15e47304 2299 NETLINK_CB(cb->skb).portid,
cb6a4e46 2300 cb->nlh->nlmsg_seq,
65886f43
ND
2301 mfc, RTM_NEWROUTE,
2302 NLM_F_MULTI) < 0)
cb6a4e46
PM
2303 goto done;
2304next_entry:
2305 e++;
2306 }
2307 e = s_e = 0;
2308 }
1eb99af5
ND
2309 spin_lock_bh(&mfc_unres_lock);
2310 list_for_each_entry(mfc, &mrt->mfc_unres_queue, list) {
2311 if (e < s_e)
2312 goto next_entry2;
2313 if (ipmr_fill_mroute(mrt, skb,
2314 NETLINK_CB(cb->skb).portid,
2315 cb->nlh->nlmsg_seq,
65886f43
ND
2316 mfc, RTM_NEWROUTE,
2317 NLM_F_MULTI) < 0) {
1eb99af5
ND
2318 spin_unlock_bh(&mfc_unres_lock);
2319 goto done;
2320 }
2321next_entry2:
2322 e++;
2323 }
2324 spin_unlock_bh(&mfc_unres_lock);
2325 e = s_e = 0;
cb6a4e46
PM
2326 s_h = 0;
2327next_table:
2328 t++;
2329 }
2330done:
a8c9486b 2331 rcu_read_unlock();
cb6a4e46
PM
2332
2333 cb->args[2] = e;
2334 cb->args[1] = h;
2335 cb->args[0] = t;
2336
2337 return skb->len;
2338}
2339
e905a9ed 2340#ifdef CONFIG_PROC_FS
7ef8f65d
NA
2341/* The /proc interfaces to multicast routing :
2342 * /proc/net/ip_mr_cache & /proc/net/ip_mr_vif
1da177e4
LT
2343 */
2344struct ipmr_vif_iter {
f6bb4514 2345 struct seq_net_private p;
f0ad0860 2346 struct mr_table *mrt;
1da177e4
LT
2347 int ct;
2348};
2349
f6bb4514
BT
2350static struct vif_device *ipmr_vif_seq_idx(struct net *net,
2351 struct ipmr_vif_iter *iter,
1da177e4
LT
2352 loff_t pos)
2353{
f0ad0860 2354 struct mr_table *mrt = iter->mrt;
0c12295a
PM
2355
2356 for (iter->ct = 0; iter->ct < mrt->maxvif; ++iter->ct) {
2357 if (!VIF_EXISTS(mrt, iter->ct))
1da177e4 2358 continue;
e905a9ed 2359 if (pos-- == 0)
0c12295a 2360 return &mrt->vif_table[iter->ct];
1da177e4
LT
2361 }
2362 return NULL;
2363}
2364
2365static void *ipmr_vif_seq_start(struct seq_file *seq, loff_t *pos)
ba93ef74 2366 __acquires(mrt_lock)
1da177e4 2367{
f0ad0860 2368 struct ipmr_vif_iter *iter = seq->private;
f6bb4514 2369 struct net *net = seq_file_net(seq);
f0ad0860
PM
2370 struct mr_table *mrt;
2371
2372 mrt = ipmr_get_table(net, RT_TABLE_DEFAULT);
51456b29 2373 if (!mrt)
f0ad0860
PM
2374 return ERR_PTR(-ENOENT);
2375
2376 iter->mrt = mrt;
f6bb4514 2377
1da177e4 2378 read_lock(&mrt_lock);
f6bb4514 2379 return *pos ? ipmr_vif_seq_idx(net, seq->private, *pos - 1)
1da177e4
LT
2380 : SEQ_START_TOKEN;
2381}
2382
2383static void *ipmr_vif_seq_next(struct seq_file *seq, void *v, loff_t *pos)
2384{
2385 struct ipmr_vif_iter *iter = seq->private;
f6bb4514 2386 struct net *net = seq_file_net(seq);
f0ad0860 2387 struct mr_table *mrt = iter->mrt;
1da177e4
LT
2388
2389 ++*pos;
2390 if (v == SEQ_START_TOKEN)
f6bb4514 2391 return ipmr_vif_seq_idx(net, iter, 0);
e905a9ed 2392
0c12295a
PM
2393 while (++iter->ct < mrt->maxvif) {
2394 if (!VIF_EXISTS(mrt, iter->ct))
1da177e4 2395 continue;
0c12295a 2396 return &mrt->vif_table[iter->ct];
1da177e4
LT
2397 }
2398 return NULL;
2399}
2400
2401static void ipmr_vif_seq_stop(struct seq_file *seq, void *v)
ba93ef74 2402 __releases(mrt_lock)
1da177e4
LT
2403{
2404 read_unlock(&mrt_lock);
2405}
2406
2407static int ipmr_vif_seq_show(struct seq_file *seq, void *v)
2408{
f0ad0860
PM
2409 struct ipmr_vif_iter *iter = seq->private;
2410 struct mr_table *mrt = iter->mrt;
f6bb4514 2411
1da177e4 2412 if (v == SEQ_START_TOKEN) {
e905a9ed 2413 seq_puts(seq,
1da177e4
LT
2414 "Interface BytesIn PktsIn BytesOut PktsOut Flags Local Remote\n");
2415 } else {
2416 const struct vif_device *vif = v;
2417 const char *name = vif->dev ? vif->dev->name : "none";
2418
2419 seq_printf(seq,
2420 "%2Zd %-10s %8ld %7ld %8ld %7ld %05X %08X %08X\n",
0c12295a 2421 vif - mrt->vif_table,
e905a9ed 2422 name, vif->bytes_in, vif->pkt_in,
1da177e4
LT
2423 vif->bytes_out, vif->pkt_out,
2424 vif->flags, vif->local, vif->remote);
2425 }
2426 return 0;
2427}
2428
f690808e 2429static const struct seq_operations ipmr_vif_seq_ops = {
1da177e4
LT
2430 .start = ipmr_vif_seq_start,
2431 .next = ipmr_vif_seq_next,
2432 .stop = ipmr_vif_seq_stop,
2433 .show = ipmr_vif_seq_show,
2434};
2435
2436static int ipmr_vif_open(struct inode *inode, struct file *file)
2437{
f6bb4514
BT
2438 return seq_open_net(inode, file, &ipmr_vif_seq_ops,
2439 sizeof(struct ipmr_vif_iter));
1da177e4
LT
2440}
2441
9a32144e 2442static const struct file_operations ipmr_vif_fops = {
1da177e4
LT
2443 .owner = THIS_MODULE,
2444 .open = ipmr_vif_open,
2445 .read = seq_read,
2446 .llseek = seq_lseek,
f6bb4514 2447 .release = seq_release_net,
1da177e4
LT
2448};
2449
2450struct ipmr_mfc_iter {
f6bb4514 2451 struct seq_net_private p;
f0ad0860 2452 struct mr_table *mrt;
862465f2 2453 struct list_head *cache;
1da177e4
LT
2454 int ct;
2455};
2456
2457
f6bb4514
BT
2458static struct mfc_cache *ipmr_mfc_seq_idx(struct net *net,
2459 struct ipmr_mfc_iter *it, loff_t pos)
1da177e4 2460{
f0ad0860 2461 struct mr_table *mrt = it->mrt;
1da177e4
LT
2462 struct mfc_cache *mfc;
2463
a8c9486b 2464 rcu_read_lock();
862465f2 2465 for (it->ct = 0; it->ct < MFC_LINES; it->ct++) {
0c12295a 2466 it->cache = &mrt->mfc_cache_array[it->ct];
a8c9486b 2467 list_for_each_entry_rcu(mfc, it->cache, list)
e905a9ed 2468 if (pos-- == 0)
1da177e4 2469 return mfc;
862465f2 2470 }
a8c9486b 2471 rcu_read_unlock();
1da177e4 2472
1da177e4 2473 spin_lock_bh(&mfc_unres_lock);
0c12295a 2474 it->cache = &mrt->mfc_unres_queue;
862465f2 2475 list_for_each_entry(mfc, it->cache, list)
e258beb2 2476 if (pos-- == 0)
1da177e4
LT
2477 return mfc;
2478 spin_unlock_bh(&mfc_unres_lock);
2479
2480 it->cache = NULL;
2481 return NULL;
2482}
2483
2484
2485static void *ipmr_mfc_seq_start(struct seq_file *seq, loff_t *pos)
2486{
2487 struct ipmr_mfc_iter *it = seq->private;
f6bb4514 2488 struct net *net = seq_file_net(seq);
f0ad0860 2489 struct mr_table *mrt;
f6bb4514 2490
f0ad0860 2491 mrt = ipmr_get_table(net, RT_TABLE_DEFAULT);
51456b29 2492 if (!mrt)
f0ad0860 2493 return ERR_PTR(-ENOENT);
f6bb4514 2494
f0ad0860 2495 it->mrt = mrt;
1da177e4
LT
2496 it->cache = NULL;
2497 it->ct = 0;
f6bb4514 2498 return *pos ? ipmr_mfc_seq_idx(net, seq->private, *pos - 1)
1da177e4
LT
2499 : SEQ_START_TOKEN;
2500}
2501
2502static void *ipmr_mfc_seq_next(struct seq_file *seq, void *v, loff_t *pos)
2503{
2504 struct mfc_cache *mfc = v;
2505 struct ipmr_mfc_iter *it = seq->private;
f6bb4514 2506 struct net *net = seq_file_net(seq);
f0ad0860 2507 struct mr_table *mrt = it->mrt;
1da177e4
LT
2508
2509 ++*pos;
2510
2511 if (v == SEQ_START_TOKEN)
f6bb4514 2512 return ipmr_mfc_seq_idx(net, seq->private, 0);
1da177e4 2513
862465f2
PM
2514 if (mfc->list.next != it->cache)
2515 return list_entry(mfc->list.next, struct mfc_cache, list);
e905a9ed 2516
0c12295a 2517 if (it->cache == &mrt->mfc_unres_queue)
1da177e4
LT
2518 goto end_of_list;
2519
0c12295a 2520 BUG_ON(it->cache != &mrt->mfc_cache_array[it->ct]);
1da177e4
LT
2521
2522 while (++it->ct < MFC_LINES) {
0c12295a 2523 it->cache = &mrt->mfc_cache_array[it->ct];
862465f2
PM
2524 if (list_empty(it->cache))
2525 continue;
2526 return list_first_entry(it->cache, struct mfc_cache, list);
1da177e4
LT
2527 }
2528
2529 /* exhausted cache_array, show unresolved */
a8c9486b 2530 rcu_read_unlock();
0c12295a 2531 it->cache = &mrt->mfc_unres_queue;
1da177e4 2532 it->ct = 0;
e905a9ed 2533
1da177e4 2534 spin_lock_bh(&mfc_unres_lock);
862465f2
PM
2535 if (!list_empty(it->cache))
2536 return list_first_entry(it->cache, struct mfc_cache, list);
1da177e4 2537
a8cb16dd 2538end_of_list:
1da177e4
LT
2539 spin_unlock_bh(&mfc_unres_lock);
2540 it->cache = NULL;
2541
2542 return NULL;
2543}
2544
2545static void ipmr_mfc_seq_stop(struct seq_file *seq, void *v)
2546{
2547 struct ipmr_mfc_iter *it = seq->private;
f0ad0860 2548 struct mr_table *mrt = it->mrt;
1da177e4 2549
0c12295a 2550 if (it->cache == &mrt->mfc_unres_queue)
1da177e4 2551 spin_unlock_bh(&mfc_unres_lock);
0c12295a 2552 else if (it->cache == &mrt->mfc_cache_array[it->ct])
a8c9486b 2553 rcu_read_unlock();
1da177e4
LT
2554}
2555
2556static int ipmr_mfc_seq_show(struct seq_file *seq, void *v)
2557{
2558 int n;
2559
2560 if (v == SEQ_START_TOKEN) {
e905a9ed 2561 seq_puts(seq,
1da177e4
LT
2562 "Group Origin Iif Pkts Bytes Wrong Oifs\n");
2563 } else {
2564 const struct mfc_cache *mfc = v;
2565 const struct ipmr_mfc_iter *it = seq->private;
f0ad0860 2566 const struct mr_table *mrt = it->mrt;
e905a9ed 2567
0eae88f3
ED
2568 seq_printf(seq, "%08X %08X %-3hd",
2569 (__force u32) mfc->mfc_mcastgrp,
2570 (__force u32) mfc->mfc_origin,
1ea472e2 2571 mfc->mfc_parent);
1da177e4 2572
0c12295a 2573 if (it->cache != &mrt->mfc_unres_queue) {
1ea472e2
BT
2574 seq_printf(seq, " %8lu %8lu %8lu",
2575 mfc->mfc_un.res.pkt,
2576 mfc->mfc_un.res.bytes,
2577 mfc->mfc_un.res.wrong_if);
132adf54 2578 for (n = mfc->mfc_un.res.minvif;
a8cb16dd 2579 n < mfc->mfc_un.res.maxvif; n++) {
0c12295a 2580 if (VIF_EXISTS(mrt, n) &&
cf958ae3
BT
2581 mfc->mfc_un.res.ttls[n] < 255)
2582 seq_printf(seq,
e905a9ed 2583 " %2d:%-3d",
1da177e4
LT
2584 n, mfc->mfc_un.res.ttls[n]);
2585 }
1ea472e2
BT
2586 } else {
2587 /* unresolved mfc_caches don't contain
2588 * pkt, bytes and wrong_if values
2589 */
2590 seq_printf(seq, " %8lu %8lu %8lu", 0ul, 0ul, 0ul);
1da177e4
LT
2591 }
2592 seq_putc(seq, '\n');
2593 }
2594 return 0;
2595}
2596
f690808e 2597static const struct seq_operations ipmr_mfc_seq_ops = {
1da177e4
LT
2598 .start = ipmr_mfc_seq_start,
2599 .next = ipmr_mfc_seq_next,
2600 .stop = ipmr_mfc_seq_stop,
2601 .show = ipmr_mfc_seq_show,
2602};
2603
2604static int ipmr_mfc_open(struct inode *inode, struct file *file)
2605{
f6bb4514
BT
2606 return seq_open_net(inode, file, &ipmr_mfc_seq_ops,
2607 sizeof(struct ipmr_mfc_iter));
1da177e4
LT
2608}
2609
9a32144e 2610static const struct file_operations ipmr_mfc_fops = {
1da177e4
LT
2611 .owner = THIS_MODULE,
2612 .open = ipmr_mfc_open,
2613 .read = seq_read,
2614 .llseek = seq_lseek,
f6bb4514 2615 .release = seq_release_net,
1da177e4 2616};
e905a9ed 2617#endif
1da177e4
LT
2618
2619#ifdef CONFIG_IP_PIMSM_V2
32613090 2620static const struct net_protocol pim_protocol = {
1da177e4 2621 .handler = pim_rcv,
403dbb97 2622 .netns_ok = 1,
1da177e4
LT
2623};
2624#endif
2625
7ef8f65d 2626/* Setup for IP multicast routing */
cf958ae3
BT
2627static int __net_init ipmr_net_init(struct net *net)
2628{
f0ad0860 2629 int err;
cf958ae3 2630
f0ad0860
PM
2631 err = ipmr_rules_init(net);
2632 if (err < 0)
cf958ae3 2633 goto fail;
f6bb4514
BT
2634
2635#ifdef CONFIG_PROC_FS
2636 err = -ENOMEM;
d4beaa66 2637 if (!proc_create("ip_mr_vif", 0, net->proc_net, &ipmr_vif_fops))
f6bb4514 2638 goto proc_vif_fail;
d4beaa66 2639 if (!proc_create("ip_mr_cache", 0, net->proc_net, &ipmr_mfc_fops))
f6bb4514
BT
2640 goto proc_cache_fail;
2641#endif
2bb8b26c
BT
2642 return 0;
2643
f6bb4514
BT
2644#ifdef CONFIG_PROC_FS
2645proc_cache_fail:
ece31ffd 2646 remove_proc_entry("ip_mr_vif", net->proc_net);
f6bb4514 2647proc_vif_fail:
f0ad0860 2648 ipmr_rules_exit(net);
f6bb4514 2649#endif
cf958ae3
BT
2650fail:
2651 return err;
2652}
2653
2654static void __net_exit ipmr_net_exit(struct net *net)
2655{
f6bb4514 2656#ifdef CONFIG_PROC_FS
ece31ffd
G
2657 remove_proc_entry("ip_mr_cache", net->proc_net);
2658 remove_proc_entry("ip_mr_vif", net->proc_net);
f6bb4514 2659#endif
f0ad0860 2660 ipmr_rules_exit(net);
cf958ae3
BT
2661}
2662
2663static struct pernet_operations ipmr_net_ops = {
2664 .init = ipmr_net_init,
2665 .exit = ipmr_net_exit,
2666};
e905a9ed 2667
03d2f897 2668int __init ip_mr_init(void)
1da177e4 2669{
03d2f897
WC
2670 int err;
2671
1da177e4
LT
2672 mrt_cachep = kmem_cache_create("ip_mrt_cache",
2673 sizeof(struct mfc_cache),
a8c9486b 2674 0, SLAB_HWCACHE_ALIGN | SLAB_PANIC,
20c2df83 2675 NULL);
03d2f897 2676
cf958ae3
BT
2677 err = register_pernet_subsys(&ipmr_net_ops);
2678 if (err)
2679 goto reg_pernet_fail;
2680
03d2f897
WC
2681 err = register_netdevice_notifier(&ip_mr_notifier);
2682 if (err)
2683 goto reg_notif_fail;
403dbb97
TG
2684#ifdef CONFIG_IP_PIMSM_V2
2685 if (inet_add_protocol(&pim_protocol, IPPROTO_PIM) < 0) {
058bd4d2 2686 pr_err("%s: can't add PIM protocol\n", __func__);
403dbb97
TG
2687 err = -EAGAIN;
2688 goto add_proto_fail;
2689 }
2690#endif
c7ac8679
GR
2691 rtnl_register(RTNL_FAMILY_IPMR, RTM_GETROUTE,
2692 NULL, ipmr_rtm_dumproute, NULL);
03d2f897 2693 return 0;
f6bb4514 2694
403dbb97
TG
2695#ifdef CONFIG_IP_PIMSM_V2
2696add_proto_fail:
2697 unregister_netdevice_notifier(&ip_mr_notifier);
2698#endif
c3e38896 2699reg_notif_fail:
cf958ae3
BT
2700 unregister_pernet_subsys(&ipmr_net_ops);
2701reg_pernet_fail:
c3e38896 2702 kmem_cache_destroy(mrt_cachep);
03d2f897 2703 return err;
1da177e4 2704}
This page took 1.099693 seconds and 5 git commands to generate.