Merge branch 'master' of git://git.kernel.org/pub/scm/linux/kernel/git/linville/wirel...
[linux-2.6/linux-acpi-2.6/ibm-acpi-2.6.git] / net / ipv4 / route.c
blobc1acf69858fd722e6a755c8bf029a56039605b67
1 /*
2 * INET An implementation of the TCP/IP protocol suite for the LINUX
3 * operating system. INET is implemented using the BSD Socket
4 * interface as the means of communication with the user level.
6 * ROUTE - implementation of the IP router.
8 * Authors: Ross Biro
9 * Fred N. van Kempen, <waltje@uWalt.NL.Mugnet.ORG>
10 * Alan Cox, <gw4pts@gw4pts.ampr.org>
11 * Linus Torvalds, <Linus.Torvalds@helsinki.fi>
12 * Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
14 * Fixes:
15 * Alan Cox : Verify area fixes.
16 * Alan Cox : cli() protects routing changes
17 * Rui Oliveira : ICMP routing table updates
18 * (rco@di.uminho.pt) Routing table insertion and update
19 * Linus Torvalds : Rewrote bits to be sensible
20 * Alan Cox : Added BSD route gw semantics
21 * Alan Cox : Super /proc >4K
22 * Alan Cox : MTU in route table
23 * Alan Cox : MSS actually. Also added the window
24 * clamper.
25 * Sam Lantinga : Fixed route matching in rt_del()
26 * Alan Cox : Routing cache support.
27 * Alan Cox : Removed compatibility cruft.
28 * Alan Cox : RTF_REJECT support.
29 * Alan Cox : TCP irtt support.
30 * Jonathan Naylor : Added Metric support.
31 * Miquel van Smoorenburg : BSD API fixes.
32 * Miquel van Smoorenburg : Metrics.
33 * Alan Cox : Use __u32 properly
34 * Alan Cox : Aligned routing errors more closely with BSD
35 * our system is still very different.
36 * Alan Cox : Faster /proc handling
37 * Alexey Kuznetsov : Massive rework to support tree based routing,
38 * routing caches and better behaviour.
40 * Olaf Erb : irtt wasn't being copied right.
41 * Bjorn Ekwall : Kerneld route support.
42 * Alan Cox : Multicast fixed (I hope)
43 * Pavel Krauz : Limited broadcast fixed
44 * Mike McLagan : Routing by source
45 * Alexey Kuznetsov : End of old history. Split to fib.c and
46 * route.c and rewritten from scratch.
47 * Andi Kleen : Load-limit warning messages.
48 * Vitaly E. Lavrov : Transparent proxy revived after year coma.
49 * Vitaly E. Lavrov : Race condition in ip_route_input_slow.
50 * Tobias Ringstrom : Uninitialized res.type in ip_route_output_slow.
51 * Vladimir V. Ivanov : IP rule info (flowid) is really useful.
52 * Marc Boucher : routing by fwmark
53 * Robert Olsson : Added rt_cache statistics
54 * Arnaldo C. Melo : Convert proc stuff to seq_file
55 * Eric Dumazet : hashed spinlocks and rt_check_expire() fixes.
56 * Ilia Sotnikov : Ignore TOS on PMTUD and Redirect
57 * Ilia Sotnikov : Removed TOS from hash calculations
59 * This program is free software; you can redistribute it and/or
60 * modify it under the terms of the GNU General Public License
61 * as published by the Free Software Foundation; either version
62 * 2 of the License, or (at your option) any later version.
65 #include <linux/module.h>
66 #include <asm/uaccess.h>
67 #include <asm/system.h>
68 #include <linux/bitops.h>
69 #include <linux/types.h>
70 #include <linux/kernel.h>
71 #include <linux/mm.h>
72 #include <linux/bootmem.h>
73 #include <linux/string.h>
74 #include <linux/socket.h>
75 #include <linux/sockios.h>
76 #include <linux/errno.h>
77 #include <linux/in.h>
78 #include <linux/inet.h>
79 #include <linux/netdevice.h>
80 #include <linux/proc_fs.h>
81 #include <linux/init.h>
82 #include <linux/workqueue.h>
83 #include <linux/skbuff.h>
84 #include <linux/inetdevice.h>
85 #include <linux/igmp.h>
86 #include <linux/pkt_sched.h>
87 #include <linux/mroute.h>
88 #include <linux/netfilter_ipv4.h>
89 #include <linux/random.h>
90 #include <linux/jhash.h>
91 #include <linux/rcupdate.h>
92 #include <linux/times.h>
93 #include <linux/slab.h>
94 #include <net/dst.h>
95 #include <net/net_namespace.h>
96 #include <net/protocol.h>
97 #include <net/ip.h>
98 #include <net/route.h>
99 #include <net/inetpeer.h>
100 #include <net/sock.h>
101 #include <net/ip_fib.h>
102 #include <net/arp.h>
103 #include <net/tcp.h>
104 #include <net/icmp.h>
105 #include <net/xfrm.h>
106 #include <net/netevent.h>
107 #include <net/rtnetlink.h>
108 #ifdef CONFIG_SYSCTL
109 #include <linux/sysctl.h>
110 #endif
112 #define RT_FL_TOS(oldflp4) \
113 ((u32)(oldflp4->flowi4_tos & (IPTOS_RT_MASK | RTO_ONLINK)))
115 #define IP_MAX_MTU 0xFFF0
117 #define RT_GC_TIMEOUT (300*HZ)
119 static int ip_rt_max_size;
120 static int ip_rt_gc_timeout __read_mostly = RT_GC_TIMEOUT;
121 static int ip_rt_gc_interval __read_mostly = 60 * HZ;
122 static int ip_rt_gc_min_interval __read_mostly = HZ / 2;
123 static int ip_rt_redirect_number __read_mostly = 9;
124 static int ip_rt_redirect_load __read_mostly = HZ / 50;
125 static int ip_rt_redirect_silence __read_mostly = ((HZ / 50) << (9 + 1));
126 static int ip_rt_error_cost __read_mostly = HZ;
127 static int ip_rt_error_burst __read_mostly = 5 * HZ;
128 static int ip_rt_gc_elasticity __read_mostly = 8;
129 static int ip_rt_mtu_expires __read_mostly = 10 * 60 * HZ;
130 static int ip_rt_min_pmtu __read_mostly = 512 + 20 + 20;
131 static int ip_rt_min_advmss __read_mostly = 256;
132 static int rt_chain_length_max __read_mostly = 20;
135 * Interface to generic destination cache.
138 static struct dst_entry *ipv4_dst_check(struct dst_entry *dst, u32 cookie);
139 static unsigned int ipv4_default_advmss(const struct dst_entry *dst);
140 static unsigned int ipv4_default_mtu(const struct dst_entry *dst);
141 static void ipv4_dst_destroy(struct dst_entry *dst);
142 static struct dst_entry *ipv4_negative_advice(struct dst_entry *dst);
143 static void ipv4_link_failure(struct sk_buff *skb);
144 static void ip_rt_update_pmtu(struct dst_entry *dst, u32 mtu);
145 static int rt_garbage_collect(struct dst_ops *ops);
147 static void ipv4_dst_ifdown(struct dst_entry *dst, struct net_device *dev,
148 int how)
152 static u32 *ipv4_cow_metrics(struct dst_entry *dst, unsigned long old)
154 struct rtable *rt = (struct rtable *) dst;
155 struct inet_peer *peer;
156 u32 *p = NULL;
158 if (!rt->peer)
159 rt_bind_peer(rt, 1);
161 peer = rt->peer;
162 if (peer) {
163 u32 *old_p = __DST_METRICS_PTR(old);
164 unsigned long prev, new;
166 p = peer->metrics;
167 if (inet_metrics_new(peer))
168 memcpy(p, old_p, sizeof(u32) * RTAX_MAX);
170 new = (unsigned long) p;
171 prev = cmpxchg(&dst->_metrics, old, new);
173 if (prev != old) {
174 p = __DST_METRICS_PTR(prev);
175 if (prev & DST_METRICS_READ_ONLY)
176 p = NULL;
177 } else {
178 if (rt->fi) {
179 fib_info_put(rt->fi);
180 rt->fi = NULL;
184 return p;
187 static struct dst_ops ipv4_dst_ops = {
188 .family = AF_INET,
189 .protocol = cpu_to_be16(ETH_P_IP),
190 .gc = rt_garbage_collect,
191 .check = ipv4_dst_check,
192 .default_advmss = ipv4_default_advmss,
193 .default_mtu = ipv4_default_mtu,
194 .cow_metrics = ipv4_cow_metrics,
195 .destroy = ipv4_dst_destroy,
196 .ifdown = ipv4_dst_ifdown,
197 .negative_advice = ipv4_negative_advice,
198 .link_failure = ipv4_link_failure,
199 .update_pmtu = ip_rt_update_pmtu,
200 .local_out = __ip_local_out,
203 #define ECN_OR_COST(class) TC_PRIO_##class
205 const __u8 ip_tos2prio[16] = {
206 TC_PRIO_BESTEFFORT,
207 ECN_OR_COST(BESTEFFORT),
208 TC_PRIO_BESTEFFORT,
209 ECN_OR_COST(BESTEFFORT),
210 TC_PRIO_BULK,
211 ECN_OR_COST(BULK),
212 TC_PRIO_BULK,
213 ECN_OR_COST(BULK),
214 TC_PRIO_INTERACTIVE,
215 ECN_OR_COST(INTERACTIVE),
216 TC_PRIO_INTERACTIVE,
217 ECN_OR_COST(INTERACTIVE),
218 TC_PRIO_INTERACTIVE_BULK,
219 ECN_OR_COST(INTERACTIVE_BULK),
220 TC_PRIO_INTERACTIVE_BULK,
221 ECN_OR_COST(INTERACTIVE_BULK)
226 * Route cache.
229 /* The locking scheme is rather straight forward:
231 * 1) Read-Copy Update protects the buckets of the central route hash.
232 * 2) Only writers remove entries, and they hold the lock
233 * as they look at rtable reference counts.
234 * 3) Only readers acquire references to rtable entries,
235 * they do so with atomic increments and with the
236 * lock held.
239 struct rt_hash_bucket {
240 struct rtable __rcu *chain;
243 #if defined(CONFIG_SMP) || defined(CONFIG_DEBUG_SPINLOCK) || \
244 defined(CONFIG_PROVE_LOCKING)
246 * Instead of using one spinlock for each rt_hash_bucket, we use a table of spinlocks
247 * The size of this table is a power of two and depends on the number of CPUS.
248 * (on lockdep we have a quite big spinlock_t, so keep the size down there)
250 #ifdef CONFIG_LOCKDEP
251 # define RT_HASH_LOCK_SZ 256
252 #else
253 # if NR_CPUS >= 32
254 # define RT_HASH_LOCK_SZ 4096
255 # elif NR_CPUS >= 16
256 # define RT_HASH_LOCK_SZ 2048
257 # elif NR_CPUS >= 8
258 # define RT_HASH_LOCK_SZ 1024
259 # elif NR_CPUS >= 4
260 # define RT_HASH_LOCK_SZ 512
261 # else
262 # define RT_HASH_LOCK_SZ 256
263 # endif
264 #endif
266 static spinlock_t *rt_hash_locks;
267 # define rt_hash_lock_addr(slot) &rt_hash_locks[(slot) & (RT_HASH_LOCK_SZ - 1)]
269 static __init void rt_hash_lock_init(void)
271 int i;
273 rt_hash_locks = kmalloc(sizeof(spinlock_t) * RT_HASH_LOCK_SZ,
274 GFP_KERNEL);
275 if (!rt_hash_locks)
276 panic("IP: failed to allocate rt_hash_locks\n");
278 for (i = 0; i < RT_HASH_LOCK_SZ; i++)
279 spin_lock_init(&rt_hash_locks[i]);
281 #else
282 # define rt_hash_lock_addr(slot) NULL
284 static inline void rt_hash_lock_init(void)
287 #endif
289 static struct rt_hash_bucket *rt_hash_table __read_mostly;
290 static unsigned rt_hash_mask __read_mostly;
291 static unsigned int rt_hash_log __read_mostly;
293 static DEFINE_PER_CPU(struct rt_cache_stat, rt_cache_stat);
294 #define RT_CACHE_STAT_INC(field) __this_cpu_inc(rt_cache_stat.field)
296 static inline unsigned int rt_hash(__be32 daddr, __be32 saddr, int idx,
297 int genid)
299 return jhash_3words((__force u32)daddr, (__force u32)saddr,
300 idx, genid)
301 & rt_hash_mask;
304 static inline int rt_genid(struct net *net)
306 return atomic_read(&net->ipv4.rt_genid);
309 #ifdef CONFIG_PROC_FS
310 struct rt_cache_iter_state {
311 struct seq_net_private p;
312 int bucket;
313 int genid;
316 static struct rtable *rt_cache_get_first(struct seq_file *seq)
318 struct rt_cache_iter_state *st = seq->private;
319 struct rtable *r = NULL;
321 for (st->bucket = rt_hash_mask; st->bucket >= 0; --st->bucket) {
322 if (!rcu_dereference_raw(rt_hash_table[st->bucket].chain))
323 continue;
324 rcu_read_lock_bh();
325 r = rcu_dereference_bh(rt_hash_table[st->bucket].chain);
326 while (r) {
327 if (dev_net(r->dst.dev) == seq_file_net(seq) &&
328 r->rt_genid == st->genid)
329 return r;
330 r = rcu_dereference_bh(r->dst.rt_next);
332 rcu_read_unlock_bh();
334 return r;
337 static struct rtable *__rt_cache_get_next(struct seq_file *seq,
338 struct rtable *r)
340 struct rt_cache_iter_state *st = seq->private;
342 r = rcu_dereference_bh(r->dst.rt_next);
343 while (!r) {
344 rcu_read_unlock_bh();
345 do {
346 if (--st->bucket < 0)
347 return NULL;
348 } while (!rcu_dereference_raw(rt_hash_table[st->bucket].chain));
349 rcu_read_lock_bh();
350 r = rcu_dereference_bh(rt_hash_table[st->bucket].chain);
352 return r;
355 static struct rtable *rt_cache_get_next(struct seq_file *seq,
356 struct rtable *r)
358 struct rt_cache_iter_state *st = seq->private;
359 while ((r = __rt_cache_get_next(seq, r)) != NULL) {
360 if (dev_net(r->dst.dev) != seq_file_net(seq))
361 continue;
362 if (r->rt_genid == st->genid)
363 break;
365 return r;
368 static struct rtable *rt_cache_get_idx(struct seq_file *seq, loff_t pos)
370 struct rtable *r = rt_cache_get_first(seq);
372 if (r)
373 while (pos && (r = rt_cache_get_next(seq, r)))
374 --pos;
375 return pos ? NULL : r;
378 static void *rt_cache_seq_start(struct seq_file *seq, loff_t *pos)
380 struct rt_cache_iter_state *st = seq->private;
381 if (*pos)
382 return rt_cache_get_idx(seq, *pos - 1);
383 st->genid = rt_genid(seq_file_net(seq));
384 return SEQ_START_TOKEN;
387 static void *rt_cache_seq_next(struct seq_file *seq, void *v, loff_t *pos)
389 struct rtable *r;
391 if (v == SEQ_START_TOKEN)
392 r = rt_cache_get_first(seq);
393 else
394 r = rt_cache_get_next(seq, v);
395 ++*pos;
396 return r;
399 static void rt_cache_seq_stop(struct seq_file *seq, void *v)
401 if (v && v != SEQ_START_TOKEN)
402 rcu_read_unlock_bh();
405 static int rt_cache_seq_show(struct seq_file *seq, void *v)
407 if (v == SEQ_START_TOKEN)
408 seq_printf(seq, "%-127s\n",
409 "Iface\tDestination\tGateway \tFlags\t\tRefCnt\tUse\t"
410 "Metric\tSource\t\tMTU\tWindow\tIRTT\tTOS\tHHRef\t"
411 "HHUptod\tSpecDst");
412 else {
413 struct rtable *r = v;
414 int len;
416 seq_printf(seq, "%s\t%08X\t%08X\t%8X\t%d\t%u\t%d\t"
417 "%08X\t%d\t%u\t%u\t%02X\t%d\t%1d\t%08X%n",
418 r->dst.dev ? r->dst.dev->name : "*",
419 (__force u32)r->rt_dst,
420 (__force u32)r->rt_gateway,
421 r->rt_flags, atomic_read(&r->dst.__refcnt),
422 r->dst.__use, 0, (__force u32)r->rt_src,
423 dst_metric_advmss(&r->dst) + 40,
424 dst_metric(&r->dst, RTAX_WINDOW),
425 (int)((dst_metric(&r->dst, RTAX_RTT) >> 3) +
426 dst_metric(&r->dst, RTAX_RTTVAR)),
427 r->rt_tos,
428 r->dst.hh ? atomic_read(&r->dst.hh->hh_refcnt) : -1,
429 r->dst.hh ? (r->dst.hh->hh_output ==
430 dev_queue_xmit) : 0,
431 r->rt_spec_dst, &len);
433 seq_printf(seq, "%*s\n", 127 - len, "");
435 return 0;
438 static const struct seq_operations rt_cache_seq_ops = {
439 .start = rt_cache_seq_start,
440 .next = rt_cache_seq_next,
441 .stop = rt_cache_seq_stop,
442 .show = rt_cache_seq_show,
445 static int rt_cache_seq_open(struct inode *inode, struct file *file)
447 return seq_open_net(inode, file, &rt_cache_seq_ops,
448 sizeof(struct rt_cache_iter_state));
451 static const struct file_operations rt_cache_seq_fops = {
452 .owner = THIS_MODULE,
453 .open = rt_cache_seq_open,
454 .read = seq_read,
455 .llseek = seq_lseek,
456 .release = seq_release_net,
460 static void *rt_cpu_seq_start(struct seq_file *seq, loff_t *pos)
462 int cpu;
464 if (*pos == 0)
465 return SEQ_START_TOKEN;
467 for (cpu = *pos-1; cpu < nr_cpu_ids; ++cpu) {
468 if (!cpu_possible(cpu))
469 continue;
470 *pos = cpu+1;
471 return &per_cpu(rt_cache_stat, cpu);
473 return NULL;
476 static void *rt_cpu_seq_next(struct seq_file *seq, void *v, loff_t *pos)
478 int cpu;
480 for (cpu = *pos; cpu < nr_cpu_ids; ++cpu) {
481 if (!cpu_possible(cpu))
482 continue;
483 *pos = cpu+1;
484 return &per_cpu(rt_cache_stat, cpu);
486 return NULL;
490 static void rt_cpu_seq_stop(struct seq_file *seq, void *v)
495 static int rt_cpu_seq_show(struct seq_file *seq, void *v)
497 struct rt_cache_stat *st = v;
499 if (v == SEQ_START_TOKEN) {
500 seq_printf(seq, "entries in_hit in_slow_tot in_slow_mc in_no_route in_brd in_martian_dst in_martian_src out_hit out_slow_tot out_slow_mc gc_total gc_ignored gc_goal_miss gc_dst_overflow in_hlist_search out_hlist_search\n");
501 return 0;
504 seq_printf(seq,"%08x %08x %08x %08x %08x %08x %08x %08x "
505 " %08x %08x %08x %08x %08x %08x %08x %08x %08x \n",
506 dst_entries_get_slow(&ipv4_dst_ops),
507 st->in_hit,
508 st->in_slow_tot,
509 st->in_slow_mc,
510 st->in_no_route,
511 st->in_brd,
512 st->in_martian_dst,
513 st->in_martian_src,
515 st->out_hit,
516 st->out_slow_tot,
517 st->out_slow_mc,
519 st->gc_total,
520 st->gc_ignored,
521 st->gc_goal_miss,
522 st->gc_dst_overflow,
523 st->in_hlist_search,
524 st->out_hlist_search
526 return 0;
529 static const struct seq_operations rt_cpu_seq_ops = {
530 .start = rt_cpu_seq_start,
531 .next = rt_cpu_seq_next,
532 .stop = rt_cpu_seq_stop,
533 .show = rt_cpu_seq_show,
537 static int rt_cpu_seq_open(struct inode *inode, struct file *file)
539 return seq_open(file, &rt_cpu_seq_ops);
542 static const struct file_operations rt_cpu_seq_fops = {
543 .owner = THIS_MODULE,
544 .open = rt_cpu_seq_open,
545 .read = seq_read,
546 .llseek = seq_lseek,
547 .release = seq_release,
550 #ifdef CONFIG_IP_ROUTE_CLASSID
551 static int rt_acct_proc_show(struct seq_file *m, void *v)
553 struct ip_rt_acct *dst, *src;
554 unsigned int i, j;
556 dst = kcalloc(256, sizeof(struct ip_rt_acct), GFP_KERNEL);
557 if (!dst)
558 return -ENOMEM;
560 for_each_possible_cpu(i) {
561 src = (struct ip_rt_acct *)per_cpu_ptr(ip_rt_acct, i);
562 for (j = 0; j < 256; j++) {
563 dst[j].o_bytes += src[j].o_bytes;
564 dst[j].o_packets += src[j].o_packets;
565 dst[j].i_bytes += src[j].i_bytes;
566 dst[j].i_packets += src[j].i_packets;
570 seq_write(m, dst, 256 * sizeof(struct ip_rt_acct));
571 kfree(dst);
572 return 0;
575 static int rt_acct_proc_open(struct inode *inode, struct file *file)
577 return single_open(file, rt_acct_proc_show, NULL);
580 static const struct file_operations rt_acct_proc_fops = {
581 .owner = THIS_MODULE,
582 .open = rt_acct_proc_open,
583 .read = seq_read,
584 .llseek = seq_lseek,
585 .release = single_release,
587 #endif
589 static int __net_init ip_rt_do_proc_init(struct net *net)
591 struct proc_dir_entry *pde;
593 pde = proc_net_fops_create(net, "rt_cache", S_IRUGO,
594 &rt_cache_seq_fops);
595 if (!pde)
596 goto err1;
598 pde = proc_create("rt_cache", S_IRUGO,
599 net->proc_net_stat, &rt_cpu_seq_fops);
600 if (!pde)
601 goto err2;
603 #ifdef CONFIG_IP_ROUTE_CLASSID
604 pde = proc_create("rt_acct", 0, net->proc_net, &rt_acct_proc_fops);
605 if (!pde)
606 goto err3;
607 #endif
608 return 0;
610 #ifdef CONFIG_IP_ROUTE_CLASSID
611 err3:
612 remove_proc_entry("rt_cache", net->proc_net_stat);
613 #endif
614 err2:
615 remove_proc_entry("rt_cache", net->proc_net);
616 err1:
617 return -ENOMEM;
620 static void __net_exit ip_rt_do_proc_exit(struct net *net)
622 remove_proc_entry("rt_cache", net->proc_net_stat);
623 remove_proc_entry("rt_cache", net->proc_net);
624 #ifdef CONFIG_IP_ROUTE_CLASSID
625 remove_proc_entry("rt_acct", net->proc_net);
626 #endif
629 static struct pernet_operations ip_rt_proc_ops __net_initdata = {
630 .init = ip_rt_do_proc_init,
631 .exit = ip_rt_do_proc_exit,
634 static int __init ip_rt_proc_init(void)
636 return register_pernet_subsys(&ip_rt_proc_ops);
639 #else
640 static inline int ip_rt_proc_init(void)
642 return 0;
644 #endif /* CONFIG_PROC_FS */
646 static inline void rt_free(struct rtable *rt)
648 call_rcu_bh(&rt->dst.rcu_head, dst_rcu_free);
651 static inline void rt_drop(struct rtable *rt)
653 ip_rt_put(rt);
654 call_rcu_bh(&rt->dst.rcu_head, dst_rcu_free);
657 static inline int rt_fast_clean(struct rtable *rth)
659 /* Kill broadcast/multicast entries very aggresively, if they
660 collide in hash table with more useful entries */
661 return (rth->rt_flags & (RTCF_BROADCAST | RTCF_MULTICAST)) &&
662 rt_is_input_route(rth) && rth->dst.rt_next;
665 static inline int rt_valuable(struct rtable *rth)
667 return (rth->rt_flags & (RTCF_REDIRECTED | RTCF_NOTIFY)) ||
668 (rth->peer && rth->peer->pmtu_expires);
671 static int rt_may_expire(struct rtable *rth, unsigned long tmo1, unsigned long tmo2)
673 unsigned long age;
674 int ret = 0;
676 if (atomic_read(&rth->dst.__refcnt))
677 goto out;
679 age = jiffies - rth->dst.lastuse;
680 if ((age <= tmo1 && !rt_fast_clean(rth)) ||
681 (age <= tmo2 && rt_valuable(rth)))
682 goto out;
683 ret = 1;
684 out: return ret;
687 /* Bits of score are:
688 * 31: very valuable
689 * 30: not quite useless
690 * 29..0: usage counter
692 static inline u32 rt_score(struct rtable *rt)
694 u32 score = jiffies - rt->dst.lastuse;
696 score = ~score & ~(3<<30);
698 if (rt_valuable(rt))
699 score |= (1<<31);
701 if (rt_is_output_route(rt) ||
702 !(rt->rt_flags & (RTCF_BROADCAST|RTCF_MULTICAST|RTCF_LOCAL)))
703 score |= (1<<30);
705 return score;
708 static inline bool rt_caching(const struct net *net)
710 return net->ipv4.current_rt_cache_rebuild_count <=
711 net->ipv4.sysctl_rt_cache_rebuild_count;
714 static inline bool compare_hash_inputs(const struct rtable *rt1,
715 const struct rtable *rt2)
717 return ((((__force u32)rt1->rt_key_dst ^ (__force u32)rt2->rt_key_dst) |
718 ((__force u32)rt1->rt_key_src ^ (__force u32)rt2->rt_key_src) |
719 (rt1->rt_iif ^ rt2->rt_iif)) == 0);
722 static inline int compare_keys(struct rtable *rt1, struct rtable *rt2)
724 return (((__force u32)rt1->rt_key_dst ^ (__force u32)rt2->rt_key_dst) |
725 ((__force u32)rt1->rt_key_src ^ (__force u32)rt2->rt_key_src) |
726 (rt1->rt_mark ^ rt2->rt_mark) |
727 (rt1->rt_tos ^ rt2->rt_tos) |
728 (rt1->rt_oif ^ rt2->rt_oif) |
729 (rt1->rt_iif ^ rt2->rt_iif)) == 0;
732 static inline int compare_netns(struct rtable *rt1, struct rtable *rt2)
734 return net_eq(dev_net(rt1->dst.dev), dev_net(rt2->dst.dev));
737 static inline int rt_is_expired(struct rtable *rth)
739 return rth->rt_genid != rt_genid(dev_net(rth->dst.dev));
743 * Perform a full scan of hash table and free all entries.
744 * Can be called by a softirq or a process.
745 * In the later case, we want to be reschedule if necessary
747 static void rt_do_flush(struct net *net, int process_context)
749 unsigned int i;
750 struct rtable *rth, *next;
752 for (i = 0; i <= rt_hash_mask; i++) {
753 struct rtable __rcu **pprev;
754 struct rtable *list;
756 if (process_context && need_resched())
757 cond_resched();
758 rth = rcu_dereference_raw(rt_hash_table[i].chain);
759 if (!rth)
760 continue;
762 spin_lock_bh(rt_hash_lock_addr(i));
764 list = NULL;
765 pprev = &rt_hash_table[i].chain;
766 rth = rcu_dereference_protected(*pprev,
767 lockdep_is_held(rt_hash_lock_addr(i)));
769 while (rth) {
770 next = rcu_dereference_protected(rth->dst.rt_next,
771 lockdep_is_held(rt_hash_lock_addr(i)));
773 if (!net ||
774 net_eq(dev_net(rth->dst.dev), net)) {
775 rcu_assign_pointer(*pprev, next);
776 rcu_assign_pointer(rth->dst.rt_next, list);
777 list = rth;
778 } else {
779 pprev = &rth->dst.rt_next;
781 rth = next;
784 spin_unlock_bh(rt_hash_lock_addr(i));
786 for (; list; list = next) {
787 next = rcu_dereference_protected(list->dst.rt_next, 1);
788 rt_free(list);
794 * While freeing expired entries, we compute average chain length
795 * and standard deviation, using fixed-point arithmetic.
796 * This to have an estimation of rt_chain_length_max
797 * rt_chain_length_max = max(elasticity, AVG + 4*SD)
798 * We use 3 bits for frational part, and 29 (or 61) for magnitude.
801 #define FRACT_BITS 3
802 #define ONE (1UL << FRACT_BITS)
805 * Given a hash chain and an item in this hash chain,
806 * find if a previous entry has the same hash_inputs
807 * (but differs on tos, mark or oif)
808 * Returns 0 if an alias is found.
809 * Returns ONE if rth has no alias before itself.
811 static int has_noalias(const struct rtable *head, const struct rtable *rth)
813 const struct rtable *aux = head;
815 while (aux != rth) {
816 if (compare_hash_inputs(aux, rth))
817 return 0;
818 aux = rcu_dereference_protected(aux->dst.rt_next, 1);
820 return ONE;
824 * Perturbation of rt_genid by a small quantity [1..256]
825 * Using 8 bits of shuffling ensure we can call rt_cache_invalidate()
826 * many times (2^24) without giving recent rt_genid.
827 * Jenkins hash is strong enough that litle changes of rt_genid are OK.
829 static void rt_cache_invalidate(struct net *net)
831 unsigned char shuffle;
833 get_random_bytes(&shuffle, sizeof(shuffle));
834 atomic_add(shuffle + 1U, &net->ipv4.rt_genid);
838 * delay < 0 : invalidate cache (fast : entries will be deleted later)
839 * delay >= 0 : invalidate & flush cache (can be long)
841 void rt_cache_flush(struct net *net, int delay)
843 rt_cache_invalidate(net);
844 if (delay >= 0)
845 rt_do_flush(net, !in_softirq());
848 /* Flush previous cache invalidated entries from the cache */
849 void rt_cache_flush_batch(struct net *net)
851 rt_do_flush(net, !in_softirq());
854 static void rt_emergency_hash_rebuild(struct net *net)
856 if (net_ratelimit())
857 printk(KERN_WARNING "Route hash chain too long!\n");
858 rt_cache_invalidate(net);
862 Short description of GC goals.
864 We want to build algorithm, which will keep routing cache
865 at some equilibrium point, when number of aged off entries
866 is kept approximately equal to newly generated ones.
868 Current expiration strength is variable "expire".
869 We try to adjust it dynamically, so that if networking
870 is idle expires is large enough to keep enough of warm entries,
871 and when load increases it reduces to limit cache size.
874 static int rt_garbage_collect(struct dst_ops *ops)
876 static unsigned long expire = RT_GC_TIMEOUT;
877 static unsigned long last_gc;
878 static int rover;
879 static int equilibrium;
880 struct rtable *rth;
881 struct rtable __rcu **rthp;
882 unsigned long now = jiffies;
883 int goal;
884 int entries = dst_entries_get_fast(&ipv4_dst_ops);
887 * Garbage collection is pretty expensive,
888 * do not make it too frequently.
891 RT_CACHE_STAT_INC(gc_total);
893 if (now - last_gc < ip_rt_gc_min_interval &&
894 entries < ip_rt_max_size) {
895 RT_CACHE_STAT_INC(gc_ignored);
896 goto out;
899 entries = dst_entries_get_slow(&ipv4_dst_ops);
900 /* Calculate number of entries, which we want to expire now. */
901 goal = entries - (ip_rt_gc_elasticity << rt_hash_log);
902 if (goal <= 0) {
903 if (equilibrium < ipv4_dst_ops.gc_thresh)
904 equilibrium = ipv4_dst_ops.gc_thresh;
905 goal = entries - equilibrium;
906 if (goal > 0) {
907 equilibrium += min_t(unsigned int, goal >> 1, rt_hash_mask + 1);
908 goal = entries - equilibrium;
910 } else {
911 /* We are in dangerous area. Try to reduce cache really
912 * aggressively.
914 goal = max_t(unsigned int, goal >> 1, rt_hash_mask + 1);
915 equilibrium = entries - goal;
918 if (now - last_gc >= ip_rt_gc_min_interval)
919 last_gc = now;
921 if (goal <= 0) {
922 equilibrium += goal;
923 goto work_done;
926 do {
927 int i, k;
929 for (i = rt_hash_mask, k = rover; i >= 0; i--) {
930 unsigned long tmo = expire;
932 k = (k + 1) & rt_hash_mask;
933 rthp = &rt_hash_table[k].chain;
934 spin_lock_bh(rt_hash_lock_addr(k));
935 while ((rth = rcu_dereference_protected(*rthp,
936 lockdep_is_held(rt_hash_lock_addr(k)))) != NULL) {
937 if (!rt_is_expired(rth) &&
938 !rt_may_expire(rth, tmo, expire)) {
939 tmo >>= 1;
940 rthp = &rth->dst.rt_next;
941 continue;
943 *rthp = rth->dst.rt_next;
944 rt_free(rth);
945 goal--;
947 spin_unlock_bh(rt_hash_lock_addr(k));
948 if (goal <= 0)
949 break;
951 rover = k;
953 if (goal <= 0)
954 goto work_done;
956 /* Goal is not achieved. We stop process if:
958 - if expire reduced to zero. Otherwise, expire is halfed.
959 - if table is not full.
960 - if we are called from interrupt.
961 - jiffies check is just fallback/debug loop breaker.
962 We will not spin here for long time in any case.
965 RT_CACHE_STAT_INC(gc_goal_miss);
967 if (expire == 0)
968 break;
970 expire >>= 1;
971 #if RT_CACHE_DEBUG >= 2
972 printk(KERN_DEBUG "expire>> %u %d %d %d\n", expire,
973 dst_entries_get_fast(&ipv4_dst_ops), goal, i);
974 #endif
976 if (dst_entries_get_fast(&ipv4_dst_ops) < ip_rt_max_size)
977 goto out;
978 } while (!in_softirq() && time_before_eq(jiffies, now));
980 if (dst_entries_get_fast(&ipv4_dst_ops) < ip_rt_max_size)
981 goto out;
982 if (dst_entries_get_slow(&ipv4_dst_ops) < ip_rt_max_size)
983 goto out;
984 if (net_ratelimit())
985 printk(KERN_WARNING "dst cache overflow\n");
986 RT_CACHE_STAT_INC(gc_dst_overflow);
987 return 1;
989 work_done:
990 expire += ip_rt_gc_min_interval;
991 if (expire > ip_rt_gc_timeout ||
992 dst_entries_get_fast(&ipv4_dst_ops) < ipv4_dst_ops.gc_thresh ||
993 dst_entries_get_slow(&ipv4_dst_ops) < ipv4_dst_ops.gc_thresh)
994 expire = ip_rt_gc_timeout;
995 #if RT_CACHE_DEBUG >= 2
996 printk(KERN_DEBUG "expire++ %u %d %d %d\n", expire,
997 dst_entries_get_fast(&ipv4_dst_ops), goal, rover);
998 #endif
999 out: return 0;
1003 * Returns number of entries in a hash chain that have different hash_inputs
1005 static int slow_chain_length(const struct rtable *head)
1007 int length = 0;
1008 const struct rtable *rth = head;
1010 while (rth) {
1011 length += has_noalias(head, rth);
1012 rth = rcu_dereference_protected(rth->dst.rt_next, 1);
1014 return length >> FRACT_BITS;
1017 static struct rtable *rt_intern_hash(unsigned hash, struct rtable *rt,
1018 struct sk_buff *skb, int ifindex)
1020 struct rtable *rth, *cand;
1021 struct rtable __rcu **rthp, **candp;
1022 unsigned long now;
1023 u32 min_score;
1024 int chain_length;
1025 int attempts = !in_softirq();
1027 restart:
1028 chain_length = 0;
1029 min_score = ~(u32)0;
1030 cand = NULL;
1031 candp = NULL;
1032 now = jiffies;
1034 if (!rt_caching(dev_net(rt->dst.dev))) {
1036 * If we're not caching, just tell the caller we
1037 * were successful and don't touch the route. The
1038 * caller hold the sole reference to the cache entry, and
1039 * it will be released when the caller is done with it.
1040 * If we drop it here, the callers have no way to resolve routes
1041 * when we're not caching. Instead, just point *rp at rt, so
1042 * the caller gets a single use out of the route
1043 * Note that we do rt_free on this new route entry, so that
1044 * once its refcount hits zero, we are still able to reap it
1045 * (Thanks Alexey)
1046 * Note: To avoid expensive rcu stuff for this uncached dst,
1047 * we set DST_NOCACHE so that dst_release() can free dst without
1048 * waiting a grace period.
1051 rt->dst.flags |= DST_NOCACHE;
1052 if (rt->rt_type == RTN_UNICAST || rt_is_output_route(rt)) {
1053 int err = arp_bind_neighbour(&rt->dst);
1054 if (err) {
1055 if (net_ratelimit())
1056 printk(KERN_WARNING
1057 "Neighbour table failure & not caching routes.\n");
1058 ip_rt_put(rt);
1059 return ERR_PTR(err);
1063 goto skip_hashing;
1066 rthp = &rt_hash_table[hash].chain;
1068 spin_lock_bh(rt_hash_lock_addr(hash));
1069 while ((rth = rcu_dereference_protected(*rthp,
1070 lockdep_is_held(rt_hash_lock_addr(hash)))) != NULL) {
1071 if (rt_is_expired(rth)) {
1072 *rthp = rth->dst.rt_next;
1073 rt_free(rth);
1074 continue;
1076 if (compare_keys(rth, rt) && compare_netns(rth, rt)) {
1077 /* Put it first */
1078 *rthp = rth->dst.rt_next;
1080 * Since lookup is lockfree, the deletion
1081 * must be visible to another weakly ordered CPU before
1082 * the insertion at the start of the hash chain.
1084 rcu_assign_pointer(rth->dst.rt_next,
1085 rt_hash_table[hash].chain);
1087 * Since lookup is lockfree, the update writes
1088 * must be ordered for consistency on SMP.
1090 rcu_assign_pointer(rt_hash_table[hash].chain, rth);
1092 dst_use(&rth->dst, now);
1093 spin_unlock_bh(rt_hash_lock_addr(hash));
1095 rt_drop(rt);
1096 if (skb)
1097 skb_dst_set(skb, &rth->dst);
1098 return rth;
1101 if (!atomic_read(&rth->dst.__refcnt)) {
1102 u32 score = rt_score(rth);
1104 if (score <= min_score) {
1105 cand = rth;
1106 candp = rthp;
1107 min_score = score;
1111 chain_length++;
1113 rthp = &rth->dst.rt_next;
1116 if (cand) {
1117 /* ip_rt_gc_elasticity used to be average length of chain
1118 * length, when exceeded gc becomes really aggressive.
1120 * The second limit is less certain. At the moment it allows
1121 * only 2 entries per bucket. We will see.
1123 if (chain_length > ip_rt_gc_elasticity) {
1124 *candp = cand->dst.rt_next;
1125 rt_free(cand);
1127 } else {
1128 if (chain_length > rt_chain_length_max &&
1129 slow_chain_length(rt_hash_table[hash].chain) > rt_chain_length_max) {
1130 struct net *net = dev_net(rt->dst.dev);
1131 int num = ++net->ipv4.current_rt_cache_rebuild_count;
1132 if (!rt_caching(net)) {
1133 printk(KERN_WARNING "%s: %d rebuilds is over limit, route caching disabled\n",
1134 rt->dst.dev->name, num);
1136 rt_emergency_hash_rebuild(net);
1137 spin_unlock_bh(rt_hash_lock_addr(hash));
1139 hash = rt_hash(rt->rt_key_dst, rt->rt_key_src,
1140 ifindex, rt_genid(net));
1141 goto restart;
1145 /* Try to bind route to arp only if it is output
1146 route or unicast forwarding path.
1148 if (rt->rt_type == RTN_UNICAST || rt_is_output_route(rt)) {
1149 int err = arp_bind_neighbour(&rt->dst);
1150 if (err) {
1151 spin_unlock_bh(rt_hash_lock_addr(hash));
1153 if (err != -ENOBUFS) {
1154 rt_drop(rt);
1155 return ERR_PTR(err);
1158 /* Neighbour tables are full and nothing
1159 can be released. Try to shrink route cache,
1160 it is most likely it holds some neighbour records.
1162 if (attempts-- > 0) {
1163 int saved_elasticity = ip_rt_gc_elasticity;
1164 int saved_int = ip_rt_gc_min_interval;
1165 ip_rt_gc_elasticity = 1;
1166 ip_rt_gc_min_interval = 0;
1167 rt_garbage_collect(&ipv4_dst_ops);
1168 ip_rt_gc_min_interval = saved_int;
1169 ip_rt_gc_elasticity = saved_elasticity;
1170 goto restart;
1173 if (net_ratelimit())
1174 printk(KERN_WARNING "ipv4: Neighbour table overflow.\n");
1175 rt_drop(rt);
1176 return ERR_PTR(-ENOBUFS);
1180 rt->dst.rt_next = rt_hash_table[hash].chain;
1182 #if RT_CACHE_DEBUG >= 2
1183 if (rt->dst.rt_next) {
1184 struct rtable *trt;
1185 printk(KERN_DEBUG "rt_cache @%02x: %pI4",
1186 hash, &rt->rt_dst);
1187 for (trt = rt->dst.rt_next; trt; trt = trt->dst.rt_next)
1188 printk(" . %pI4", &trt->rt_dst);
1189 printk("\n");
1191 #endif
1193 * Since lookup is lockfree, we must make sure
1194 * previous writes to rt are committed to memory
1195 * before making rt visible to other CPUS.
1197 rcu_assign_pointer(rt_hash_table[hash].chain, rt);
1199 spin_unlock_bh(rt_hash_lock_addr(hash));
1201 skip_hashing:
1202 if (skb)
1203 skb_dst_set(skb, &rt->dst);
1204 return rt;
1207 static atomic_t __rt_peer_genid = ATOMIC_INIT(0);
1209 static u32 rt_peer_genid(void)
1211 return atomic_read(&__rt_peer_genid);
1214 void rt_bind_peer(struct rtable *rt, int create)
1216 struct inet_peer *peer;
1218 peer = inet_getpeer_v4(rt->rt_dst, create);
1220 if (peer && cmpxchg(&rt->peer, NULL, peer) != NULL)
1221 inet_putpeer(peer);
1222 else
1223 rt->rt_peer_genid = rt_peer_genid();
1227 * Peer allocation may fail only in serious out-of-memory conditions. However
1228 * we still can generate some output.
1229 * Random ID selection looks a bit dangerous because we have no chances to
1230 * select ID being unique in a reasonable period of time.
1231 * But broken packet identifier may be better than no packet at all.
1233 static void ip_select_fb_ident(struct iphdr *iph)
1235 static DEFINE_SPINLOCK(ip_fb_id_lock);
1236 static u32 ip_fallback_id;
1237 u32 salt;
1239 spin_lock_bh(&ip_fb_id_lock);
1240 salt = secure_ip_id((__force __be32)ip_fallback_id ^ iph->daddr);
1241 iph->id = htons(salt & 0xFFFF);
1242 ip_fallback_id = salt;
1243 spin_unlock_bh(&ip_fb_id_lock);
1246 void __ip_select_ident(struct iphdr *iph, struct dst_entry *dst, int more)
1248 struct rtable *rt = (struct rtable *) dst;
1250 if (rt) {
1251 if (rt->peer == NULL)
1252 rt_bind_peer(rt, 1);
1254 /* If peer is attached to destination, it is never detached,
1255 so that we need not to grab a lock to dereference it.
1257 if (rt->peer) {
1258 iph->id = htons(inet_getid(rt->peer, more));
1259 return;
1261 } else
1262 printk(KERN_DEBUG "rt_bind_peer(0) @%p\n",
1263 __builtin_return_address(0));
1265 ip_select_fb_ident(iph);
1267 EXPORT_SYMBOL(__ip_select_ident);
1269 static void rt_del(unsigned hash, struct rtable *rt)
1271 struct rtable __rcu **rthp;
1272 struct rtable *aux;
1274 rthp = &rt_hash_table[hash].chain;
1275 spin_lock_bh(rt_hash_lock_addr(hash));
1276 ip_rt_put(rt);
1277 while ((aux = rcu_dereference_protected(*rthp,
1278 lockdep_is_held(rt_hash_lock_addr(hash)))) != NULL) {
1279 if (aux == rt || rt_is_expired(aux)) {
1280 *rthp = aux->dst.rt_next;
1281 rt_free(aux);
1282 continue;
1284 rthp = &aux->dst.rt_next;
1286 spin_unlock_bh(rt_hash_lock_addr(hash));
1289 /* called in rcu_read_lock() section */
1290 void ip_rt_redirect(__be32 old_gw, __be32 daddr, __be32 new_gw,
1291 __be32 saddr, struct net_device *dev)
1293 struct in_device *in_dev = __in_dev_get_rcu(dev);
1294 struct inet_peer *peer;
1295 struct net *net;
1297 if (!in_dev)
1298 return;
1300 net = dev_net(dev);
1301 if (new_gw == old_gw || !IN_DEV_RX_REDIRECTS(in_dev) ||
1302 ipv4_is_multicast(new_gw) || ipv4_is_lbcast(new_gw) ||
1303 ipv4_is_zeronet(new_gw))
1304 goto reject_redirect;
1306 if (!IN_DEV_SHARED_MEDIA(in_dev)) {
1307 if (!inet_addr_onlink(in_dev, new_gw, old_gw))
1308 goto reject_redirect;
1309 if (IN_DEV_SEC_REDIRECTS(in_dev) && ip_fib_check_default(new_gw, dev))
1310 goto reject_redirect;
1311 } else {
1312 if (inet_addr_type(net, new_gw) != RTN_UNICAST)
1313 goto reject_redirect;
1316 peer = inet_getpeer_v4(daddr, 1);
1317 if (peer) {
1318 peer->redirect_learned.a4 = new_gw;
1320 inet_putpeer(peer);
1322 atomic_inc(&__rt_peer_genid);
1324 return;
1326 reject_redirect:
1327 #ifdef CONFIG_IP_ROUTE_VERBOSE
1328 if (IN_DEV_LOG_MARTIANS(in_dev) && net_ratelimit())
1329 printk(KERN_INFO "Redirect from %pI4 on %s about %pI4 ignored.\n"
1330 " Advised path = %pI4 -> %pI4\n",
1331 &old_gw, dev->name, &new_gw,
1332 &saddr, &daddr);
1333 #endif
1337 static struct dst_entry *ipv4_negative_advice(struct dst_entry *dst)
1339 struct rtable *rt = (struct rtable *)dst;
1340 struct dst_entry *ret = dst;
1342 if (rt) {
1343 if (dst->obsolete > 0) {
1344 ip_rt_put(rt);
1345 ret = NULL;
1346 } else if (rt->rt_flags & RTCF_REDIRECTED) {
1347 unsigned hash = rt_hash(rt->rt_key_dst, rt->rt_key_src,
1348 rt->rt_oif,
1349 rt_genid(dev_net(dst->dev)));
1350 #if RT_CACHE_DEBUG >= 1
1351 printk(KERN_DEBUG "ipv4_negative_advice: redirect to %pI4/%02x dropped\n",
1352 &rt->rt_dst, rt->rt_tos);
1353 #endif
1354 rt_del(hash, rt);
1355 ret = NULL;
1356 } else if (rt->peer &&
1357 rt->peer->pmtu_expires &&
1358 time_after_eq(jiffies, rt->peer->pmtu_expires)) {
1359 unsigned long orig = rt->peer->pmtu_expires;
1361 if (cmpxchg(&rt->peer->pmtu_expires, orig, 0) == orig)
1362 dst_metric_set(dst, RTAX_MTU,
1363 rt->peer->pmtu_orig);
1366 return ret;
1370 * Algorithm:
1371 * 1. The first ip_rt_redirect_number redirects are sent
1372 * with exponential backoff, then we stop sending them at all,
1373 * assuming that the host ignores our redirects.
1374 * 2. If we did not see packets requiring redirects
1375 * during ip_rt_redirect_silence, we assume that the host
1376 * forgot redirected route and start to send redirects again.
1378 * This algorithm is much cheaper and more intelligent than dumb load limiting
1379 * in icmp.c.
1381 * NOTE. Do not forget to inhibit load limiting for redirects (redundant)
1382 * and "frag. need" (breaks PMTU discovery) in icmp.c.
1385 void ip_rt_send_redirect(struct sk_buff *skb)
1387 struct rtable *rt = skb_rtable(skb);
1388 struct in_device *in_dev;
1389 struct inet_peer *peer;
1390 int log_martians;
1392 rcu_read_lock();
1393 in_dev = __in_dev_get_rcu(rt->dst.dev);
1394 if (!in_dev || !IN_DEV_TX_REDIRECTS(in_dev)) {
1395 rcu_read_unlock();
1396 return;
1398 log_martians = IN_DEV_LOG_MARTIANS(in_dev);
1399 rcu_read_unlock();
1401 if (!rt->peer)
1402 rt_bind_peer(rt, 1);
1403 peer = rt->peer;
1404 if (!peer) {
1405 icmp_send(skb, ICMP_REDIRECT, ICMP_REDIR_HOST, rt->rt_gateway);
1406 return;
1409 /* No redirected packets during ip_rt_redirect_silence;
1410 * reset the algorithm.
1412 if (time_after(jiffies, peer->rate_last + ip_rt_redirect_silence))
1413 peer->rate_tokens = 0;
1415 /* Too many ignored redirects; do not send anything
1416 * set dst.rate_last to the last seen redirected packet.
1418 if (peer->rate_tokens >= ip_rt_redirect_number) {
1419 peer->rate_last = jiffies;
1420 return;
1423 /* Check for load limit; set rate_last to the latest sent
1424 * redirect.
1426 if (peer->rate_tokens == 0 ||
1427 time_after(jiffies,
1428 (peer->rate_last +
1429 (ip_rt_redirect_load << peer->rate_tokens)))) {
1430 icmp_send(skb, ICMP_REDIRECT, ICMP_REDIR_HOST, rt->rt_gateway);
1431 peer->rate_last = jiffies;
1432 ++peer->rate_tokens;
1433 #ifdef CONFIG_IP_ROUTE_VERBOSE
1434 if (log_martians &&
1435 peer->rate_tokens == ip_rt_redirect_number &&
1436 net_ratelimit())
1437 printk(KERN_WARNING "host %pI4/if%d ignores redirects for %pI4 to %pI4.\n",
1438 &rt->rt_src, rt->rt_iif,
1439 &rt->rt_dst, &rt->rt_gateway);
1440 #endif
1444 static int ip_error(struct sk_buff *skb)
1446 struct rtable *rt = skb_rtable(skb);
1447 struct inet_peer *peer;
1448 unsigned long now;
1449 bool send;
1450 int code;
1452 switch (rt->dst.error) {
1453 case EINVAL:
1454 default:
1455 goto out;
1456 case EHOSTUNREACH:
1457 code = ICMP_HOST_UNREACH;
1458 break;
1459 case ENETUNREACH:
1460 code = ICMP_NET_UNREACH;
1461 IP_INC_STATS_BH(dev_net(rt->dst.dev),
1462 IPSTATS_MIB_INNOROUTES);
1463 break;
1464 case EACCES:
1465 code = ICMP_PKT_FILTERED;
1466 break;
1469 if (!rt->peer)
1470 rt_bind_peer(rt, 1);
1471 peer = rt->peer;
1473 send = true;
1474 if (peer) {
1475 now = jiffies;
1476 peer->rate_tokens += now - peer->rate_last;
1477 if (peer->rate_tokens > ip_rt_error_burst)
1478 peer->rate_tokens = ip_rt_error_burst;
1479 peer->rate_last = now;
1480 if (peer->rate_tokens >= ip_rt_error_cost)
1481 peer->rate_tokens -= ip_rt_error_cost;
1482 else
1483 send = false;
1485 if (send)
1486 icmp_send(skb, ICMP_DEST_UNREACH, code, 0);
1488 out: kfree_skb(skb);
1489 return 0;
1493 * The last two values are not from the RFC but
1494 * are needed for AMPRnet AX.25 paths.
1497 static const unsigned short mtu_plateau[] =
1498 {32000, 17914, 8166, 4352, 2002, 1492, 576, 296, 216, 128 };
1500 static inline unsigned short guess_mtu(unsigned short old_mtu)
1502 int i;
1504 for (i = 0; i < ARRAY_SIZE(mtu_plateau); i++)
1505 if (old_mtu > mtu_plateau[i])
1506 return mtu_plateau[i];
1507 return 68;
1510 unsigned short ip_rt_frag_needed(struct net *net, struct iphdr *iph,
1511 unsigned short new_mtu,
1512 struct net_device *dev)
1514 unsigned short old_mtu = ntohs(iph->tot_len);
1515 unsigned short est_mtu = 0;
1516 struct inet_peer *peer;
1518 peer = inet_getpeer_v4(iph->daddr, 1);
1519 if (peer) {
1520 unsigned short mtu = new_mtu;
1522 if (new_mtu < 68 || new_mtu >= old_mtu) {
1523 /* BSD 4.2 derived systems incorrectly adjust
1524 * tot_len by the IP header length, and report
1525 * a zero MTU in the ICMP message.
1527 if (mtu == 0 &&
1528 old_mtu >= 68 + (iph->ihl << 2))
1529 old_mtu -= iph->ihl << 2;
1530 mtu = guess_mtu(old_mtu);
1533 if (mtu < ip_rt_min_pmtu)
1534 mtu = ip_rt_min_pmtu;
1535 if (!peer->pmtu_expires || mtu < peer->pmtu_learned) {
1536 unsigned long pmtu_expires;
1538 pmtu_expires = jiffies + ip_rt_mtu_expires;
1539 if (!pmtu_expires)
1540 pmtu_expires = 1UL;
1542 est_mtu = mtu;
1543 peer->pmtu_learned = mtu;
1544 peer->pmtu_expires = pmtu_expires;
1547 inet_putpeer(peer);
1549 atomic_inc(&__rt_peer_genid);
1551 return est_mtu ? : new_mtu;
1554 static void check_peer_pmtu(struct dst_entry *dst, struct inet_peer *peer)
1556 unsigned long expires = peer->pmtu_expires;
1558 if (time_before(jiffies, expires)) {
1559 u32 orig_dst_mtu = dst_mtu(dst);
1560 if (peer->pmtu_learned < orig_dst_mtu) {
1561 if (!peer->pmtu_orig)
1562 peer->pmtu_orig = dst_metric_raw(dst, RTAX_MTU);
1563 dst_metric_set(dst, RTAX_MTU, peer->pmtu_learned);
1565 } else if (cmpxchg(&peer->pmtu_expires, expires, 0) == expires)
1566 dst_metric_set(dst, RTAX_MTU, peer->pmtu_orig);
1569 static void ip_rt_update_pmtu(struct dst_entry *dst, u32 mtu)
1571 struct rtable *rt = (struct rtable *) dst;
1572 struct inet_peer *peer;
1574 dst_confirm(dst);
1576 if (!rt->peer)
1577 rt_bind_peer(rt, 1);
1578 peer = rt->peer;
1579 if (peer) {
1580 if (mtu < ip_rt_min_pmtu)
1581 mtu = ip_rt_min_pmtu;
1582 if (!peer->pmtu_expires || mtu < peer->pmtu_learned) {
1583 unsigned long pmtu_expires;
1585 pmtu_expires = jiffies + ip_rt_mtu_expires;
1586 if (!pmtu_expires)
1587 pmtu_expires = 1UL;
1589 peer->pmtu_learned = mtu;
1590 peer->pmtu_expires = pmtu_expires;
1592 atomic_inc(&__rt_peer_genid);
1593 rt->rt_peer_genid = rt_peer_genid();
1595 check_peer_pmtu(dst, peer);
1599 static int check_peer_redir(struct dst_entry *dst, struct inet_peer *peer)
1601 struct rtable *rt = (struct rtable *) dst;
1602 __be32 orig_gw = rt->rt_gateway;
1604 dst_confirm(&rt->dst);
1606 neigh_release(rt->dst.neighbour);
1607 rt->dst.neighbour = NULL;
1609 rt->rt_gateway = peer->redirect_learned.a4;
1610 if (arp_bind_neighbour(&rt->dst) ||
1611 !(rt->dst.neighbour->nud_state & NUD_VALID)) {
1612 if (rt->dst.neighbour)
1613 neigh_event_send(rt->dst.neighbour, NULL);
1614 rt->rt_gateway = orig_gw;
1615 return -EAGAIN;
1616 } else {
1617 rt->rt_flags |= RTCF_REDIRECTED;
1618 call_netevent_notifiers(NETEVENT_NEIGH_UPDATE,
1619 rt->dst.neighbour);
1621 return 0;
1624 static struct dst_entry *ipv4_dst_check(struct dst_entry *dst, u32 cookie)
1626 struct rtable *rt = (struct rtable *) dst;
1628 if (rt_is_expired(rt))
1629 return NULL;
1630 if (rt->rt_peer_genid != rt_peer_genid()) {
1631 struct inet_peer *peer;
1633 if (!rt->peer)
1634 rt_bind_peer(rt, 0);
1636 peer = rt->peer;
1637 if (peer && peer->pmtu_expires)
1638 check_peer_pmtu(dst, peer);
1640 if (peer && peer->redirect_learned.a4 &&
1641 peer->redirect_learned.a4 != rt->rt_gateway) {
1642 if (check_peer_redir(dst, peer))
1643 return NULL;
1646 rt->rt_peer_genid = rt_peer_genid();
1648 return dst;
1651 static void ipv4_dst_destroy(struct dst_entry *dst)
1653 struct rtable *rt = (struct rtable *) dst;
1654 struct inet_peer *peer = rt->peer;
1656 if (rt->fi) {
1657 fib_info_put(rt->fi);
1658 rt->fi = NULL;
1660 if (peer) {
1661 rt->peer = NULL;
1662 inet_putpeer(peer);
1667 static void ipv4_link_failure(struct sk_buff *skb)
1669 struct rtable *rt;
1671 icmp_send(skb, ICMP_DEST_UNREACH, ICMP_HOST_UNREACH, 0);
1673 rt = skb_rtable(skb);
1674 if (rt &&
1675 rt->peer &&
1676 rt->peer->pmtu_expires) {
1677 unsigned long orig = rt->peer->pmtu_expires;
1679 if (cmpxchg(&rt->peer->pmtu_expires, orig, 0) == orig)
1680 dst_metric_set(&rt->dst, RTAX_MTU, rt->peer->pmtu_orig);
1684 static int ip_rt_bug(struct sk_buff *skb)
1686 printk(KERN_DEBUG "ip_rt_bug: %pI4 -> %pI4, %s\n",
1687 &ip_hdr(skb)->saddr, &ip_hdr(skb)->daddr,
1688 skb->dev ? skb->dev->name : "?");
1689 kfree_skb(skb);
1690 return 0;
1694 We do not cache source address of outgoing interface,
1695 because it is used only by IP RR, TS and SRR options,
1696 so that it out of fast path.
1698 BTW remember: "addr" is allowed to be not aligned
1699 in IP options!
1702 void ip_rt_get_source(u8 *addr, struct rtable *rt)
1704 __be32 src;
1705 struct fib_result res;
1707 if (rt_is_output_route(rt))
1708 src = rt->rt_src;
1709 else {
1710 struct flowi4 fl4 = {
1711 .daddr = rt->rt_key_dst,
1712 .saddr = rt->rt_key_src,
1713 .flowi4_tos = rt->rt_tos,
1714 .flowi4_oif = rt->rt_oif,
1715 .flowi4_iif = rt->rt_iif,
1716 .flowi4_mark = rt->rt_mark,
1719 rcu_read_lock();
1720 if (fib_lookup(dev_net(rt->dst.dev), &fl4, &res) == 0)
1721 src = FIB_RES_PREFSRC(dev_net(rt->dst.dev), res);
1722 else
1723 src = inet_select_addr(rt->dst.dev, rt->rt_gateway,
1724 RT_SCOPE_UNIVERSE);
1725 rcu_read_unlock();
1727 memcpy(addr, &src, 4);
1730 #ifdef CONFIG_IP_ROUTE_CLASSID
1731 static void set_class_tag(struct rtable *rt, u32 tag)
1733 if (!(rt->dst.tclassid & 0xFFFF))
1734 rt->dst.tclassid |= tag & 0xFFFF;
1735 if (!(rt->dst.tclassid & 0xFFFF0000))
1736 rt->dst.tclassid |= tag & 0xFFFF0000;
1738 #endif
1740 static unsigned int ipv4_default_advmss(const struct dst_entry *dst)
1742 unsigned int advmss = dst_metric_raw(dst, RTAX_ADVMSS);
1744 if (advmss == 0) {
1745 advmss = max_t(unsigned int, dst->dev->mtu - 40,
1746 ip_rt_min_advmss);
1747 if (advmss > 65535 - 40)
1748 advmss = 65535 - 40;
1750 return advmss;
1753 static unsigned int ipv4_default_mtu(const struct dst_entry *dst)
1755 unsigned int mtu = dst->dev->mtu;
1757 if (unlikely(dst_metric_locked(dst, RTAX_MTU))) {
1758 const struct rtable *rt = (const struct rtable *) dst;
1760 if (rt->rt_gateway != rt->rt_dst && mtu > 576)
1761 mtu = 576;
1764 if (mtu > IP_MAX_MTU)
1765 mtu = IP_MAX_MTU;
1767 return mtu;
1770 static void rt_init_metrics(struct rtable *rt, const struct flowi4 *oldflp4,
1771 struct fib_info *fi)
1773 struct inet_peer *peer;
1774 int create = 0;
1776 /* If a peer entry exists for this destination, we must hook
1777 * it up in order to get at cached metrics.
1779 if (oldflp4 && (oldflp4->flowi4_flags & FLOWI_FLAG_PRECOW_METRICS))
1780 create = 1;
1782 rt->peer = peer = inet_getpeer_v4(rt->rt_dst, create);
1783 if (peer) {
1784 rt->rt_peer_genid = rt_peer_genid();
1785 if (inet_metrics_new(peer))
1786 memcpy(peer->metrics, fi->fib_metrics,
1787 sizeof(u32) * RTAX_MAX);
1788 dst_init_metrics(&rt->dst, peer->metrics, false);
1790 if (peer->pmtu_expires)
1791 check_peer_pmtu(&rt->dst, peer);
1792 if (peer->redirect_learned.a4 &&
1793 peer->redirect_learned.a4 != rt->rt_gateway) {
1794 rt->rt_gateway = peer->redirect_learned.a4;
1795 rt->rt_flags |= RTCF_REDIRECTED;
1797 } else {
1798 if (fi->fib_metrics != (u32 *) dst_default_metrics) {
1799 rt->fi = fi;
1800 atomic_inc(&fi->fib_clntref);
1802 dst_init_metrics(&rt->dst, fi->fib_metrics, true);
1806 static void rt_set_nexthop(struct rtable *rt, const struct flowi4 *oldflp4,
1807 const struct fib_result *res,
1808 struct fib_info *fi, u16 type, u32 itag)
1810 struct dst_entry *dst = &rt->dst;
1812 if (fi) {
1813 if (FIB_RES_GW(*res) &&
1814 FIB_RES_NH(*res).nh_scope == RT_SCOPE_LINK)
1815 rt->rt_gateway = FIB_RES_GW(*res);
1816 rt_init_metrics(rt, oldflp4, fi);
1817 #ifdef CONFIG_IP_ROUTE_CLASSID
1818 dst->tclassid = FIB_RES_NH(*res).nh_tclassid;
1819 #endif
1822 if (dst_mtu(dst) > IP_MAX_MTU)
1823 dst_metric_set(dst, RTAX_MTU, IP_MAX_MTU);
1824 if (dst_metric_raw(dst, RTAX_ADVMSS) > 65535 - 40)
1825 dst_metric_set(dst, RTAX_ADVMSS, 65535 - 40);
1827 #ifdef CONFIG_IP_ROUTE_CLASSID
1828 #ifdef CONFIG_IP_MULTIPLE_TABLES
1829 set_class_tag(rt, fib_rules_tclass(res));
1830 #endif
1831 set_class_tag(rt, itag);
1832 #endif
1833 rt->rt_type = type;
1836 static struct rtable *rt_dst_alloc(bool nopolicy, bool noxfrm)
1838 struct rtable *rt = dst_alloc(&ipv4_dst_ops, 1);
1839 if (rt) {
1840 rt->dst.obsolete = -1;
1842 rt->dst.flags = DST_HOST |
1843 (nopolicy ? DST_NOPOLICY : 0) |
1844 (noxfrm ? DST_NOXFRM : 0);
1846 return rt;
1849 /* called in rcu_read_lock() section */
1850 static int ip_route_input_mc(struct sk_buff *skb, __be32 daddr, __be32 saddr,
1851 u8 tos, struct net_device *dev, int our)
1853 unsigned int hash;
1854 struct rtable *rth;
1855 __be32 spec_dst;
1856 struct in_device *in_dev = __in_dev_get_rcu(dev);
1857 u32 itag = 0;
1858 int err;
1860 /* Primary sanity checks. */
1862 if (in_dev == NULL)
1863 return -EINVAL;
1865 if (ipv4_is_multicast(saddr) || ipv4_is_lbcast(saddr) ||
1866 ipv4_is_loopback(saddr) || skb->protocol != htons(ETH_P_IP))
1867 goto e_inval;
1869 if (ipv4_is_zeronet(saddr)) {
1870 if (!ipv4_is_local_multicast(daddr))
1871 goto e_inval;
1872 spec_dst = inet_select_addr(dev, 0, RT_SCOPE_LINK);
1873 } else {
1874 err = fib_validate_source(saddr, 0, tos, 0, dev, &spec_dst,
1875 &itag, 0);
1876 if (err < 0)
1877 goto e_err;
1879 rth = rt_dst_alloc(IN_DEV_CONF_GET(in_dev, NOPOLICY), false);
1880 if (!rth)
1881 goto e_nobufs;
1883 rth->dst.output = ip_rt_bug;
1885 rth->rt_key_dst = daddr;
1886 rth->rt_dst = daddr;
1887 rth->rt_tos = tos;
1888 rth->rt_mark = skb->mark;
1889 rth->rt_key_src = saddr;
1890 rth->rt_src = saddr;
1891 #ifdef CONFIG_IP_ROUTE_CLASSID
1892 rth->dst.tclassid = itag;
1893 #endif
1894 rth->rt_route_iif = dev->ifindex;
1895 rth->rt_iif = dev->ifindex;
1896 rth->dst.dev = init_net.loopback_dev;
1897 dev_hold(rth->dst.dev);
1898 rth->rt_oif = 0;
1899 rth->rt_gateway = daddr;
1900 rth->rt_spec_dst= spec_dst;
1901 rth->rt_genid = rt_genid(dev_net(dev));
1902 rth->rt_flags = RTCF_MULTICAST;
1903 rth->rt_type = RTN_MULTICAST;
1904 if (our) {
1905 rth->dst.input= ip_local_deliver;
1906 rth->rt_flags |= RTCF_LOCAL;
1909 #ifdef CONFIG_IP_MROUTE
1910 if (!ipv4_is_local_multicast(daddr) && IN_DEV_MFORWARD(in_dev))
1911 rth->dst.input = ip_mr_input;
1912 #endif
1913 RT_CACHE_STAT_INC(in_slow_mc);
1915 hash = rt_hash(daddr, saddr, dev->ifindex, rt_genid(dev_net(dev)));
1916 rth = rt_intern_hash(hash, rth, skb, dev->ifindex);
1917 err = 0;
1918 if (IS_ERR(rth))
1919 err = PTR_ERR(rth);
1921 e_nobufs:
1922 return -ENOBUFS;
1923 e_inval:
1924 return -EINVAL;
1925 e_err:
1926 return err;
1930 static void ip_handle_martian_source(struct net_device *dev,
1931 struct in_device *in_dev,
1932 struct sk_buff *skb,
1933 __be32 daddr,
1934 __be32 saddr)
1936 RT_CACHE_STAT_INC(in_martian_src);
1937 #ifdef CONFIG_IP_ROUTE_VERBOSE
1938 if (IN_DEV_LOG_MARTIANS(in_dev) && net_ratelimit()) {
1940 * RFC1812 recommendation, if source is martian,
1941 * the only hint is MAC header.
1943 printk(KERN_WARNING "martian source %pI4 from %pI4, on dev %s\n",
1944 &daddr, &saddr, dev->name);
1945 if (dev->hard_header_len && skb_mac_header_was_set(skb)) {
1946 int i;
1947 const unsigned char *p = skb_mac_header(skb);
1948 printk(KERN_WARNING "ll header: ");
1949 for (i = 0; i < dev->hard_header_len; i++, p++) {
1950 printk("%02x", *p);
1951 if (i < (dev->hard_header_len - 1))
1952 printk(":");
1954 printk("\n");
1957 #endif
1960 /* called in rcu_read_lock() section */
1961 static int __mkroute_input(struct sk_buff *skb,
1962 const struct fib_result *res,
1963 struct in_device *in_dev,
1964 __be32 daddr, __be32 saddr, u32 tos,
1965 struct rtable **result)
1967 struct rtable *rth;
1968 int err;
1969 struct in_device *out_dev;
1970 unsigned int flags = 0;
1971 __be32 spec_dst;
1972 u32 itag;
1974 /* get a working reference to the output device */
1975 out_dev = __in_dev_get_rcu(FIB_RES_DEV(*res));
1976 if (out_dev == NULL) {
1977 if (net_ratelimit())
1978 printk(KERN_CRIT "Bug in ip_route_input" \
1979 "_slow(). Please, report\n");
1980 return -EINVAL;
1984 err = fib_validate_source(saddr, daddr, tos, FIB_RES_OIF(*res),
1985 in_dev->dev, &spec_dst, &itag, skb->mark);
1986 if (err < 0) {
1987 ip_handle_martian_source(in_dev->dev, in_dev, skb, daddr,
1988 saddr);
1990 goto cleanup;
1993 if (err)
1994 flags |= RTCF_DIRECTSRC;
1996 if (out_dev == in_dev && err &&
1997 (IN_DEV_SHARED_MEDIA(out_dev) ||
1998 inet_addr_onlink(out_dev, saddr, FIB_RES_GW(*res))))
1999 flags |= RTCF_DOREDIRECT;
2001 if (skb->protocol != htons(ETH_P_IP)) {
2002 /* Not IP (i.e. ARP). Do not create route, if it is
2003 * invalid for proxy arp. DNAT routes are always valid.
2005 * Proxy arp feature have been extended to allow, ARP
2006 * replies back to the same interface, to support
2007 * Private VLAN switch technologies. See arp.c.
2009 if (out_dev == in_dev &&
2010 IN_DEV_PROXY_ARP_PVLAN(in_dev) == 0) {
2011 err = -EINVAL;
2012 goto cleanup;
2016 rth = rt_dst_alloc(IN_DEV_CONF_GET(in_dev, NOPOLICY),
2017 IN_DEV_CONF_GET(out_dev, NOXFRM));
2018 if (!rth) {
2019 err = -ENOBUFS;
2020 goto cleanup;
2023 rth->rt_key_dst = daddr;
2024 rth->rt_dst = daddr;
2025 rth->rt_tos = tos;
2026 rth->rt_mark = skb->mark;
2027 rth->rt_key_src = saddr;
2028 rth->rt_src = saddr;
2029 rth->rt_gateway = daddr;
2030 rth->rt_route_iif = in_dev->dev->ifindex;
2031 rth->rt_iif = in_dev->dev->ifindex;
2032 rth->dst.dev = (out_dev)->dev;
2033 dev_hold(rth->dst.dev);
2034 rth->rt_oif = 0;
2035 rth->rt_spec_dst= spec_dst;
2037 rth->dst.input = ip_forward;
2038 rth->dst.output = ip_output;
2039 rth->rt_genid = rt_genid(dev_net(rth->dst.dev));
2041 rt_set_nexthop(rth, NULL, res, res->fi, res->type, itag);
2043 rth->rt_flags = flags;
2045 *result = rth;
2046 err = 0;
2047 cleanup:
2048 return err;
2051 static int ip_mkroute_input(struct sk_buff *skb,
2052 struct fib_result *res,
2053 const struct flowi4 *fl4,
2054 struct in_device *in_dev,
2055 __be32 daddr, __be32 saddr, u32 tos)
2057 struct rtable* rth = NULL;
2058 int err;
2059 unsigned hash;
2061 #ifdef CONFIG_IP_ROUTE_MULTIPATH
2062 if (res->fi && res->fi->fib_nhs > 1)
2063 fib_select_multipath(res);
2064 #endif
2066 /* create a routing cache entry */
2067 err = __mkroute_input(skb, res, in_dev, daddr, saddr, tos, &rth);
2068 if (err)
2069 return err;
2071 /* put it into the cache */
2072 hash = rt_hash(daddr, saddr, fl4->flowi4_iif,
2073 rt_genid(dev_net(rth->dst.dev)));
2074 rth = rt_intern_hash(hash, rth, skb, fl4->flowi4_iif);
2075 if (IS_ERR(rth))
2076 return PTR_ERR(rth);
2077 return 0;
2081 * NOTE. We drop all the packets that has local source
2082 * addresses, because every properly looped back packet
2083 * must have correct destination already attached by output routine.
2085 * Such approach solves two big problems:
2086 * 1. Not simplex devices are handled properly.
2087 * 2. IP spoofing attempts are filtered with 100% of guarantee.
2088 * called with rcu_read_lock()
2091 static int ip_route_input_slow(struct sk_buff *skb, __be32 daddr, __be32 saddr,
2092 u8 tos, struct net_device *dev)
2094 struct fib_result res;
2095 struct in_device *in_dev = __in_dev_get_rcu(dev);
2096 struct flowi4 fl4;
2097 unsigned flags = 0;
2098 u32 itag = 0;
2099 struct rtable * rth;
2100 unsigned hash;
2101 __be32 spec_dst;
2102 int err = -EINVAL;
2103 struct net * net = dev_net(dev);
2105 /* IP on this device is disabled. */
2107 if (!in_dev)
2108 goto out;
2110 /* Check for the most weird martians, which can be not detected
2111 by fib_lookup.
2114 if (ipv4_is_multicast(saddr) || ipv4_is_lbcast(saddr) ||
2115 ipv4_is_loopback(saddr))
2116 goto martian_source;
2118 if (ipv4_is_lbcast(daddr) || (saddr == 0 && daddr == 0))
2119 goto brd_input;
2121 /* Accept zero addresses only to limited broadcast;
2122 * I even do not know to fix it or not. Waiting for complains :-)
2124 if (ipv4_is_zeronet(saddr))
2125 goto martian_source;
2127 if (ipv4_is_zeronet(daddr) || ipv4_is_loopback(daddr))
2128 goto martian_destination;
2131 * Now we are ready to route packet.
2133 fl4.flowi4_oif = 0;
2134 fl4.flowi4_iif = dev->ifindex;
2135 fl4.flowi4_mark = skb->mark;
2136 fl4.flowi4_tos = tos;
2137 fl4.flowi4_scope = RT_SCOPE_UNIVERSE;
2138 fl4.daddr = daddr;
2139 fl4.saddr = saddr;
2140 err = fib_lookup(net, &fl4, &res);
2141 if (err != 0) {
2142 if (!IN_DEV_FORWARD(in_dev))
2143 goto e_hostunreach;
2144 goto no_route;
2147 RT_CACHE_STAT_INC(in_slow_tot);
2149 if (res.type == RTN_BROADCAST)
2150 goto brd_input;
2152 if (res.type == RTN_LOCAL) {
2153 err = fib_validate_source(saddr, daddr, tos,
2154 net->loopback_dev->ifindex,
2155 dev, &spec_dst, &itag, skb->mark);
2156 if (err < 0)
2157 goto martian_source_keep_err;
2158 if (err)
2159 flags |= RTCF_DIRECTSRC;
2160 spec_dst = daddr;
2161 goto local_input;
2164 if (!IN_DEV_FORWARD(in_dev))
2165 goto e_hostunreach;
2166 if (res.type != RTN_UNICAST)
2167 goto martian_destination;
2169 err = ip_mkroute_input(skb, &res, &fl4, in_dev, daddr, saddr, tos);
2170 out: return err;
2172 brd_input:
2173 if (skb->protocol != htons(ETH_P_IP))
2174 goto e_inval;
2176 if (ipv4_is_zeronet(saddr))
2177 spec_dst = inet_select_addr(dev, 0, RT_SCOPE_LINK);
2178 else {
2179 err = fib_validate_source(saddr, 0, tos, 0, dev, &spec_dst,
2180 &itag, skb->mark);
2181 if (err < 0)
2182 goto martian_source_keep_err;
2183 if (err)
2184 flags |= RTCF_DIRECTSRC;
2186 flags |= RTCF_BROADCAST;
2187 res.type = RTN_BROADCAST;
2188 RT_CACHE_STAT_INC(in_brd);
2190 local_input:
2191 rth = rt_dst_alloc(IN_DEV_CONF_GET(in_dev, NOPOLICY), false);
2192 if (!rth)
2193 goto e_nobufs;
2195 rth->dst.output= ip_rt_bug;
2196 rth->rt_genid = rt_genid(net);
2198 rth->rt_key_dst = daddr;
2199 rth->rt_dst = daddr;
2200 rth->rt_tos = tos;
2201 rth->rt_mark = skb->mark;
2202 rth->rt_key_src = saddr;
2203 rth->rt_src = saddr;
2204 #ifdef CONFIG_IP_ROUTE_CLASSID
2205 rth->dst.tclassid = itag;
2206 #endif
2207 rth->rt_route_iif = dev->ifindex;
2208 rth->rt_iif = dev->ifindex;
2209 rth->dst.dev = net->loopback_dev;
2210 dev_hold(rth->dst.dev);
2211 rth->rt_gateway = daddr;
2212 rth->rt_spec_dst= spec_dst;
2213 rth->dst.input= ip_local_deliver;
2214 rth->rt_flags = flags|RTCF_LOCAL;
2215 if (res.type == RTN_UNREACHABLE) {
2216 rth->dst.input= ip_error;
2217 rth->dst.error= -err;
2218 rth->rt_flags &= ~RTCF_LOCAL;
2220 rth->rt_type = res.type;
2221 hash = rt_hash(daddr, saddr, fl4.flowi4_iif, rt_genid(net));
2222 rth = rt_intern_hash(hash, rth, skb, fl4.flowi4_iif);
2223 err = 0;
2224 if (IS_ERR(rth))
2225 err = PTR_ERR(rth);
2226 goto out;
2228 no_route:
2229 RT_CACHE_STAT_INC(in_no_route);
2230 spec_dst = inet_select_addr(dev, 0, RT_SCOPE_UNIVERSE);
2231 res.type = RTN_UNREACHABLE;
2232 if (err == -ESRCH)
2233 err = -ENETUNREACH;
2234 goto local_input;
2237 * Do not cache martian addresses: they should be logged (RFC1812)
2239 martian_destination:
2240 RT_CACHE_STAT_INC(in_martian_dst);
2241 #ifdef CONFIG_IP_ROUTE_VERBOSE
2242 if (IN_DEV_LOG_MARTIANS(in_dev) && net_ratelimit())
2243 printk(KERN_WARNING "martian destination %pI4 from %pI4, dev %s\n",
2244 &daddr, &saddr, dev->name);
2245 #endif
2247 e_hostunreach:
2248 err = -EHOSTUNREACH;
2249 goto out;
2251 e_inval:
2252 err = -EINVAL;
2253 goto out;
2255 e_nobufs:
2256 err = -ENOBUFS;
2257 goto out;
2259 martian_source:
2260 err = -EINVAL;
2261 martian_source_keep_err:
2262 ip_handle_martian_source(dev, in_dev, skb, daddr, saddr);
2263 goto out;
2266 int ip_route_input_common(struct sk_buff *skb, __be32 daddr, __be32 saddr,
2267 u8 tos, struct net_device *dev, bool noref)
2269 struct rtable * rth;
2270 unsigned hash;
2271 int iif = dev->ifindex;
2272 struct net *net;
2273 int res;
2275 net = dev_net(dev);
2277 rcu_read_lock();
2279 if (!rt_caching(net))
2280 goto skip_cache;
2282 tos &= IPTOS_RT_MASK;
2283 hash = rt_hash(daddr, saddr, iif, rt_genid(net));
2285 for (rth = rcu_dereference(rt_hash_table[hash].chain); rth;
2286 rth = rcu_dereference(rth->dst.rt_next)) {
2287 if ((((__force u32)rth->rt_key_dst ^ (__force u32)daddr) |
2288 ((__force u32)rth->rt_key_src ^ (__force u32)saddr) |
2289 (rth->rt_iif ^ iif) |
2290 rth->rt_oif |
2291 (rth->rt_tos ^ tos)) == 0 &&
2292 rth->rt_mark == skb->mark &&
2293 net_eq(dev_net(rth->dst.dev), net) &&
2294 !rt_is_expired(rth)) {
2295 if (noref) {
2296 dst_use_noref(&rth->dst, jiffies);
2297 skb_dst_set_noref(skb, &rth->dst);
2298 } else {
2299 dst_use(&rth->dst, jiffies);
2300 skb_dst_set(skb, &rth->dst);
2302 RT_CACHE_STAT_INC(in_hit);
2303 rcu_read_unlock();
2304 return 0;
2306 RT_CACHE_STAT_INC(in_hlist_search);
2309 skip_cache:
2310 /* Multicast recognition logic is moved from route cache to here.
2311 The problem was that too many Ethernet cards have broken/missing
2312 hardware multicast filters :-( As result the host on multicasting
2313 network acquires a lot of useless route cache entries, sort of
2314 SDR messages from all the world. Now we try to get rid of them.
2315 Really, provided software IP multicast filter is organized
2316 reasonably (at least, hashed), it does not result in a slowdown
2317 comparing with route cache reject entries.
2318 Note, that multicast routers are not affected, because
2319 route cache entry is created eventually.
2321 if (ipv4_is_multicast(daddr)) {
2322 struct in_device *in_dev = __in_dev_get_rcu(dev);
2324 if (in_dev) {
2325 int our = ip_check_mc_rcu(in_dev, daddr, saddr,
2326 ip_hdr(skb)->protocol);
2327 if (our
2328 #ifdef CONFIG_IP_MROUTE
2330 (!ipv4_is_local_multicast(daddr) &&
2331 IN_DEV_MFORWARD(in_dev))
2332 #endif
2334 int res = ip_route_input_mc(skb, daddr, saddr,
2335 tos, dev, our);
2336 rcu_read_unlock();
2337 return res;
2340 rcu_read_unlock();
2341 return -EINVAL;
2343 res = ip_route_input_slow(skb, daddr, saddr, tos, dev);
2344 rcu_read_unlock();
2345 return res;
2347 EXPORT_SYMBOL(ip_route_input_common);
2349 /* called with rcu_read_lock() */
2350 static struct rtable *__mkroute_output(const struct fib_result *res,
2351 const struct flowi4 *fl4,
2352 const struct flowi4 *oldflp4,
2353 struct net_device *dev_out,
2354 unsigned int flags)
2356 struct fib_info *fi = res->fi;
2357 u32 tos = RT_FL_TOS(oldflp4);
2358 struct in_device *in_dev;
2359 u16 type = res->type;
2360 struct rtable *rth;
2362 if (ipv4_is_loopback(fl4->saddr) && !(dev_out->flags & IFF_LOOPBACK))
2363 return ERR_PTR(-EINVAL);
2365 if (ipv4_is_lbcast(fl4->daddr))
2366 type = RTN_BROADCAST;
2367 else if (ipv4_is_multicast(fl4->daddr))
2368 type = RTN_MULTICAST;
2369 else if (ipv4_is_zeronet(fl4->daddr))
2370 return ERR_PTR(-EINVAL);
2372 if (dev_out->flags & IFF_LOOPBACK)
2373 flags |= RTCF_LOCAL;
2375 in_dev = __in_dev_get_rcu(dev_out);
2376 if (!in_dev)
2377 return ERR_PTR(-EINVAL);
2379 if (type == RTN_BROADCAST) {
2380 flags |= RTCF_BROADCAST | RTCF_LOCAL;
2381 fi = NULL;
2382 } else if (type == RTN_MULTICAST) {
2383 flags |= RTCF_MULTICAST | RTCF_LOCAL;
2384 if (!ip_check_mc_rcu(in_dev, oldflp4->daddr, oldflp4->saddr,
2385 oldflp4->flowi4_proto))
2386 flags &= ~RTCF_LOCAL;
2387 /* If multicast route do not exist use
2388 * default one, but do not gateway in this case.
2389 * Yes, it is hack.
2391 if (fi && res->prefixlen < 4)
2392 fi = NULL;
2395 rth = rt_dst_alloc(IN_DEV_CONF_GET(in_dev, NOPOLICY),
2396 IN_DEV_CONF_GET(in_dev, NOXFRM));
2397 if (!rth)
2398 return ERR_PTR(-ENOBUFS);
2400 rth->rt_key_dst = oldflp4->daddr;
2401 rth->rt_tos = tos;
2402 rth->rt_key_src = oldflp4->saddr;
2403 rth->rt_oif = oldflp4->flowi4_oif;
2404 rth->rt_mark = oldflp4->flowi4_mark;
2405 rth->rt_dst = fl4->daddr;
2406 rth->rt_src = fl4->saddr;
2407 rth->rt_route_iif = 0;
2408 rth->rt_iif = oldflp4->flowi4_oif ? : dev_out->ifindex;
2409 /* get references to the devices that are to be hold by the routing
2410 cache entry */
2411 rth->dst.dev = dev_out;
2412 dev_hold(dev_out);
2413 rth->rt_gateway = fl4->daddr;
2414 rth->rt_spec_dst= fl4->saddr;
2416 rth->dst.output=ip_output;
2417 rth->rt_genid = rt_genid(dev_net(dev_out));
2419 RT_CACHE_STAT_INC(out_slow_tot);
2421 if (flags & RTCF_LOCAL) {
2422 rth->dst.input = ip_local_deliver;
2423 rth->rt_spec_dst = fl4->daddr;
2425 if (flags & (RTCF_BROADCAST | RTCF_MULTICAST)) {
2426 rth->rt_spec_dst = fl4->saddr;
2427 if (flags & RTCF_LOCAL &&
2428 !(dev_out->flags & IFF_LOOPBACK)) {
2429 rth->dst.output = ip_mc_output;
2430 RT_CACHE_STAT_INC(out_slow_mc);
2432 #ifdef CONFIG_IP_MROUTE
2433 if (type == RTN_MULTICAST) {
2434 if (IN_DEV_MFORWARD(in_dev) &&
2435 !ipv4_is_local_multicast(oldflp4->daddr)) {
2436 rth->dst.input = ip_mr_input;
2437 rth->dst.output = ip_mc_output;
2440 #endif
2443 rt_set_nexthop(rth, oldflp4, res, fi, type, 0);
2445 rth->rt_flags = flags;
2446 return rth;
2450 * Major route resolver routine.
2451 * called with rcu_read_lock();
2454 static struct rtable *ip_route_output_slow(struct net *net,
2455 const struct flowi4 *oldflp4)
2457 u32 tos = RT_FL_TOS(oldflp4);
2458 struct flowi4 fl4;
2459 struct fib_result res;
2460 unsigned int flags = 0;
2461 struct net_device *dev_out = NULL;
2462 struct rtable *rth;
2464 res.fi = NULL;
2465 #ifdef CONFIG_IP_MULTIPLE_TABLES
2466 res.r = NULL;
2467 #endif
2469 fl4.flowi4_oif = oldflp4->flowi4_oif;
2470 fl4.flowi4_iif = net->loopback_dev->ifindex;
2471 fl4.flowi4_mark = oldflp4->flowi4_mark;
2472 fl4.daddr = oldflp4->daddr;
2473 fl4.saddr = oldflp4->saddr;
2474 fl4.flowi4_tos = tos & IPTOS_RT_MASK;
2475 fl4.flowi4_scope = ((tos & RTO_ONLINK) ?
2476 RT_SCOPE_LINK : RT_SCOPE_UNIVERSE);
2478 rcu_read_lock();
2479 if (oldflp4->saddr) {
2480 rth = ERR_PTR(-EINVAL);
2481 if (ipv4_is_multicast(oldflp4->saddr) ||
2482 ipv4_is_lbcast(oldflp4->saddr) ||
2483 ipv4_is_zeronet(oldflp4->saddr))
2484 goto out;
2486 /* I removed check for oif == dev_out->oif here.
2487 It was wrong for two reasons:
2488 1. ip_dev_find(net, saddr) can return wrong iface, if saddr
2489 is assigned to multiple interfaces.
2490 2. Moreover, we are allowed to send packets with saddr
2491 of another iface. --ANK
2494 if (oldflp4->flowi4_oif == 0 &&
2495 (ipv4_is_multicast(oldflp4->daddr) ||
2496 ipv4_is_lbcast(oldflp4->daddr))) {
2497 /* It is equivalent to inet_addr_type(saddr) == RTN_LOCAL */
2498 dev_out = __ip_dev_find(net, oldflp4->saddr, false);
2499 if (dev_out == NULL)
2500 goto out;
2502 /* Special hack: user can direct multicasts
2503 and limited broadcast via necessary interface
2504 without fiddling with IP_MULTICAST_IF or IP_PKTINFO.
2505 This hack is not just for fun, it allows
2506 vic,vat and friends to work.
2507 They bind socket to loopback, set ttl to zero
2508 and expect that it will work.
2509 From the viewpoint of routing cache they are broken,
2510 because we are not allowed to build multicast path
2511 with loopback source addr (look, routing cache
2512 cannot know, that ttl is zero, so that packet
2513 will not leave this host and route is valid).
2514 Luckily, this hack is good workaround.
2517 fl4.flowi4_oif = dev_out->ifindex;
2518 goto make_route;
2521 if (!(oldflp4->flowi4_flags & FLOWI_FLAG_ANYSRC)) {
2522 /* It is equivalent to inet_addr_type(saddr) == RTN_LOCAL */
2523 if (!__ip_dev_find(net, oldflp4->saddr, false))
2524 goto out;
2529 if (oldflp4->flowi4_oif) {
2530 dev_out = dev_get_by_index_rcu(net, oldflp4->flowi4_oif);
2531 rth = ERR_PTR(-ENODEV);
2532 if (dev_out == NULL)
2533 goto out;
2535 /* RACE: Check return value of inet_select_addr instead. */
2536 if (!(dev_out->flags & IFF_UP) || !__in_dev_get_rcu(dev_out)) {
2537 rth = ERR_PTR(-ENETUNREACH);
2538 goto out;
2540 if (ipv4_is_local_multicast(oldflp4->daddr) ||
2541 ipv4_is_lbcast(oldflp4->daddr)) {
2542 if (!fl4.saddr)
2543 fl4.saddr = inet_select_addr(dev_out, 0,
2544 RT_SCOPE_LINK);
2545 goto make_route;
2547 if (!fl4.saddr) {
2548 if (ipv4_is_multicast(oldflp4->daddr))
2549 fl4.saddr = inet_select_addr(dev_out, 0,
2550 fl4.flowi4_scope);
2551 else if (!oldflp4->daddr)
2552 fl4.saddr = inet_select_addr(dev_out, 0,
2553 RT_SCOPE_HOST);
2557 if (!fl4.daddr) {
2558 fl4.daddr = fl4.saddr;
2559 if (!fl4.daddr)
2560 fl4.daddr = fl4.saddr = htonl(INADDR_LOOPBACK);
2561 dev_out = net->loopback_dev;
2562 fl4.flowi4_oif = net->loopback_dev->ifindex;
2563 res.type = RTN_LOCAL;
2564 flags |= RTCF_LOCAL;
2565 goto make_route;
2568 if (fib_lookup(net, &fl4, &res)) {
2569 res.fi = NULL;
2570 if (oldflp4->flowi4_oif) {
2571 /* Apparently, routing tables are wrong. Assume,
2572 that the destination is on link.
2574 WHY? DW.
2575 Because we are allowed to send to iface
2576 even if it has NO routes and NO assigned
2577 addresses. When oif is specified, routing
2578 tables are looked up with only one purpose:
2579 to catch if destination is gatewayed, rather than
2580 direct. Moreover, if MSG_DONTROUTE is set,
2581 we send packet, ignoring both routing tables
2582 and ifaddr state. --ANK
2585 We could make it even if oif is unknown,
2586 likely IPv6, but we do not.
2589 if (fl4.saddr == 0)
2590 fl4.saddr = inet_select_addr(dev_out, 0,
2591 RT_SCOPE_LINK);
2592 res.type = RTN_UNICAST;
2593 goto make_route;
2595 rth = ERR_PTR(-ENETUNREACH);
2596 goto out;
2599 if (res.type == RTN_LOCAL) {
2600 if (!fl4.saddr) {
2601 if (res.fi->fib_prefsrc)
2602 fl4.saddr = res.fi->fib_prefsrc;
2603 else
2604 fl4.saddr = fl4.daddr;
2606 dev_out = net->loopback_dev;
2607 fl4.flowi4_oif = dev_out->ifindex;
2608 res.fi = NULL;
2609 flags |= RTCF_LOCAL;
2610 goto make_route;
2613 #ifdef CONFIG_IP_ROUTE_MULTIPATH
2614 if (res.fi->fib_nhs > 1 && fl4.flowi4_oif == 0)
2615 fib_select_multipath(&res);
2616 else
2617 #endif
2618 if (!res.prefixlen && res.type == RTN_UNICAST && !fl4.flowi4_oif)
2619 fib_select_default(&res);
2621 if (!fl4.saddr)
2622 fl4.saddr = FIB_RES_PREFSRC(net, res);
2624 dev_out = FIB_RES_DEV(res);
2625 fl4.flowi4_oif = dev_out->ifindex;
2628 make_route:
2629 rth = __mkroute_output(&res, &fl4, oldflp4, dev_out, flags);
2630 if (!IS_ERR(rth)) {
2631 unsigned int hash;
2633 hash = rt_hash(oldflp4->daddr, oldflp4->saddr, oldflp4->flowi4_oif,
2634 rt_genid(dev_net(dev_out)));
2635 rth = rt_intern_hash(hash, rth, NULL, oldflp4->flowi4_oif);
2638 out:
2639 rcu_read_unlock();
2640 return rth;
2643 struct rtable *__ip_route_output_key(struct net *net, const struct flowi4 *flp4)
2645 struct rtable *rth;
2646 unsigned int hash;
2648 if (!rt_caching(net))
2649 goto slow_output;
2651 hash = rt_hash(flp4->daddr, flp4->saddr, flp4->flowi4_oif, rt_genid(net));
2653 rcu_read_lock_bh();
2654 for (rth = rcu_dereference_bh(rt_hash_table[hash].chain); rth;
2655 rth = rcu_dereference_bh(rth->dst.rt_next)) {
2656 if (rth->rt_key_dst == flp4->daddr &&
2657 rth->rt_key_src == flp4->saddr &&
2658 rt_is_output_route(rth) &&
2659 rth->rt_oif == flp4->flowi4_oif &&
2660 rth->rt_mark == flp4->flowi4_mark &&
2661 !((rth->rt_tos ^ flp4->flowi4_tos) &
2662 (IPTOS_RT_MASK | RTO_ONLINK)) &&
2663 net_eq(dev_net(rth->dst.dev), net) &&
2664 !rt_is_expired(rth)) {
2665 dst_use(&rth->dst, jiffies);
2666 RT_CACHE_STAT_INC(out_hit);
2667 rcu_read_unlock_bh();
2668 return rth;
2670 RT_CACHE_STAT_INC(out_hlist_search);
2672 rcu_read_unlock_bh();
2674 slow_output:
2675 return ip_route_output_slow(net, flp4);
2677 EXPORT_SYMBOL_GPL(__ip_route_output_key);
2679 static struct dst_entry *ipv4_blackhole_dst_check(struct dst_entry *dst, u32 cookie)
2681 return NULL;
2684 static unsigned int ipv4_blackhole_default_mtu(const struct dst_entry *dst)
2686 return 0;
2689 static void ipv4_rt_blackhole_update_pmtu(struct dst_entry *dst, u32 mtu)
2693 static struct dst_ops ipv4_dst_blackhole_ops = {
2694 .family = AF_INET,
2695 .protocol = cpu_to_be16(ETH_P_IP),
2696 .destroy = ipv4_dst_destroy,
2697 .check = ipv4_blackhole_dst_check,
2698 .default_mtu = ipv4_blackhole_default_mtu,
2699 .default_advmss = ipv4_default_advmss,
2700 .update_pmtu = ipv4_rt_blackhole_update_pmtu,
2703 struct dst_entry *ipv4_blackhole_route(struct net *net, struct dst_entry *dst_orig)
2705 struct rtable *rt = dst_alloc(&ipv4_dst_blackhole_ops, 1);
2706 struct rtable *ort = (struct rtable *) dst_orig;
2708 if (rt) {
2709 struct dst_entry *new = &rt->dst;
2711 new->__use = 1;
2712 new->input = dst_discard;
2713 new->output = dst_discard;
2714 dst_copy_metrics(new, &ort->dst);
2716 new->dev = ort->dst.dev;
2717 if (new->dev)
2718 dev_hold(new->dev);
2720 rt->rt_key_dst = ort->rt_key_dst;
2721 rt->rt_key_src = ort->rt_key_src;
2722 rt->rt_tos = ort->rt_tos;
2723 rt->rt_route_iif = ort->rt_route_iif;
2724 rt->rt_iif = ort->rt_iif;
2725 rt->rt_oif = ort->rt_oif;
2726 rt->rt_mark = ort->rt_mark;
2728 rt->rt_genid = rt_genid(net);
2729 rt->rt_flags = ort->rt_flags;
2730 rt->rt_type = ort->rt_type;
2731 rt->rt_dst = ort->rt_dst;
2732 rt->rt_src = ort->rt_src;
2733 rt->rt_gateway = ort->rt_gateway;
2734 rt->rt_spec_dst = ort->rt_spec_dst;
2735 rt->peer = ort->peer;
2736 if (rt->peer)
2737 atomic_inc(&rt->peer->refcnt);
2738 rt->fi = ort->fi;
2739 if (rt->fi)
2740 atomic_inc(&rt->fi->fib_clntref);
2742 dst_free(new);
2745 dst_release(dst_orig);
2747 return rt ? &rt->dst : ERR_PTR(-ENOMEM);
2750 struct rtable *ip_route_output_flow(struct net *net, struct flowi4 *flp4,
2751 struct sock *sk)
2753 struct rtable *rt = __ip_route_output_key(net, flp4);
2755 if (IS_ERR(rt))
2756 return rt;
2758 if (flp4->flowi4_proto) {
2759 if (!flp4->saddr)
2760 flp4->saddr = rt->rt_src;
2761 if (!flp4->daddr)
2762 flp4->daddr = rt->rt_dst;
2763 rt = (struct rtable *) xfrm_lookup(net, &rt->dst,
2764 flowi4_to_flowi(flp4),
2765 sk, 0);
2768 return rt;
2770 EXPORT_SYMBOL_GPL(ip_route_output_flow);
2772 static int rt_fill_info(struct net *net,
2773 struct sk_buff *skb, u32 pid, u32 seq, int event,
2774 int nowait, unsigned int flags)
2776 struct rtable *rt = skb_rtable(skb);
2777 struct rtmsg *r;
2778 struct nlmsghdr *nlh;
2779 long expires;
2780 u32 id = 0, ts = 0, tsage = 0, error;
2782 nlh = nlmsg_put(skb, pid, seq, event, sizeof(*r), flags);
2783 if (nlh == NULL)
2784 return -EMSGSIZE;
2786 r = nlmsg_data(nlh);
2787 r->rtm_family = AF_INET;
2788 r->rtm_dst_len = 32;
2789 r->rtm_src_len = 0;
2790 r->rtm_tos = rt->rt_tos;
2791 r->rtm_table = RT_TABLE_MAIN;
2792 NLA_PUT_U32(skb, RTA_TABLE, RT_TABLE_MAIN);
2793 r->rtm_type = rt->rt_type;
2794 r->rtm_scope = RT_SCOPE_UNIVERSE;
2795 r->rtm_protocol = RTPROT_UNSPEC;
2796 r->rtm_flags = (rt->rt_flags & ~0xFFFF) | RTM_F_CLONED;
2797 if (rt->rt_flags & RTCF_NOTIFY)
2798 r->rtm_flags |= RTM_F_NOTIFY;
2800 NLA_PUT_BE32(skb, RTA_DST, rt->rt_dst);
2802 if (rt->rt_key_src) {
2803 r->rtm_src_len = 32;
2804 NLA_PUT_BE32(skb, RTA_SRC, rt->rt_key_src);
2806 if (rt->dst.dev)
2807 NLA_PUT_U32(skb, RTA_OIF, rt->dst.dev->ifindex);
2808 #ifdef CONFIG_IP_ROUTE_CLASSID
2809 if (rt->dst.tclassid)
2810 NLA_PUT_U32(skb, RTA_FLOW, rt->dst.tclassid);
2811 #endif
2812 if (rt_is_input_route(rt))
2813 NLA_PUT_BE32(skb, RTA_PREFSRC, rt->rt_spec_dst);
2814 else if (rt->rt_src != rt->rt_key_src)
2815 NLA_PUT_BE32(skb, RTA_PREFSRC, rt->rt_src);
2817 if (rt->rt_dst != rt->rt_gateway)
2818 NLA_PUT_BE32(skb, RTA_GATEWAY, rt->rt_gateway);
2820 if (rtnetlink_put_metrics(skb, dst_metrics_ptr(&rt->dst)) < 0)
2821 goto nla_put_failure;
2823 if (rt->rt_mark)
2824 NLA_PUT_BE32(skb, RTA_MARK, rt->rt_mark);
2826 error = rt->dst.error;
2827 expires = (rt->peer && rt->peer->pmtu_expires) ?
2828 rt->peer->pmtu_expires - jiffies : 0;
2829 if (rt->peer) {
2830 inet_peer_refcheck(rt->peer);
2831 id = atomic_read(&rt->peer->ip_id_count) & 0xffff;
2832 if (rt->peer->tcp_ts_stamp) {
2833 ts = rt->peer->tcp_ts;
2834 tsage = get_seconds() - rt->peer->tcp_ts_stamp;
2838 if (rt_is_input_route(rt)) {
2839 #ifdef CONFIG_IP_MROUTE
2840 __be32 dst = rt->rt_dst;
2842 if (ipv4_is_multicast(dst) && !ipv4_is_local_multicast(dst) &&
2843 IPV4_DEVCONF_ALL(net, MC_FORWARDING)) {
2844 int err = ipmr_get_route(net, skb, r, nowait);
2845 if (err <= 0) {
2846 if (!nowait) {
2847 if (err == 0)
2848 return 0;
2849 goto nla_put_failure;
2850 } else {
2851 if (err == -EMSGSIZE)
2852 goto nla_put_failure;
2853 error = err;
2856 } else
2857 #endif
2858 NLA_PUT_U32(skb, RTA_IIF, rt->rt_iif);
2861 if (rtnl_put_cacheinfo(skb, &rt->dst, id, ts, tsage,
2862 expires, error) < 0)
2863 goto nla_put_failure;
2865 return nlmsg_end(skb, nlh);
2867 nla_put_failure:
2868 nlmsg_cancel(skb, nlh);
2869 return -EMSGSIZE;
2872 static int inet_rtm_getroute(struct sk_buff *in_skb, struct nlmsghdr* nlh, void *arg)
2874 struct net *net = sock_net(in_skb->sk);
2875 struct rtmsg *rtm;
2876 struct nlattr *tb[RTA_MAX+1];
2877 struct rtable *rt = NULL;
2878 __be32 dst = 0;
2879 __be32 src = 0;
2880 u32 iif;
2881 int err;
2882 int mark;
2883 struct sk_buff *skb;
2885 err = nlmsg_parse(nlh, sizeof(*rtm), tb, RTA_MAX, rtm_ipv4_policy);
2886 if (err < 0)
2887 goto errout;
2889 rtm = nlmsg_data(nlh);
2891 skb = alloc_skb(NLMSG_GOODSIZE, GFP_KERNEL);
2892 if (skb == NULL) {
2893 err = -ENOBUFS;
2894 goto errout;
2897 /* Reserve room for dummy headers, this skb can pass
2898 through good chunk of routing engine.
2900 skb_reset_mac_header(skb);
2901 skb_reset_network_header(skb);
2903 /* Bugfix: need to give ip_route_input enough of an IP header to not gag. */
2904 ip_hdr(skb)->protocol = IPPROTO_ICMP;
2905 skb_reserve(skb, MAX_HEADER + sizeof(struct iphdr));
2907 src = tb[RTA_SRC] ? nla_get_be32(tb[RTA_SRC]) : 0;
2908 dst = tb[RTA_DST] ? nla_get_be32(tb[RTA_DST]) : 0;
2909 iif = tb[RTA_IIF] ? nla_get_u32(tb[RTA_IIF]) : 0;
2910 mark = tb[RTA_MARK] ? nla_get_u32(tb[RTA_MARK]) : 0;
2912 if (iif) {
2913 struct net_device *dev;
2915 dev = __dev_get_by_index(net, iif);
2916 if (dev == NULL) {
2917 err = -ENODEV;
2918 goto errout_free;
2921 skb->protocol = htons(ETH_P_IP);
2922 skb->dev = dev;
2923 skb->mark = mark;
2924 local_bh_disable();
2925 err = ip_route_input(skb, dst, src, rtm->rtm_tos, dev);
2926 local_bh_enable();
2928 rt = skb_rtable(skb);
2929 if (err == 0 && rt->dst.error)
2930 err = -rt->dst.error;
2931 } else {
2932 struct flowi4 fl4 = {
2933 .daddr = dst,
2934 .saddr = src,
2935 .flowi4_tos = rtm->rtm_tos,
2936 .flowi4_oif = tb[RTA_OIF] ? nla_get_u32(tb[RTA_OIF]) : 0,
2937 .flowi4_mark = mark,
2939 rt = ip_route_output_key(net, &fl4);
2941 err = 0;
2942 if (IS_ERR(rt))
2943 err = PTR_ERR(rt);
2946 if (err)
2947 goto errout_free;
2949 skb_dst_set(skb, &rt->dst);
2950 if (rtm->rtm_flags & RTM_F_NOTIFY)
2951 rt->rt_flags |= RTCF_NOTIFY;
2953 err = rt_fill_info(net, skb, NETLINK_CB(in_skb).pid, nlh->nlmsg_seq,
2954 RTM_NEWROUTE, 0, 0);
2955 if (err <= 0)
2956 goto errout_free;
2958 err = rtnl_unicast(skb, net, NETLINK_CB(in_skb).pid);
2959 errout:
2960 return err;
2962 errout_free:
2963 kfree_skb(skb);
2964 goto errout;
2967 int ip_rt_dump(struct sk_buff *skb, struct netlink_callback *cb)
2969 struct rtable *rt;
2970 int h, s_h;
2971 int idx, s_idx;
2972 struct net *net;
2974 net = sock_net(skb->sk);
2976 s_h = cb->args[0];
2977 if (s_h < 0)
2978 s_h = 0;
2979 s_idx = idx = cb->args[1];
2980 for (h = s_h; h <= rt_hash_mask; h++, s_idx = 0) {
2981 if (!rt_hash_table[h].chain)
2982 continue;
2983 rcu_read_lock_bh();
2984 for (rt = rcu_dereference_bh(rt_hash_table[h].chain), idx = 0; rt;
2985 rt = rcu_dereference_bh(rt->dst.rt_next), idx++) {
2986 if (!net_eq(dev_net(rt->dst.dev), net) || idx < s_idx)
2987 continue;
2988 if (rt_is_expired(rt))
2989 continue;
2990 skb_dst_set_noref(skb, &rt->dst);
2991 if (rt_fill_info(net, skb, NETLINK_CB(cb->skb).pid,
2992 cb->nlh->nlmsg_seq, RTM_NEWROUTE,
2993 1, NLM_F_MULTI) <= 0) {
2994 skb_dst_drop(skb);
2995 rcu_read_unlock_bh();
2996 goto done;
2998 skb_dst_drop(skb);
3000 rcu_read_unlock_bh();
3003 done:
3004 cb->args[0] = h;
3005 cb->args[1] = idx;
3006 return skb->len;
3009 void ip_rt_multicast_event(struct in_device *in_dev)
3011 rt_cache_flush(dev_net(in_dev->dev), 0);
3014 #ifdef CONFIG_SYSCTL
3015 static int ipv4_sysctl_rtcache_flush(ctl_table *__ctl, int write,
3016 void __user *buffer,
3017 size_t *lenp, loff_t *ppos)
3019 if (write) {
3020 int flush_delay;
3021 ctl_table ctl;
3022 struct net *net;
3024 memcpy(&ctl, __ctl, sizeof(ctl));
3025 ctl.data = &flush_delay;
3026 proc_dointvec(&ctl, write, buffer, lenp, ppos);
3028 net = (struct net *)__ctl->extra1;
3029 rt_cache_flush(net, flush_delay);
3030 return 0;
3033 return -EINVAL;
3036 static ctl_table ipv4_route_table[] = {
3038 .procname = "gc_thresh",
3039 .data = &ipv4_dst_ops.gc_thresh,
3040 .maxlen = sizeof(int),
3041 .mode = 0644,
3042 .proc_handler = proc_dointvec,
3045 .procname = "max_size",
3046 .data = &ip_rt_max_size,
3047 .maxlen = sizeof(int),
3048 .mode = 0644,
3049 .proc_handler = proc_dointvec,
3052 /* Deprecated. Use gc_min_interval_ms */
3054 .procname = "gc_min_interval",
3055 .data = &ip_rt_gc_min_interval,
3056 .maxlen = sizeof(int),
3057 .mode = 0644,
3058 .proc_handler = proc_dointvec_jiffies,
3061 .procname = "gc_min_interval_ms",
3062 .data = &ip_rt_gc_min_interval,
3063 .maxlen = sizeof(int),
3064 .mode = 0644,
3065 .proc_handler = proc_dointvec_ms_jiffies,
3068 .procname = "gc_timeout",
3069 .data = &ip_rt_gc_timeout,
3070 .maxlen = sizeof(int),
3071 .mode = 0644,
3072 .proc_handler = proc_dointvec_jiffies,
3075 .procname = "gc_interval",
3076 .data = &ip_rt_gc_interval,
3077 .maxlen = sizeof(int),
3078 .mode = 0644,
3079 .proc_handler = proc_dointvec_jiffies,
3082 .procname = "redirect_load",
3083 .data = &ip_rt_redirect_load,
3084 .maxlen = sizeof(int),
3085 .mode = 0644,
3086 .proc_handler = proc_dointvec,
3089 .procname = "redirect_number",
3090 .data = &ip_rt_redirect_number,
3091 .maxlen = sizeof(int),
3092 .mode = 0644,
3093 .proc_handler = proc_dointvec,
3096 .procname = "redirect_silence",
3097 .data = &ip_rt_redirect_silence,
3098 .maxlen = sizeof(int),
3099 .mode = 0644,
3100 .proc_handler = proc_dointvec,
3103 .procname = "error_cost",
3104 .data = &ip_rt_error_cost,
3105 .maxlen = sizeof(int),
3106 .mode = 0644,
3107 .proc_handler = proc_dointvec,
3110 .procname = "error_burst",
3111 .data = &ip_rt_error_burst,
3112 .maxlen = sizeof(int),
3113 .mode = 0644,
3114 .proc_handler = proc_dointvec,
3117 .procname = "gc_elasticity",
3118 .data = &ip_rt_gc_elasticity,
3119 .maxlen = sizeof(int),
3120 .mode = 0644,
3121 .proc_handler = proc_dointvec,
3124 .procname = "mtu_expires",
3125 .data = &ip_rt_mtu_expires,
3126 .maxlen = sizeof(int),
3127 .mode = 0644,
3128 .proc_handler = proc_dointvec_jiffies,
3131 .procname = "min_pmtu",
3132 .data = &ip_rt_min_pmtu,
3133 .maxlen = sizeof(int),
3134 .mode = 0644,
3135 .proc_handler = proc_dointvec,
3138 .procname = "min_adv_mss",
3139 .data = &ip_rt_min_advmss,
3140 .maxlen = sizeof(int),
3141 .mode = 0644,
3142 .proc_handler = proc_dointvec,
3147 static struct ctl_table empty[1];
3149 static struct ctl_table ipv4_skeleton[] =
3151 { .procname = "route",
3152 .mode = 0555, .child = ipv4_route_table},
3153 { .procname = "neigh",
3154 .mode = 0555, .child = empty},
3158 static __net_initdata struct ctl_path ipv4_path[] = {
3159 { .procname = "net", },
3160 { .procname = "ipv4", },
3161 { },
3164 static struct ctl_table ipv4_route_flush_table[] = {
3166 .procname = "flush",
3167 .maxlen = sizeof(int),
3168 .mode = 0200,
3169 .proc_handler = ipv4_sysctl_rtcache_flush,
3171 { },
3174 static __net_initdata struct ctl_path ipv4_route_path[] = {
3175 { .procname = "net", },
3176 { .procname = "ipv4", },
3177 { .procname = "route", },
3178 { },
3181 static __net_init int sysctl_route_net_init(struct net *net)
3183 struct ctl_table *tbl;
3185 tbl = ipv4_route_flush_table;
3186 if (!net_eq(net, &init_net)) {
3187 tbl = kmemdup(tbl, sizeof(ipv4_route_flush_table), GFP_KERNEL);
3188 if (tbl == NULL)
3189 goto err_dup;
3191 tbl[0].extra1 = net;
3193 net->ipv4.route_hdr =
3194 register_net_sysctl_table(net, ipv4_route_path, tbl);
3195 if (net->ipv4.route_hdr == NULL)
3196 goto err_reg;
3197 return 0;
3199 err_reg:
3200 if (tbl != ipv4_route_flush_table)
3201 kfree(tbl);
3202 err_dup:
3203 return -ENOMEM;
3206 static __net_exit void sysctl_route_net_exit(struct net *net)
3208 struct ctl_table *tbl;
3210 tbl = net->ipv4.route_hdr->ctl_table_arg;
3211 unregister_net_sysctl_table(net->ipv4.route_hdr);
3212 BUG_ON(tbl == ipv4_route_flush_table);
3213 kfree(tbl);
3216 static __net_initdata struct pernet_operations sysctl_route_ops = {
3217 .init = sysctl_route_net_init,
3218 .exit = sysctl_route_net_exit,
3220 #endif
3222 static __net_init int rt_genid_init(struct net *net)
3224 get_random_bytes(&net->ipv4.rt_genid,
3225 sizeof(net->ipv4.rt_genid));
3226 get_random_bytes(&net->ipv4.dev_addr_genid,
3227 sizeof(net->ipv4.dev_addr_genid));
3228 return 0;
3231 static __net_initdata struct pernet_operations rt_genid_ops = {
3232 .init = rt_genid_init,
3236 #ifdef CONFIG_IP_ROUTE_CLASSID
3237 struct ip_rt_acct __percpu *ip_rt_acct __read_mostly;
3238 #endif /* CONFIG_IP_ROUTE_CLASSID */
3240 static __initdata unsigned long rhash_entries;
3241 static int __init set_rhash_entries(char *str)
3243 if (!str)
3244 return 0;
3245 rhash_entries = simple_strtoul(str, &str, 0);
3246 return 1;
3248 __setup("rhash_entries=", set_rhash_entries);
3250 int __init ip_rt_init(void)
3252 int rc = 0;
3254 #ifdef CONFIG_IP_ROUTE_CLASSID
3255 ip_rt_acct = __alloc_percpu(256 * sizeof(struct ip_rt_acct), __alignof__(struct ip_rt_acct));
3256 if (!ip_rt_acct)
3257 panic("IP: failed to allocate ip_rt_acct\n");
3258 #endif
3260 ipv4_dst_ops.kmem_cachep =
3261 kmem_cache_create("ip_dst_cache", sizeof(struct rtable), 0,
3262 SLAB_HWCACHE_ALIGN|SLAB_PANIC, NULL);
3264 ipv4_dst_blackhole_ops.kmem_cachep = ipv4_dst_ops.kmem_cachep;
3266 if (dst_entries_init(&ipv4_dst_ops) < 0)
3267 panic("IP: failed to allocate ipv4_dst_ops counter\n");
3269 if (dst_entries_init(&ipv4_dst_blackhole_ops) < 0)
3270 panic("IP: failed to allocate ipv4_dst_blackhole_ops counter\n");
3272 rt_hash_table = (struct rt_hash_bucket *)
3273 alloc_large_system_hash("IP route cache",
3274 sizeof(struct rt_hash_bucket),
3275 rhash_entries,
3276 (totalram_pages >= 128 * 1024) ?
3277 15 : 17,
3279 &rt_hash_log,
3280 &rt_hash_mask,
3281 rhash_entries ? 0 : 512 * 1024);
3282 memset(rt_hash_table, 0, (rt_hash_mask + 1) * sizeof(struct rt_hash_bucket));
3283 rt_hash_lock_init();
3285 ipv4_dst_ops.gc_thresh = (rt_hash_mask + 1);
3286 ip_rt_max_size = (rt_hash_mask + 1) * 16;
3288 devinet_init();
3289 ip_fib_init();
3291 if (ip_rt_proc_init())
3292 printk(KERN_ERR "Unable to create route proc files\n");
3293 #ifdef CONFIG_XFRM
3294 xfrm_init();
3295 xfrm4_init(ip_rt_max_size);
3296 #endif
3297 rtnl_register(PF_INET, RTM_GETROUTE, inet_rtm_getroute, NULL);
3299 #ifdef CONFIG_SYSCTL
3300 register_pernet_subsys(&sysctl_route_ops);
3301 #endif
3302 register_pernet_subsys(&rt_genid_ops);
3303 return rc;
3306 #ifdef CONFIG_SYSCTL
3308 * We really need to sanitize the damn ipv4 init order, then all
3309 * this nonsense will go away.
3311 void __init ip_static_sysctl_init(void)
3313 register_sysctl_paths(ipv4_path, ipv4_skeleton);
3315 #endif