xref: /openbmc/linux/net/ipv4/route.c (revision d7a3d85e)
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.
5  *
6  *		ROUTE - implementation of the IP router.
7  *
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>
13  *
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.
39  *
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
58  *
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.
63  */
64 
65 #define pr_fmt(fmt) "IPv4: " fmt
66 
67 #include <linux/module.h>
68 #include <asm/uaccess.h>
69 #include <linux/bitops.h>
70 #include <linux/types.h>
71 #include <linux/kernel.h>
72 #include <linux/mm.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/skbuff.h>
83 #include <linux/inetdevice.h>
84 #include <linux/igmp.h>
85 #include <linux/pkt_sched.h>
86 #include <linux/mroute.h>
87 #include <linux/netfilter_ipv4.h>
88 #include <linux/random.h>
89 #include <linux/rcupdate.h>
90 #include <linux/times.h>
91 #include <linux/slab.h>
92 #include <linux/jhash.h>
93 #include <net/dst.h>
94 #include <net/net_namespace.h>
95 #include <net/protocol.h>
96 #include <net/ip.h>
97 #include <net/route.h>
98 #include <net/inetpeer.h>
99 #include <net/sock.h>
100 #include <net/ip_fib.h>
101 #include <net/arp.h>
102 #include <net/tcp.h>
103 #include <net/icmp.h>
104 #include <net/xfrm.h>
105 #include <net/netevent.h>
106 #include <net/rtnetlink.h>
107 #ifdef CONFIG_SYSCTL
108 #include <linux/sysctl.h>
109 #include <linux/kmemleak.h>
110 #endif
111 #include <net/secure_seq.h>
112 
113 #define RT_FL_TOS(oldflp4) \
114 	((oldflp4)->flowi4_tos & (IPTOS_RT_MASK | RTO_ONLINK))
115 
116 #define RT_GC_TIMEOUT (300*HZ)
117 
118 static int ip_rt_max_size;
119 static int ip_rt_redirect_number __read_mostly	= 9;
120 static int ip_rt_redirect_load __read_mostly	= HZ / 50;
121 static int ip_rt_redirect_silence __read_mostly	= ((HZ / 50) << (9 + 1));
122 static int ip_rt_error_cost __read_mostly	= HZ;
123 static int ip_rt_error_burst __read_mostly	= 5 * HZ;
124 static int ip_rt_mtu_expires __read_mostly	= 10 * 60 * HZ;
125 static int ip_rt_min_pmtu __read_mostly		= 512 + 20 + 20;
126 static int ip_rt_min_advmss __read_mostly	= 256;
127 
128 /*
129  *	Interface to generic destination cache.
130  */
131 
132 static struct dst_entry *ipv4_dst_check(struct dst_entry *dst, u32 cookie);
133 static unsigned int	 ipv4_default_advmss(const struct dst_entry *dst);
134 static unsigned int	 ipv4_mtu(const struct dst_entry *dst);
135 static struct dst_entry *ipv4_negative_advice(struct dst_entry *dst);
136 static void		 ipv4_link_failure(struct sk_buff *skb);
137 static void		 ip_rt_update_pmtu(struct dst_entry *dst, struct sock *sk,
138 					   struct sk_buff *skb, u32 mtu);
139 static void		 ip_do_redirect(struct dst_entry *dst, struct sock *sk,
140 					struct sk_buff *skb);
141 static void		ipv4_dst_destroy(struct dst_entry *dst);
142 
143 static u32 *ipv4_cow_metrics(struct dst_entry *dst, unsigned long old)
144 {
145 	WARN_ON(1);
146 	return NULL;
147 }
148 
149 static struct neighbour *ipv4_neigh_lookup(const struct dst_entry *dst,
150 					   struct sk_buff *skb,
151 					   const void *daddr);
152 
153 static struct dst_ops ipv4_dst_ops = {
154 	.family =		AF_INET,
155 	.check =		ipv4_dst_check,
156 	.default_advmss =	ipv4_default_advmss,
157 	.mtu =			ipv4_mtu,
158 	.cow_metrics =		ipv4_cow_metrics,
159 	.destroy =		ipv4_dst_destroy,
160 	.negative_advice =	ipv4_negative_advice,
161 	.link_failure =		ipv4_link_failure,
162 	.update_pmtu =		ip_rt_update_pmtu,
163 	.redirect =		ip_do_redirect,
164 	.local_out =		__ip_local_out,
165 	.neigh_lookup =		ipv4_neigh_lookup,
166 };
167 
168 #define ECN_OR_COST(class)	TC_PRIO_##class
169 
170 const __u8 ip_tos2prio[16] = {
171 	TC_PRIO_BESTEFFORT,
172 	ECN_OR_COST(BESTEFFORT),
173 	TC_PRIO_BESTEFFORT,
174 	ECN_OR_COST(BESTEFFORT),
175 	TC_PRIO_BULK,
176 	ECN_OR_COST(BULK),
177 	TC_PRIO_BULK,
178 	ECN_OR_COST(BULK),
179 	TC_PRIO_INTERACTIVE,
180 	ECN_OR_COST(INTERACTIVE),
181 	TC_PRIO_INTERACTIVE,
182 	ECN_OR_COST(INTERACTIVE),
183 	TC_PRIO_INTERACTIVE_BULK,
184 	ECN_OR_COST(INTERACTIVE_BULK),
185 	TC_PRIO_INTERACTIVE_BULK,
186 	ECN_OR_COST(INTERACTIVE_BULK)
187 };
188 EXPORT_SYMBOL(ip_tos2prio);
189 
190 static DEFINE_PER_CPU(struct rt_cache_stat, rt_cache_stat);
191 #define RT_CACHE_STAT_INC(field) raw_cpu_inc(rt_cache_stat.field)
192 
193 #ifdef CONFIG_PROC_FS
194 static void *rt_cache_seq_start(struct seq_file *seq, loff_t *pos)
195 {
196 	if (*pos)
197 		return NULL;
198 	return SEQ_START_TOKEN;
199 }
200 
201 static void *rt_cache_seq_next(struct seq_file *seq, void *v, loff_t *pos)
202 {
203 	++*pos;
204 	return NULL;
205 }
206 
207 static void rt_cache_seq_stop(struct seq_file *seq, void *v)
208 {
209 }
210 
211 static int rt_cache_seq_show(struct seq_file *seq, void *v)
212 {
213 	if (v == SEQ_START_TOKEN)
214 		seq_printf(seq, "%-127s\n",
215 			   "Iface\tDestination\tGateway \tFlags\t\tRefCnt\tUse\t"
216 			   "Metric\tSource\t\tMTU\tWindow\tIRTT\tTOS\tHHRef\t"
217 			   "HHUptod\tSpecDst");
218 	return 0;
219 }
220 
221 static const struct seq_operations rt_cache_seq_ops = {
222 	.start  = rt_cache_seq_start,
223 	.next   = rt_cache_seq_next,
224 	.stop   = rt_cache_seq_stop,
225 	.show   = rt_cache_seq_show,
226 };
227 
228 static int rt_cache_seq_open(struct inode *inode, struct file *file)
229 {
230 	return seq_open(file, &rt_cache_seq_ops);
231 }
232 
233 static const struct file_operations rt_cache_seq_fops = {
234 	.owner	 = THIS_MODULE,
235 	.open	 = rt_cache_seq_open,
236 	.read	 = seq_read,
237 	.llseek	 = seq_lseek,
238 	.release = seq_release,
239 };
240 
241 
242 static void *rt_cpu_seq_start(struct seq_file *seq, loff_t *pos)
243 {
244 	int cpu;
245 
246 	if (*pos == 0)
247 		return SEQ_START_TOKEN;
248 
249 	for (cpu = *pos-1; cpu < nr_cpu_ids; ++cpu) {
250 		if (!cpu_possible(cpu))
251 			continue;
252 		*pos = cpu+1;
253 		return &per_cpu(rt_cache_stat, cpu);
254 	}
255 	return NULL;
256 }
257 
258 static void *rt_cpu_seq_next(struct seq_file *seq, void *v, loff_t *pos)
259 {
260 	int cpu;
261 
262 	for (cpu = *pos; cpu < nr_cpu_ids; ++cpu) {
263 		if (!cpu_possible(cpu))
264 			continue;
265 		*pos = cpu+1;
266 		return &per_cpu(rt_cache_stat, cpu);
267 	}
268 	return NULL;
269 
270 }
271 
272 static void rt_cpu_seq_stop(struct seq_file *seq, void *v)
273 {
274 
275 }
276 
277 static int rt_cpu_seq_show(struct seq_file *seq, void *v)
278 {
279 	struct rt_cache_stat *st = v;
280 
281 	if (v == SEQ_START_TOKEN) {
282 		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");
283 		return 0;
284 	}
285 
286 	seq_printf(seq,"%08x  %08x %08x %08x %08x %08x %08x %08x "
287 		   " %08x %08x %08x %08x %08x %08x %08x %08x %08x \n",
288 		   dst_entries_get_slow(&ipv4_dst_ops),
289 		   0, /* st->in_hit */
290 		   st->in_slow_tot,
291 		   st->in_slow_mc,
292 		   st->in_no_route,
293 		   st->in_brd,
294 		   st->in_martian_dst,
295 		   st->in_martian_src,
296 
297 		   0, /* st->out_hit */
298 		   st->out_slow_tot,
299 		   st->out_slow_mc,
300 
301 		   0, /* st->gc_total */
302 		   0, /* st->gc_ignored */
303 		   0, /* st->gc_goal_miss */
304 		   0, /* st->gc_dst_overflow */
305 		   0, /* st->in_hlist_search */
306 		   0  /* st->out_hlist_search */
307 		);
308 	return 0;
309 }
310 
311 static const struct seq_operations rt_cpu_seq_ops = {
312 	.start  = rt_cpu_seq_start,
313 	.next   = rt_cpu_seq_next,
314 	.stop   = rt_cpu_seq_stop,
315 	.show   = rt_cpu_seq_show,
316 };
317 
318 
319 static int rt_cpu_seq_open(struct inode *inode, struct file *file)
320 {
321 	return seq_open(file, &rt_cpu_seq_ops);
322 }
323 
324 static const struct file_operations rt_cpu_seq_fops = {
325 	.owner	 = THIS_MODULE,
326 	.open	 = rt_cpu_seq_open,
327 	.read	 = seq_read,
328 	.llseek	 = seq_lseek,
329 	.release = seq_release,
330 };
331 
332 #ifdef CONFIG_IP_ROUTE_CLASSID
333 static int rt_acct_proc_show(struct seq_file *m, void *v)
334 {
335 	struct ip_rt_acct *dst, *src;
336 	unsigned int i, j;
337 
338 	dst = kcalloc(256, sizeof(struct ip_rt_acct), GFP_KERNEL);
339 	if (!dst)
340 		return -ENOMEM;
341 
342 	for_each_possible_cpu(i) {
343 		src = (struct ip_rt_acct *)per_cpu_ptr(ip_rt_acct, i);
344 		for (j = 0; j < 256; j++) {
345 			dst[j].o_bytes   += src[j].o_bytes;
346 			dst[j].o_packets += src[j].o_packets;
347 			dst[j].i_bytes   += src[j].i_bytes;
348 			dst[j].i_packets += src[j].i_packets;
349 		}
350 	}
351 
352 	seq_write(m, dst, 256 * sizeof(struct ip_rt_acct));
353 	kfree(dst);
354 	return 0;
355 }
356 
357 static int rt_acct_proc_open(struct inode *inode, struct file *file)
358 {
359 	return single_open(file, rt_acct_proc_show, NULL);
360 }
361 
362 static const struct file_operations rt_acct_proc_fops = {
363 	.owner		= THIS_MODULE,
364 	.open		= rt_acct_proc_open,
365 	.read		= seq_read,
366 	.llseek		= seq_lseek,
367 	.release	= single_release,
368 };
369 #endif
370 
371 static int __net_init ip_rt_do_proc_init(struct net *net)
372 {
373 	struct proc_dir_entry *pde;
374 
375 	pde = proc_create("rt_cache", S_IRUGO, net->proc_net,
376 			  &rt_cache_seq_fops);
377 	if (!pde)
378 		goto err1;
379 
380 	pde = proc_create("rt_cache", S_IRUGO,
381 			  net->proc_net_stat, &rt_cpu_seq_fops);
382 	if (!pde)
383 		goto err2;
384 
385 #ifdef CONFIG_IP_ROUTE_CLASSID
386 	pde = proc_create("rt_acct", 0, net->proc_net, &rt_acct_proc_fops);
387 	if (!pde)
388 		goto err3;
389 #endif
390 	return 0;
391 
392 #ifdef CONFIG_IP_ROUTE_CLASSID
393 err3:
394 	remove_proc_entry("rt_cache", net->proc_net_stat);
395 #endif
396 err2:
397 	remove_proc_entry("rt_cache", net->proc_net);
398 err1:
399 	return -ENOMEM;
400 }
401 
402 static void __net_exit ip_rt_do_proc_exit(struct net *net)
403 {
404 	remove_proc_entry("rt_cache", net->proc_net_stat);
405 	remove_proc_entry("rt_cache", net->proc_net);
406 #ifdef CONFIG_IP_ROUTE_CLASSID
407 	remove_proc_entry("rt_acct", net->proc_net);
408 #endif
409 }
410 
411 static struct pernet_operations ip_rt_proc_ops __net_initdata =  {
412 	.init = ip_rt_do_proc_init,
413 	.exit = ip_rt_do_proc_exit,
414 };
415 
416 static int __init ip_rt_proc_init(void)
417 {
418 	return register_pernet_subsys(&ip_rt_proc_ops);
419 }
420 
421 #else
422 static inline int ip_rt_proc_init(void)
423 {
424 	return 0;
425 }
426 #endif /* CONFIG_PROC_FS */
427 
428 static inline bool rt_is_expired(const struct rtable *rth)
429 {
430 	return rth->rt_genid != rt_genid_ipv4(dev_net(rth->dst.dev));
431 }
432 
433 void rt_cache_flush(struct net *net)
434 {
435 	rt_genid_bump_ipv4(net);
436 }
437 
438 static struct neighbour *ipv4_neigh_lookup(const struct dst_entry *dst,
439 					   struct sk_buff *skb,
440 					   const void *daddr)
441 {
442 	struct net_device *dev = dst->dev;
443 	const __be32 *pkey = daddr;
444 	const struct rtable *rt;
445 	struct neighbour *n;
446 
447 	rt = (const struct rtable *) dst;
448 	if (rt->rt_gateway)
449 		pkey = (const __be32 *) &rt->rt_gateway;
450 	else if (skb)
451 		pkey = &ip_hdr(skb)->daddr;
452 
453 	n = __ipv4_neigh_lookup(dev, *(__force u32 *)pkey);
454 	if (n)
455 		return n;
456 	return neigh_create(&arp_tbl, pkey, dev);
457 }
458 
459 #define IP_IDENTS_SZ 2048u
460 struct ip_ident_bucket {
461 	atomic_t	id;
462 	u32		stamp32;
463 };
464 
465 static struct ip_ident_bucket *ip_idents __read_mostly;
466 
467 /* In order to protect privacy, we add a perturbation to identifiers
468  * if one generator is seldom used. This makes hard for an attacker
469  * to infer how many packets were sent between two points in time.
470  */
471 u32 ip_idents_reserve(u32 hash, int segs)
472 {
473 	struct ip_ident_bucket *bucket = ip_idents + hash % IP_IDENTS_SZ;
474 	u32 old = ACCESS_ONCE(bucket->stamp32);
475 	u32 now = (u32)jiffies;
476 	u32 delta = 0;
477 
478 	if (old != now && cmpxchg(&bucket->stamp32, old, now) == old)
479 		delta = prandom_u32_max(now - old);
480 
481 	return atomic_add_return(segs + delta, &bucket->id) - segs;
482 }
483 EXPORT_SYMBOL(ip_idents_reserve);
484 
485 void __ip_select_ident(struct net *net, struct iphdr *iph, int segs)
486 {
487 	static u32 ip_idents_hashrnd __read_mostly;
488 	u32 hash, id;
489 
490 	net_get_random_once(&ip_idents_hashrnd, sizeof(ip_idents_hashrnd));
491 
492 	hash = jhash_3words((__force u32)iph->daddr,
493 			    (__force u32)iph->saddr,
494 			    iph->protocol ^ net_hash_mix(net),
495 			    ip_idents_hashrnd);
496 	id = ip_idents_reserve(hash, segs);
497 	iph->id = htons(id);
498 }
499 EXPORT_SYMBOL(__ip_select_ident);
500 
501 static void __build_flow_key(struct flowi4 *fl4, const struct sock *sk,
502 			     const struct iphdr *iph,
503 			     int oif, u8 tos,
504 			     u8 prot, u32 mark, int flow_flags)
505 {
506 	if (sk) {
507 		const struct inet_sock *inet = inet_sk(sk);
508 
509 		oif = sk->sk_bound_dev_if;
510 		mark = sk->sk_mark;
511 		tos = RT_CONN_FLAGS(sk);
512 		prot = inet->hdrincl ? IPPROTO_RAW : sk->sk_protocol;
513 	}
514 	flowi4_init_output(fl4, oif, mark, tos,
515 			   RT_SCOPE_UNIVERSE, prot,
516 			   flow_flags,
517 			   iph->daddr, iph->saddr, 0, 0);
518 }
519 
520 static void build_skb_flow_key(struct flowi4 *fl4, const struct sk_buff *skb,
521 			       const struct sock *sk)
522 {
523 	const struct iphdr *iph = ip_hdr(skb);
524 	int oif = skb->dev->ifindex;
525 	u8 tos = RT_TOS(iph->tos);
526 	u8 prot = iph->protocol;
527 	u32 mark = skb->mark;
528 
529 	__build_flow_key(fl4, sk, iph, oif, tos, prot, mark, 0);
530 }
531 
532 static void build_sk_flow_key(struct flowi4 *fl4, const struct sock *sk)
533 {
534 	const struct inet_sock *inet = inet_sk(sk);
535 	const struct ip_options_rcu *inet_opt;
536 	__be32 daddr = inet->inet_daddr;
537 
538 	rcu_read_lock();
539 	inet_opt = rcu_dereference(inet->inet_opt);
540 	if (inet_opt && inet_opt->opt.srr)
541 		daddr = inet_opt->opt.faddr;
542 	flowi4_init_output(fl4, sk->sk_bound_dev_if, sk->sk_mark,
543 			   RT_CONN_FLAGS(sk), RT_SCOPE_UNIVERSE,
544 			   inet->hdrincl ? IPPROTO_RAW : sk->sk_protocol,
545 			   inet_sk_flowi_flags(sk),
546 			   daddr, inet->inet_saddr, 0, 0);
547 	rcu_read_unlock();
548 }
549 
550 static void ip_rt_build_flow_key(struct flowi4 *fl4, const struct sock *sk,
551 				 const struct sk_buff *skb)
552 {
553 	if (skb)
554 		build_skb_flow_key(fl4, skb, sk);
555 	else
556 		build_sk_flow_key(fl4, sk);
557 }
558 
559 static inline void rt_free(struct rtable *rt)
560 {
561 	call_rcu(&rt->dst.rcu_head, dst_rcu_free);
562 }
563 
564 static DEFINE_SPINLOCK(fnhe_lock);
565 
566 static void fnhe_flush_routes(struct fib_nh_exception *fnhe)
567 {
568 	struct rtable *rt;
569 
570 	rt = rcu_dereference(fnhe->fnhe_rth_input);
571 	if (rt) {
572 		RCU_INIT_POINTER(fnhe->fnhe_rth_input, NULL);
573 		rt_free(rt);
574 	}
575 	rt = rcu_dereference(fnhe->fnhe_rth_output);
576 	if (rt) {
577 		RCU_INIT_POINTER(fnhe->fnhe_rth_output, NULL);
578 		rt_free(rt);
579 	}
580 }
581 
582 static struct fib_nh_exception *fnhe_oldest(struct fnhe_hash_bucket *hash)
583 {
584 	struct fib_nh_exception *fnhe, *oldest;
585 
586 	oldest = rcu_dereference(hash->chain);
587 	for (fnhe = rcu_dereference(oldest->fnhe_next); fnhe;
588 	     fnhe = rcu_dereference(fnhe->fnhe_next)) {
589 		if (time_before(fnhe->fnhe_stamp, oldest->fnhe_stamp))
590 			oldest = fnhe;
591 	}
592 	fnhe_flush_routes(oldest);
593 	return oldest;
594 }
595 
596 static inline u32 fnhe_hashfun(__be32 daddr)
597 {
598 	static u32 fnhe_hashrnd __read_mostly;
599 	u32 hval;
600 
601 	net_get_random_once(&fnhe_hashrnd, sizeof(fnhe_hashrnd));
602 	hval = jhash_1word((__force u32) daddr, fnhe_hashrnd);
603 	return hash_32(hval, FNHE_HASH_SHIFT);
604 }
605 
606 static void fill_route_from_fnhe(struct rtable *rt, struct fib_nh_exception *fnhe)
607 {
608 	rt->rt_pmtu = fnhe->fnhe_pmtu;
609 	rt->dst.expires = fnhe->fnhe_expires;
610 
611 	if (fnhe->fnhe_gw) {
612 		rt->rt_flags |= RTCF_REDIRECTED;
613 		rt->rt_gateway = fnhe->fnhe_gw;
614 		rt->rt_uses_gateway = 1;
615 	}
616 }
617 
618 static void update_or_create_fnhe(struct fib_nh *nh, __be32 daddr, __be32 gw,
619 				  u32 pmtu, unsigned long expires)
620 {
621 	struct fnhe_hash_bucket *hash;
622 	struct fib_nh_exception *fnhe;
623 	struct rtable *rt;
624 	unsigned int i;
625 	int depth;
626 	u32 hval = fnhe_hashfun(daddr);
627 
628 	spin_lock_bh(&fnhe_lock);
629 
630 	hash = rcu_dereference(nh->nh_exceptions);
631 	if (!hash) {
632 		hash = kzalloc(FNHE_HASH_SIZE * sizeof(*hash), GFP_ATOMIC);
633 		if (!hash)
634 			goto out_unlock;
635 		rcu_assign_pointer(nh->nh_exceptions, hash);
636 	}
637 
638 	hash += hval;
639 
640 	depth = 0;
641 	for (fnhe = rcu_dereference(hash->chain); fnhe;
642 	     fnhe = rcu_dereference(fnhe->fnhe_next)) {
643 		if (fnhe->fnhe_daddr == daddr)
644 			break;
645 		depth++;
646 	}
647 
648 	if (fnhe) {
649 		if (gw)
650 			fnhe->fnhe_gw = gw;
651 		if (pmtu) {
652 			fnhe->fnhe_pmtu = pmtu;
653 			fnhe->fnhe_expires = max(1UL, expires);
654 		}
655 		/* Update all cached dsts too */
656 		rt = rcu_dereference(fnhe->fnhe_rth_input);
657 		if (rt)
658 			fill_route_from_fnhe(rt, fnhe);
659 		rt = rcu_dereference(fnhe->fnhe_rth_output);
660 		if (rt)
661 			fill_route_from_fnhe(rt, fnhe);
662 	} else {
663 		if (depth > FNHE_RECLAIM_DEPTH)
664 			fnhe = fnhe_oldest(hash);
665 		else {
666 			fnhe = kzalloc(sizeof(*fnhe), GFP_ATOMIC);
667 			if (!fnhe)
668 				goto out_unlock;
669 
670 			fnhe->fnhe_next = hash->chain;
671 			rcu_assign_pointer(hash->chain, fnhe);
672 		}
673 		fnhe->fnhe_genid = fnhe_genid(dev_net(nh->nh_dev));
674 		fnhe->fnhe_daddr = daddr;
675 		fnhe->fnhe_gw = gw;
676 		fnhe->fnhe_pmtu = pmtu;
677 		fnhe->fnhe_expires = expires;
678 
679 		/* Exception created; mark the cached routes for the nexthop
680 		 * stale, so anyone caching it rechecks if this exception
681 		 * applies to them.
682 		 */
683 		rt = rcu_dereference(nh->nh_rth_input);
684 		if (rt)
685 			rt->dst.obsolete = DST_OBSOLETE_KILL;
686 
687 		for_each_possible_cpu(i) {
688 			struct rtable __rcu **prt;
689 			prt = per_cpu_ptr(nh->nh_pcpu_rth_output, i);
690 			rt = rcu_dereference(*prt);
691 			if (rt)
692 				rt->dst.obsolete = DST_OBSOLETE_KILL;
693 		}
694 	}
695 
696 	fnhe->fnhe_stamp = jiffies;
697 
698 out_unlock:
699 	spin_unlock_bh(&fnhe_lock);
700 }
701 
702 static void __ip_do_redirect(struct rtable *rt, struct sk_buff *skb, struct flowi4 *fl4,
703 			     bool kill_route)
704 {
705 	__be32 new_gw = icmp_hdr(skb)->un.gateway;
706 	__be32 old_gw = ip_hdr(skb)->saddr;
707 	struct net_device *dev = skb->dev;
708 	struct in_device *in_dev;
709 	struct fib_result res;
710 	struct neighbour *n;
711 	struct net *net;
712 
713 	switch (icmp_hdr(skb)->code & 7) {
714 	case ICMP_REDIR_NET:
715 	case ICMP_REDIR_NETTOS:
716 	case ICMP_REDIR_HOST:
717 	case ICMP_REDIR_HOSTTOS:
718 		break;
719 
720 	default:
721 		return;
722 	}
723 
724 	if (rt->rt_gateway != old_gw)
725 		return;
726 
727 	in_dev = __in_dev_get_rcu(dev);
728 	if (!in_dev)
729 		return;
730 
731 	net = dev_net(dev);
732 	if (new_gw == old_gw || !IN_DEV_RX_REDIRECTS(in_dev) ||
733 	    ipv4_is_multicast(new_gw) || ipv4_is_lbcast(new_gw) ||
734 	    ipv4_is_zeronet(new_gw))
735 		goto reject_redirect;
736 
737 	if (!IN_DEV_SHARED_MEDIA(in_dev)) {
738 		if (!inet_addr_onlink(in_dev, new_gw, old_gw))
739 			goto reject_redirect;
740 		if (IN_DEV_SEC_REDIRECTS(in_dev) && ip_fib_check_default(new_gw, dev))
741 			goto reject_redirect;
742 	} else {
743 		if (inet_addr_type(net, new_gw) != RTN_UNICAST)
744 			goto reject_redirect;
745 	}
746 
747 	n = ipv4_neigh_lookup(&rt->dst, NULL, &new_gw);
748 	if (!IS_ERR(n)) {
749 		if (!(n->nud_state & NUD_VALID)) {
750 			neigh_event_send(n, NULL);
751 		} else {
752 			if (fib_lookup(net, fl4, &res) == 0) {
753 				struct fib_nh *nh = &FIB_RES_NH(res);
754 
755 				update_or_create_fnhe(nh, fl4->daddr, new_gw,
756 						      0, 0);
757 			}
758 			if (kill_route)
759 				rt->dst.obsolete = DST_OBSOLETE_KILL;
760 			call_netevent_notifiers(NETEVENT_NEIGH_UPDATE, n);
761 		}
762 		neigh_release(n);
763 	}
764 	return;
765 
766 reject_redirect:
767 #ifdef CONFIG_IP_ROUTE_VERBOSE
768 	if (IN_DEV_LOG_MARTIANS(in_dev)) {
769 		const struct iphdr *iph = (const struct iphdr *) skb->data;
770 		__be32 daddr = iph->daddr;
771 		__be32 saddr = iph->saddr;
772 
773 		net_info_ratelimited("Redirect from %pI4 on %s about %pI4 ignored\n"
774 				     "  Advised path = %pI4 -> %pI4\n",
775 				     &old_gw, dev->name, &new_gw,
776 				     &saddr, &daddr);
777 	}
778 #endif
779 	;
780 }
781 
782 static void ip_do_redirect(struct dst_entry *dst, struct sock *sk, struct sk_buff *skb)
783 {
784 	struct rtable *rt;
785 	struct flowi4 fl4;
786 	const struct iphdr *iph = (const struct iphdr *) skb->data;
787 	int oif = skb->dev->ifindex;
788 	u8 tos = RT_TOS(iph->tos);
789 	u8 prot = iph->protocol;
790 	u32 mark = skb->mark;
791 
792 	rt = (struct rtable *) dst;
793 
794 	__build_flow_key(&fl4, sk, iph, oif, tos, prot, mark, 0);
795 	__ip_do_redirect(rt, skb, &fl4, true);
796 }
797 
798 static struct dst_entry *ipv4_negative_advice(struct dst_entry *dst)
799 {
800 	struct rtable *rt = (struct rtable *)dst;
801 	struct dst_entry *ret = dst;
802 
803 	if (rt) {
804 		if (dst->obsolete > 0) {
805 			ip_rt_put(rt);
806 			ret = NULL;
807 		} else if ((rt->rt_flags & RTCF_REDIRECTED) ||
808 			   rt->dst.expires) {
809 			ip_rt_put(rt);
810 			ret = NULL;
811 		}
812 	}
813 	return ret;
814 }
815 
816 /*
817  * Algorithm:
818  *	1. The first ip_rt_redirect_number redirects are sent
819  *	   with exponential backoff, then we stop sending them at all,
820  *	   assuming that the host ignores our redirects.
821  *	2. If we did not see packets requiring redirects
822  *	   during ip_rt_redirect_silence, we assume that the host
823  *	   forgot redirected route and start to send redirects again.
824  *
825  * This algorithm is much cheaper and more intelligent than dumb load limiting
826  * in icmp.c.
827  *
828  * NOTE. Do not forget to inhibit load limiting for redirects (redundant)
829  * and "frag. need" (breaks PMTU discovery) in icmp.c.
830  */
831 
832 void ip_rt_send_redirect(struct sk_buff *skb)
833 {
834 	struct rtable *rt = skb_rtable(skb);
835 	struct in_device *in_dev;
836 	struct inet_peer *peer;
837 	struct net *net;
838 	int log_martians;
839 
840 	rcu_read_lock();
841 	in_dev = __in_dev_get_rcu(rt->dst.dev);
842 	if (!in_dev || !IN_DEV_TX_REDIRECTS(in_dev)) {
843 		rcu_read_unlock();
844 		return;
845 	}
846 	log_martians = IN_DEV_LOG_MARTIANS(in_dev);
847 	rcu_read_unlock();
848 
849 	net = dev_net(rt->dst.dev);
850 	peer = inet_getpeer_v4(net->ipv4.peers, ip_hdr(skb)->saddr, 1);
851 	if (!peer) {
852 		icmp_send(skb, ICMP_REDIRECT, ICMP_REDIR_HOST,
853 			  rt_nexthop(rt, ip_hdr(skb)->daddr));
854 		return;
855 	}
856 
857 	/* No redirected packets during ip_rt_redirect_silence;
858 	 * reset the algorithm.
859 	 */
860 	if (time_after(jiffies, peer->rate_last + ip_rt_redirect_silence))
861 		peer->rate_tokens = 0;
862 
863 	/* Too many ignored redirects; do not send anything
864 	 * set dst.rate_last to the last seen redirected packet.
865 	 */
866 	if (peer->rate_tokens >= ip_rt_redirect_number) {
867 		peer->rate_last = jiffies;
868 		goto out_put_peer;
869 	}
870 
871 	/* Check for load limit; set rate_last to the latest sent
872 	 * redirect.
873 	 */
874 	if (peer->rate_tokens == 0 ||
875 	    time_after(jiffies,
876 		       (peer->rate_last +
877 			(ip_rt_redirect_load << peer->rate_tokens)))) {
878 		__be32 gw = rt_nexthop(rt, ip_hdr(skb)->daddr);
879 
880 		icmp_send(skb, ICMP_REDIRECT, ICMP_REDIR_HOST, gw);
881 		peer->rate_last = jiffies;
882 		++peer->rate_tokens;
883 #ifdef CONFIG_IP_ROUTE_VERBOSE
884 		if (log_martians &&
885 		    peer->rate_tokens == ip_rt_redirect_number)
886 			net_warn_ratelimited("host %pI4/if%d ignores redirects for %pI4 to %pI4\n",
887 					     &ip_hdr(skb)->saddr, inet_iif(skb),
888 					     &ip_hdr(skb)->daddr, &gw);
889 #endif
890 	}
891 out_put_peer:
892 	inet_putpeer(peer);
893 }
894 
895 static int ip_error(struct sk_buff *skb)
896 {
897 	struct in_device *in_dev = __in_dev_get_rcu(skb->dev);
898 	struct rtable *rt = skb_rtable(skb);
899 	struct inet_peer *peer;
900 	unsigned long now;
901 	struct net *net;
902 	bool send;
903 	int code;
904 
905 	/* IP on this device is disabled. */
906 	if (!in_dev)
907 		goto out;
908 
909 	net = dev_net(rt->dst.dev);
910 	if (!IN_DEV_FORWARD(in_dev)) {
911 		switch (rt->dst.error) {
912 		case EHOSTUNREACH:
913 			IP_INC_STATS_BH(net, IPSTATS_MIB_INADDRERRORS);
914 			break;
915 
916 		case ENETUNREACH:
917 			IP_INC_STATS_BH(net, IPSTATS_MIB_INNOROUTES);
918 			break;
919 		}
920 		goto out;
921 	}
922 
923 	switch (rt->dst.error) {
924 	case EINVAL:
925 	default:
926 		goto out;
927 	case EHOSTUNREACH:
928 		code = ICMP_HOST_UNREACH;
929 		break;
930 	case ENETUNREACH:
931 		code = ICMP_NET_UNREACH;
932 		IP_INC_STATS_BH(net, IPSTATS_MIB_INNOROUTES);
933 		break;
934 	case EACCES:
935 		code = ICMP_PKT_FILTERED;
936 		break;
937 	}
938 
939 	peer = inet_getpeer_v4(net->ipv4.peers, ip_hdr(skb)->saddr, 1);
940 
941 	send = true;
942 	if (peer) {
943 		now = jiffies;
944 		peer->rate_tokens += now - peer->rate_last;
945 		if (peer->rate_tokens > ip_rt_error_burst)
946 			peer->rate_tokens = ip_rt_error_burst;
947 		peer->rate_last = now;
948 		if (peer->rate_tokens >= ip_rt_error_cost)
949 			peer->rate_tokens -= ip_rt_error_cost;
950 		else
951 			send = false;
952 		inet_putpeer(peer);
953 	}
954 	if (send)
955 		icmp_send(skb, ICMP_DEST_UNREACH, code, 0);
956 
957 out:	kfree_skb(skb);
958 	return 0;
959 }
960 
961 static void __ip_rt_update_pmtu(struct rtable *rt, struct flowi4 *fl4, u32 mtu)
962 {
963 	struct dst_entry *dst = &rt->dst;
964 	struct fib_result res;
965 
966 	if (dst_metric_locked(dst, RTAX_MTU))
967 		return;
968 
969 	if (ipv4_mtu(dst) < mtu)
970 		return;
971 
972 	if (mtu < ip_rt_min_pmtu)
973 		mtu = ip_rt_min_pmtu;
974 
975 	if (rt->rt_pmtu == mtu &&
976 	    time_before(jiffies, dst->expires - ip_rt_mtu_expires / 2))
977 		return;
978 
979 	rcu_read_lock();
980 	if (fib_lookup(dev_net(dst->dev), fl4, &res) == 0) {
981 		struct fib_nh *nh = &FIB_RES_NH(res);
982 
983 		update_or_create_fnhe(nh, fl4->daddr, 0, mtu,
984 				      jiffies + ip_rt_mtu_expires);
985 	}
986 	rcu_read_unlock();
987 }
988 
989 static void ip_rt_update_pmtu(struct dst_entry *dst, struct sock *sk,
990 			      struct sk_buff *skb, u32 mtu)
991 {
992 	struct rtable *rt = (struct rtable *) dst;
993 	struct flowi4 fl4;
994 
995 	ip_rt_build_flow_key(&fl4, sk, skb);
996 	__ip_rt_update_pmtu(rt, &fl4, mtu);
997 }
998 
999 void ipv4_update_pmtu(struct sk_buff *skb, struct net *net, u32 mtu,
1000 		      int oif, u32 mark, u8 protocol, int flow_flags)
1001 {
1002 	const struct iphdr *iph = (const struct iphdr *) skb->data;
1003 	struct flowi4 fl4;
1004 	struct rtable *rt;
1005 
1006 	if (!mark)
1007 		mark = IP4_REPLY_MARK(net, skb->mark);
1008 
1009 	__build_flow_key(&fl4, NULL, iph, oif,
1010 			 RT_TOS(iph->tos), protocol, mark, flow_flags);
1011 	rt = __ip_route_output_key(net, &fl4);
1012 	if (!IS_ERR(rt)) {
1013 		__ip_rt_update_pmtu(rt, &fl4, mtu);
1014 		ip_rt_put(rt);
1015 	}
1016 }
1017 EXPORT_SYMBOL_GPL(ipv4_update_pmtu);
1018 
1019 static void __ipv4_sk_update_pmtu(struct sk_buff *skb, struct sock *sk, u32 mtu)
1020 {
1021 	const struct iphdr *iph = (const struct iphdr *) skb->data;
1022 	struct flowi4 fl4;
1023 	struct rtable *rt;
1024 
1025 	__build_flow_key(&fl4, sk, iph, 0, 0, 0, 0, 0);
1026 
1027 	if (!fl4.flowi4_mark)
1028 		fl4.flowi4_mark = IP4_REPLY_MARK(sock_net(sk), skb->mark);
1029 
1030 	rt = __ip_route_output_key(sock_net(sk), &fl4);
1031 	if (!IS_ERR(rt)) {
1032 		__ip_rt_update_pmtu(rt, &fl4, mtu);
1033 		ip_rt_put(rt);
1034 	}
1035 }
1036 
1037 void ipv4_sk_update_pmtu(struct sk_buff *skb, struct sock *sk, u32 mtu)
1038 {
1039 	const struct iphdr *iph = (const struct iphdr *) skb->data;
1040 	struct flowi4 fl4;
1041 	struct rtable *rt;
1042 	struct dst_entry *odst = NULL;
1043 	bool new = false;
1044 
1045 	bh_lock_sock(sk);
1046 
1047 	if (!ip_sk_accept_pmtu(sk))
1048 		goto out;
1049 
1050 	odst = sk_dst_get(sk);
1051 
1052 	if (sock_owned_by_user(sk) || !odst) {
1053 		__ipv4_sk_update_pmtu(skb, sk, mtu);
1054 		goto out;
1055 	}
1056 
1057 	__build_flow_key(&fl4, sk, iph, 0, 0, 0, 0, 0);
1058 
1059 	rt = (struct rtable *)odst;
1060 	if (odst->obsolete && !odst->ops->check(odst, 0)) {
1061 		rt = ip_route_output_flow(sock_net(sk), &fl4, sk);
1062 		if (IS_ERR(rt))
1063 			goto out;
1064 
1065 		new = true;
1066 	}
1067 
1068 	__ip_rt_update_pmtu((struct rtable *) rt->dst.path, &fl4, mtu);
1069 
1070 	if (!dst_check(&rt->dst, 0)) {
1071 		if (new)
1072 			dst_release(&rt->dst);
1073 
1074 		rt = ip_route_output_flow(sock_net(sk), &fl4, sk);
1075 		if (IS_ERR(rt))
1076 			goto out;
1077 
1078 		new = true;
1079 	}
1080 
1081 	if (new)
1082 		sk_dst_set(sk, &rt->dst);
1083 
1084 out:
1085 	bh_unlock_sock(sk);
1086 	dst_release(odst);
1087 }
1088 EXPORT_SYMBOL_GPL(ipv4_sk_update_pmtu);
1089 
1090 void ipv4_redirect(struct sk_buff *skb, struct net *net,
1091 		   int oif, u32 mark, u8 protocol, int flow_flags)
1092 {
1093 	const struct iphdr *iph = (const struct iphdr *) skb->data;
1094 	struct flowi4 fl4;
1095 	struct rtable *rt;
1096 
1097 	__build_flow_key(&fl4, NULL, iph, oif,
1098 			 RT_TOS(iph->tos), protocol, mark, flow_flags);
1099 	rt = __ip_route_output_key(net, &fl4);
1100 	if (!IS_ERR(rt)) {
1101 		__ip_do_redirect(rt, skb, &fl4, false);
1102 		ip_rt_put(rt);
1103 	}
1104 }
1105 EXPORT_SYMBOL_GPL(ipv4_redirect);
1106 
1107 void ipv4_sk_redirect(struct sk_buff *skb, struct sock *sk)
1108 {
1109 	const struct iphdr *iph = (const struct iphdr *) skb->data;
1110 	struct flowi4 fl4;
1111 	struct rtable *rt;
1112 
1113 	__build_flow_key(&fl4, sk, iph, 0, 0, 0, 0, 0);
1114 	rt = __ip_route_output_key(sock_net(sk), &fl4);
1115 	if (!IS_ERR(rt)) {
1116 		__ip_do_redirect(rt, skb, &fl4, false);
1117 		ip_rt_put(rt);
1118 	}
1119 }
1120 EXPORT_SYMBOL_GPL(ipv4_sk_redirect);
1121 
1122 static struct dst_entry *ipv4_dst_check(struct dst_entry *dst, u32 cookie)
1123 {
1124 	struct rtable *rt = (struct rtable *) dst;
1125 
1126 	/* All IPV4 dsts are created with ->obsolete set to the value
1127 	 * DST_OBSOLETE_FORCE_CHK which forces validation calls down
1128 	 * into this function always.
1129 	 *
1130 	 * When a PMTU/redirect information update invalidates a route,
1131 	 * this is indicated by setting obsolete to DST_OBSOLETE_KILL or
1132 	 * DST_OBSOLETE_DEAD by dst_free().
1133 	 */
1134 	if (dst->obsolete != DST_OBSOLETE_FORCE_CHK || rt_is_expired(rt))
1135 		return NULL;
1136 	return dst;
1137 }
1138 
1139 static void ipv4_link_failure(struct sk_buff *skb)
1140 {
1141 	struct rtable *rt;
1142 
1143 	icmp_send(skb, ICMP_DEST_UNREACH, ICMP_HOST_UNREACH, 0);
1144 
1145 	rt = skb_rtable(skb);
1146 	if (rt)
1147 		dst_set_expires(&rt->dst, 0);
1148 }
1149 
1150 static int ip_rt_bug(struct sock *sk, struct sk_buff *skb)
1151 {
1152 	pr_debug("%s: %pI4 -> %pI4, %s\n",
1153 		 __func__, &ip_hdr(skb)->saddr, &ip_hdr(skb)->daddr,
1154 		 skb->dev ? skb->dev->name : "?");
1155 	kfree_skb(skb);
1156 	WARN_ON(1);
1157 	return 0;
1158 }
1159 
1160 /*
1161    We do not cache source address of outgoing interface,
1162    because it is used only by IP RR, TS and SRR options,
1163    so that it out of fast path.
1164 
1165    BTW remember: "addr" is allowed to be not aligned
1166    in IP options!
1167  */
1168 
1169 void ip_rt_get_source(u8 *addr, struct sk_buff *skb, struct rtable *rt)
1170 {
1171 	__be32 src;
1172 
1173 	if (rt_is_output_route(rt))
1174 		src = ip_hdr(skb)->saddr;
1175 	else {
1176 		struct fib_result res;
1177 		struct flowi4 fl4;
1178 		struct iphdr *iph;
1179 
1180 		iph = ip_hdr(skb);
1181 
1182 		memset(&fl4, 0, sizeof(fl4));
1183 		fl4.daddr = iph->daddr;
1184 		fl4.saddr = iph->saddr;
1185 		fl4.flowi4_tos = RT_TOS(iph->tos);
1186 		fl4.flowi4_oif = rt->dst.dev->ifindex;
1187 		fl4.flowi4_iif = skb->dev->ifindex;
1188 		fl4.flowi4_mark = skb->mark;
1189 
1190 		rcu_read_lock();
1191 		if (fib_lookup(dev_net(rt->dst.dev), &fl4, &res) == 0)
1192 			src = FIB_RES_PREFSRC(dev_net(rt->dst.dev), res);
1193 		else
1194 			src = inet_select_addr(rt->dst.dev,
1195 					       rt_nexthop(rt, iph->daddr),
1196 					       RT_SCOPE_UNIVERSE);
1197 		rcu_read_unlock();
1198 	}
1199 	memcpy(addr, &src, 4);
1200 }
1201 
1202 #ifdef CONFIG_IP_ROUTE_CLASSID
1203 static void set_class_tag(struct rtable *rt, u32 tag)
1204 {
1205 	if (!(rt->dst.tclassid & 0xFFFF))
1206 		rt->dst.tclassid |= tag & 0xFFFF;
1207 	if (!(rt->dst.tclassid & 0xFFFF0000))
1208 		rt->dst.tclassid |= tag & 0xFFFF0000;
1209 }
1210 #endif
1211 
1212 static unsigned int ipv4_default_advmss(const struct dst_entry *dst)
1213 {
1214 	unsigned int advmss = dst_metric_raw(dst, RTAX_ADVMSS);
1215 
1216 	if (advmss == 0) {
1217 		advmss = max_t(unsigned int, dst->dev->mtu - 40,
1218 			       ip_rt_min_advmss);
1219 		if (advmss > 65535 - 40)
1220 			advmss = 65535 - 40;
1221 	}
1222 	return advmss;
1223 }
1224 
1225 static unsigned int ipv4_mtu(const struct dst_entry *dst)
1226 {
1227 	const struct rtable *rt = (const struct rtable *) dst;
1228 	unsigned int mtu = rt->rt_pmtu;
1229 
1230 	if (!mtu || time_after_eq(jiffies, rt->dst.expires))
1231 		mtu = dst_metric_raw(dst, RTAX_MTU);
1232 
1233 	if (mtu)
1234 		return mtu;
1235 
1236 	mtu = dst->dev->mtu;
1237 
1238 	if (unlikely(dst_metric_locked(dst, RTAX_MTU))) {
1239 		if (rt->rt_uses_gateway && mtu > 576)
1240 			mtu = 576;
1241 	}
1242 
1243 	return min_t(unsigned int, mtu, IP_MAX_MTU);
1244 }
1245 
1246 static struct fib_nh_exception *find_exception(struct fib_nh *nh, __be32 daddr)
1247 {
1248 	struct fnhe_hash_bucket *hash = rcu_dereference(nh->nh_exceptions);
1249 	struct fib_nh_exception *fnhe;
1250 	u32 hval;
1251 
1252 	if (!hash)
1253 		return NULL;
1254 
1255 	hval = fnhe_hashfun(daddr);
1256 
1257 	for (fnhe = rcu_dereference(hash[hval].chain); fnhe;
1258 	     fnhe = rcu_dereference(fnhe->fnhe_next)) {
1259 		if (fnhe->fnhe_daddr == daddr)
1260 			return fnhe;
1261 	}
1262 	return NULL;
1263 }
1264 
1265 static bool rt_bind_exception(struct rtable *rt, struct fib_nh_exception *fnhe,
1266 			      __be32 daddr)
1267 {
1268 	bool ret = false;
1269 
1270 	spin_lock_bh(&fnhe_lock);
1271 
1272 	if (daddr == fnhe->fnhe_daddr) {
1273 		struct rtable __rcu **porig;
1274 		struct rtable *orig;
1275 		int genid = fnhe_genid(dev_net(rt->dst.dev));
1276 
1277 		if (rt_is_input_route(rt))
1278 			porig = &fnhe->fnhe_rth_input;
1279 		else
1280 			porig = &fnhe->fnhe_rth_output;
1281 		orig = rcu_dereference(*porig);
1282 
1283 		if (fnhe->fnhe_genid != genid) {
1284 			fnhe->fnhe_genid = genid;
1285 			fnhe->fnhe_gw = 0;
1286 			fnhe->fnhe_pmtu = 0;
1287 			fnhe->fnhe_expires = 0;
1288 			fnhe_flush_routes(fnhe);
1289 			orig = NULL;
1290 		}
1291 		fill_route_from_fnhe(rt, fnhe);
1292 		if (!rt->rt_gateway)
1293 			rt->rt_gateway = daddr;
1294 
1295 		if (!(rt->dst.flags & DST_NOCACHE)) {
1296 			rcu_assign_pointer(*porig, rt);
1297 			if (orig)
1298 				rt_free(orig);
1299 			ret = true;
1300 		}
1301 
1302 		fnhe->fnhe_stamp = jiffies;
1303 	}
1304 	spin_unlock_bh(&fnhe_lock);
1305 
1306 	return ret;
1307 }
1308 
1309 static bool rt_cache_route(struct fib_nh *nh, struct rtable *rt)
1310 {
1311 	struct rtable *orig, *prev, **p;
1312 	bool ret = true;
1313 
1314 	if (rt_is_input_route(rt)) {
1315 		p = (struct rtable **)&nh->nh_rth_input;
1316 	} else {
1317 		p = (struct rtable **)raw_cpu_ptr(nh->nh_pcpu_rth_output);
1318 	}
1319 	orig = *p;
1320 
1321 	prev = cmpxchg(p, orig, rt);
1322 	if (prev == orig) {
1323 		if (orig)
1324 			rt_free(orig);
1325 	} else
1326 		ret = false;
1327 
1328 	return ret;
1329 }
1330 
1331 struct uncached_list {
1332 	spinlock_t		lock;
1333 	struct list_head	head;
1334 };
1335 
1336 static DEFINE_PER_CPU_ALIGNED(struct uncached_list, rt_uncached_list);
1337 
1338 static void rt_add_uncached_list(struct rtable *rt)
1339 {
1340 	struct uncached_list *ul = raw_cpu_ptr(&rt_uncached_list);
1341 
1342 	rt->rt_uncached_list = ul;
1343 
1344 	spin_lock_bh(&ul->lock);
1345 	list_add_tail(&rt->rt_uncached, &ul->head);
1346 	spin_unlock_bh(&ul->lock);
1347 }
1348 
1349 static void ipv4_dst_destroy(struct dst_entry *dst)
1350 {
1351 	struct rtable *rt = (struct rtable *) dst;
1352 
1353 	if (!list_empty(&rt->rt_uncached)) {
1354 		struct uncached_list *ul = rt->rt_uncached_list;
1355 
1356 		spin_lock_bh(&ul->lock);
1357 		list_del(&rt->rt_uncached);
1358 		spin_unlock_bh(&ul->lock);
1359 	}
1360 }
1361 
1362 void rt_flush_dev(struct net_device *dev)
1363 {
1364 	struct net *net = dev_net(dev);
1365 	struct rtable *rt;
1366 	int cpu;
1367 
1368 	for_each_possible_cpu(cpu) {
1369 		struct uncached_list *ul = &per_cpu(rt_uncached_list, cpu);
1370 
1371 		spin_lock_bh(&ul->lock);
1372 		list_for_each_entry(rt, &ul->head, rt_uncached) {
1373 			if (rt->dst.dev != dev)
1374 				continue;
1375 			rt->dst.dev = net->loopback_dev;
1376 			dev_hold(rt->dst.dev);
1377 			dev_put(dev);
1378 		}
1379 		spin_unlock_bh(&ul->lock);
1380 	}
1381 }
1382 
1383 static bool rt_cache_valid(const struct rtable *rt)
1384 {
1385 	return	rt &&
1386 		rt->dst.obsolete == DST_OBSOLETE_FORCE_CHK &&
1387 		!rt_is_expired(rt);
1388 }
1389 
1390 static void rt_set_nexthop(struct rtable *rt, __be32 daddr,
1391 			   const struct fib_result *res,
1392 			   struct fib_nh_exception *fnhe,
1393 			   struct fib_info *fi, u16 type, u32 itag)
1394 {
1395 	bool cached = false;
1396 
1397 	if (fi) {
1398 		struct fib_nh *nh = &FIB_RES_NH(*res);
1399 
1400 		if (nh->nh_gw && nh->nh_scope == RT_SCOPE_LINK) {
1401 			rt->rt_gateway = nh->nh_gw;
1402 			rt->rt_uses_gateway = 1;
1403 		}
1404 		dst_init_metrics(&rt->dst, fi->fib_metrics, true);
1405 #ifdef CONFIG_IP_ROUTE_CLASSID
1406 		rt->dst.tclassid = nh->nh_tclassid;
1407 #endif
1408 		if (unlikely(fnhe))
1409 			cached = rt_bind_exception(rt, fnhe, daddr);
1410 		else if (!(rt->dst.flags & DST_NOCACHE))
1411 			cached = rt_cache_route(nh, rt);
1412 		if (unlikely(!cached)) {
1413 			/* Routes we intend to cache in nexthop exception or
1414 			 * FIB nexthop have the DST_NOCACHE bit clear.
1415 			 * However, if we are unsuccessful at storing this
1416 			 * route into the cache we really need to set it.
1417 			 */
1418 			rt->dst.flags |= DST_NOCACHE;
1419 			if (!rt->rt_gateway)
1420 				rt->rt_gateway = daddr;
1421 			rt_add_uncached_list(rt);
1422 		}
1423 	} else
1424 		rt_add_uncached_list(rt);
1425 
1426 #ifdef CONFIG_IP_ROUTE_CLASSID
1427 #ifdef CONFIG_IP_MULTIPLE_TABLES
1428 	set_class_tag(rt, res->tclassid);
1429 #endif
1430 	set_class_tag(rt, itag);
1431 #endif
1432 }
1433 
1434 static struct rtable *rt_dst_alloc(struct net_device *dev,
1435 				   bool nopolicy, bool noxfrm, bool will_cache)
1436 {
1437 	return dst_alloc(&ipv4_dst_ops, dev, 1, DST_OBSOLETE_FORCE_CHK,
1438 			 (will_cache ? 0 : (DST_HOST | DST_NOCACHE)) |
1439 			 (nopolicy ? DST_NOPOLICY : 0) |
1440 			 (noxfrm ? DST_NOXFRM : 0));
1441 }
1442 
1443 /* called in rcu_read_lock() section */
1444 static int ip_route_input_mc(struct sk_buff *skb, __be32 daddr, __be32 saddr,
1445 				u8 tos, struct net_device *dev, int our)
1446 {
1447 	struct rtable *rth;
1448 	struct in_device *in_dev = __in_dev_get_rcu(dev);
1449 	u32 itag = 0;
1450 	int err;
1451 
1452 	/* Primary sanity checks. */
1453 
1454 	if (!in_dev)
1455 		return -EINVAL;
1456 
1457 	if (ipv4_is_multicast(saddr) || ipv4_is_lbcast(saddr) ||
1458 	    skb->protocol != htons(ETH_P_IP))
1459 		goto e_inval;
1460 
1461 	if (likely(!IN_DEV_ROUTE_LOCALNET(in_dev)))
1462 		if (ipv4_is_loopback(saddr))
1463 			goto e_inval;
1464 
1465 	if (ipv4_is_zeronet(saddr)) {
1466 		if (!ipv4_is_local_multicast(daddr))
1467 			goto e_inval;
1468 	} else {
1469 		err = fib_validate_source(skb, saddr, 0, tos, 0, dev,
1470 					  in_dev, &itag);
1471 		if (err < 0)
1472 			goto e_err;
1473 	}
1474 	rth = rt_dst_alloc(dev_net(dev)->loopback_dev,
1475 			   IN_DEV_CONF_GET(in_dev, NOPOLICY), false, false);
1476 	if (!rth)
1477 		goto e_nobufs;
1478 
1479 #ifdef CONFIG_IP_ROUTE_CLASSID
1480 	rth->dst.tclassid = itag;
1481 #endif
1482 	rth->dst.output = ip_rt_bug;
1483 
1484 	rth->rt_genid	= rt_genid_ipv4(dev_net(dev));
1485 	rth->rt_flags	= RTCF_MULTICAST;
1486 	rth->rt_type	= RTN_MULTICAST;
1487 	rth->rt_is_input= 1;
1488 	rth->rt_iif	= 0;
1489 	rth->rt_pmtu	= 0;
1490 	rth->rt_gateway	= 0;
1491 	rth->rt_uses_gateway = 0;
1492 	INIT_LIST_HEAD(&rth->rt_uncached);
1493 	if (our) {
1494 		rth->dst.input= ip_local_deliver;
1495 		rth->rt_flags |= RTCF_LOCAL;
1496 	}
1497 
1498 #ifdef CONFIG_IP_MROUTE
1499 	if (!ipv4_is_local_multicast(daddr) && IN_DEV_MFORWARD(in_dev))
1500 		rth->dst.input = ip_mr_input;
1501 #endif
1502 	RT_CACHE_STAT_INC(in_slow_mc);
1503 
1504 	skb_dst_set(skb, &rth->dst);
1505 	return 0;
1506 
1507 e_nobufs:
1508 	return -ENOBUFS;
1509 e_inval:
1510 	return -EINVAL;
1511 e_err:
1512 	return err;
1513 }
1514 
1515 
1516 static void ip_handle_martian_source(struct net_device *dev,
1517 				     struct in_device *in_dev,
1518 				     struct sk_buff *skb,
1519 				     __be32 daddr,
1520 				     __be32 saddr)
1521 {
1522 	RT_CACHE_STAT_INC(in_martian_src);
1523 #ifdef CONFIG_IP_ROUTE_VERBOSE
1524 	if (IN_DEV_LOG_MARTIANS(in_dev) && net_ratelimit()) {
1525 		/*
1526 		 *	RFC1812 recommendation, if source is martian,
1527 		 *	the only hint is MAC header.
1528 		 */
1529 		pr_warn("martian source %pI4 from %pI4, on dev %s\n",
1530 			&daddr, &saddr, dev->name);
1531 		if (dev->hard_header_len && skb_mac_header_was_set(skb)) {
1532 			print_hex_dump(KERN_WARNING, "ll header: ",
1533 				       DUMP_PREFIX_OFFSET, 16, 1,
1534 				       skb_mac_header(skb),
1535 				       dev->hard_header_len, true);
1536 		}
1537 	}
1538 #endif
1539 }
1540 
1541 /* called in rcu_read_lock() section */
1542 static int __mkroute_input(struct sk_buff *skb,
1543 			   const struct fib_result *res,
1544 			   struct in_device *in_dev,
1545 			   __be32 daddr, __be32 saddr, u32 tos)
1546 {
1547 	struct fib_nh_exception *fnhe;
1548 	struct rtable *rth;
1549 	int err;
1550 	struct in_device *out_dev;
1551 	unsigned int flags = 0;
1552 	bool do_cache;
1553 	u32 itag = 0;
1554 
1555 	/* get a working reference to the output device */
1556 	out_dev = __in_dev_get_rcu(FIB_RES_DEV(*res));
1557 	if (!out_dev) {
1558 		net_crit_ratelimited("Bug in ip_route_input_slow(). Please report.\n");
1559 		return -EINVAL;
1560 	}
1561 
1562 	err = fib_validate_source(skb, saddr, daddr, tos, FIB_RES_OIF(*res),
1563 				  in_dev->dev, in_dev, &itag);
1564 	if (err < 0) {
1565 		ip_handle_martian_source(in_dev->dev, in_dev, skb, daddr,
1566 					 saddr);
1567 
1568 		goto cleanup;
1569 	}
1570 
1571 	do_cache = res->fi && !itag;
1572 	if (out_dev == in_dev && err && IN_DEV_TX_REDIRECTS(out_dev) &&
1573 	    skb->protocol == htons(ETH_P_IP) &&
1574 	    (IN_DEV_SHARED_MEDIA(out_dev) ||
1575 	     inet_addr_onlink(out_dev, saddr, FIB_RES_GW(*res))))
1576 		IPCB(skb)->flags |= IPSKB_DOREDIRECT;
1577 
1578 	if (skb->protocol != htons(ETH_P_IP)) {
1579 		/* Not IP (i.e. ARP). Do not create route, if it is
1580 		 * invalid for proxy arp. DNAT routes are always valid.
1581 		 *
1582 		 * Proxy arp feature have been extended to allow, ARP
1583 		 * replies back to the same interface, to support
1584 		 * Private VLAN switch technologies. See arp.c.
1585 		 */
1586 		if (out_dev == in_dev &&
1587 		    IN_DEV_PROXY_ARP_PVLAN(in_dev) == 0) {
1588 			err = -EINVAL;
1589 			goto cleanup;
1590 		}
1591 	}
1592 
1593 	fnhe = find_exception(&FIB_RES_NH(*res), daddr);
1594 	if (do_cache) {
1595 		if (fnhe)
1596 			rth = rcu_dereference(fnhe->fnhe_rth_input);
1597 		else
1598 			rth = rcu_dereference(FIB_RES_NH(*res).nh_rth_input);
1599 
1600 		if (rt_cache_valid(rth)) {
1601 			skb_dst_set_noref(skb, &rth->dst);
1602 			goto out;
1603 		}
1604 	}
1605 
1606 	rth = rt_dst_alloc(out_dev->dev,
1607 			   IN_DEV_CONF_GET(in_dev, NOPOLICY),
1608 			   IN_DEV_CONF_GET(out_dev, NOXFRM), do_cache);
1609 	if (!rth) {
1610 		err = -ENOBUFS;
1611 		goto cleanup;
1612 	}
1613 
1614 	rth->rt_genid = rt_genid_ipv4(dev_net(rth->dst.dev));
1615 	rth->rt_flags = flags;
1616 	rth->rt_type = res->type;
1617 	rth->rt_is_input = 1;
1618 	rth->rt_iif 	= 0;
1619 	rth->rt_pmtu	= 0;
1620 	rth->rt_gateway	= 0;
1621 	rth->rt_uses_gateway = 0;
1622 	INIT_LIST_HEAD(&rth->rt_uncached);
1623 	RT_CACHE_STAT_INC(in_slow_tot);
1624 
1625 	rth->dst.input = ip_forward;
1626 	rth->dst.output = ip_output;
1627 
1628 	rt_set_nexthop(rth, daddr, res, fnhe, res->fi, res->type, itag);
1629 	skb_dst_set(skb, &rth->dst);
1630 out:
1631 	err = 0;
1632  cleanup:
1633 	return err;
1634 }
1635 
1636 static int ip_mkroute_input(struct sk_buff *skb,
1637 			    struct fib_result *res,
1638 			    const struct flowi4 *fl4,
1639 			    struct in_device *in_dev,
1640 			    __be32 daddr, __be32 saddr, u32 tos)
1641 {
1642 #ifdef CONFIG_IP_ROUTE_MULTIPATH
1643 	if (res->fi && res->fi->fib_nhs > 1)
1644 		fib_select_multipath(res);
1645 #endif
1646 
1647 	/* create a routing cache entry */
1648 	return __mkroute_input(skb, res, in_dev, daddr, saddr, tos);
1649 }
1650 
1651 /*
1652  *	NOTE. We drop all the packets that has local source
1653  *	addresses, because every properly looped back packet
1654  *	must have correct destination already attached by output routine.
1655  *
1656  *	Such approach solves two big problems:
1657  *	1. Not simplex devices are handled properly.
1658  *	2. IP spoofing attempts are filtered with 100% of guarantee.
1659  *	called with rcu_read_lock()
1660  */
1661 
1662 static int ip_route_input_slow(struct sk_buff *skb, __be32 daddr, __be32 saddr,
1663 			       u8 tos, struct net_device *dev)
1664 {
1665 	struct fib_result res;
1666 	struct in_device *in_dev = __in_dev_get_rcu(dev);
1667 	struct flowi4	fl4;
1668 	unsigned int	flags = 0;
1669 	u32		itag = 0;
1670 	struct rtable	*rth;
1671 	int		err = -EINVAL;
1672 	struct net    *net = dev_net(dev);
1673 	bool do_cache;
1674 
1675 	/* IP on this device is disabled. */
1676 
1677 	if (!in_dev)
1678 		goto out;
1679 
1680 	/* Check for the most weird martians, which can be not detected
1681 	   by fib_lookup.
1682 	 */
1683 
1684 	if (ipv4_is_multicast(saddr) || ipv4_is_lbcast(saddr))
1685 		goto martian_source;
1686 
1687 	res.fi = NULL;
1688 	if (ipv4_is_lbcast(daddr) || (saddr == 0 && daddr == 0))
1689 		goto brd_input;
1690 
1691 	/* Accept zero addresses only to limited broadcast;
1692 	 * I even do not know to fix it or not. Waiting for complains :-)
1693 	 */
1694 	if (ipv4_is_zeronet(saddr))
1695 		goto martian_source;
1696 
1697 	if (ipv4_is_zeronet(daddr))
1698 		goto martian_destination;
1699 
1700 	/* Following code try to avoid calling IN_DEV_NET_ROUTE_LOCALNET(),
1701 	 * and call it once if daddr or/and saddr are loopback addresses
1702 	 */
1703 	if (ipv4_is_loopback(daddr)) {
1704 		if (!IN_DEV_NET_ROUTE_LOCALNET(in_dev, net))
1705 			goto martian_destination;
1706 	} else if (ipv4_is_loopback(saddr)) {
1707 		if (!IN_DEV_NET_ROUTE_LOCALNET(in_dev, net))
1708 			goto martian_source;
1709 	}
1710 
1711 	/*
1712 	 *	Now we are ready to route packet.
1713 	 */
1714 	fl4.flowi4_oif = 0;
1715 	fl4.flowi4_iif = dev->ifindex;
1716 	fl4.flowi4_mark = skb->mark;
1717 	fl4.flowi4_tos = tos;
1718 	fl4.flowi4_scope = RT_SCOPE_UNIVERSE;
1719 	fl4.daddr = daddr;
1720 	fl4.saddr = saddr;
1721 	err = fib_lookup(net, &fl4, &res);
1722 	if (err != 0) {
1723 		if (!IN_DEV_FORWARD(in_dev))
1724 			err = -EHOSTUNREACH;
1725 		goto no_route;
1726 	}
1727 
1728 	if (res.type == RTN_BROADCAST)
1729 		goto brd_input;
1730 
1731 	if (res.type == RTN_LOCAL) {
1732 		err = fib_validate_source(skb, saddr, daddr, tos,
1733 					  0, dev, in_dev, &itag);
1734 		if (err < 0)
1735 			goto martian_source_keep_err;
1736 		goto local_input;
1737 	}
1738 
1739 	if (!IN_DEV_FORWARD(in_dev)) {
1740 		err = -EHOSTUNREACH;
1741 		goto no_route;
1742 	}
1743 	if (res.type != RTN_UNICAST)
1744 		goto martian_destination;
1745 
1746 	err = ip_mkroute_input(skb, &res, &fl4, in_dev, daddr, saddr, tos);
1747 out:	return err;
1748 
1749 brd_input:
1750 	if (skb->protocol != htons(ETH_P_IP))
1751 		goto e_inval;
1752 
1753 	if (!ipv4_is_zeronet(saddr)) {
1754 		err = fib_validate_source(skb, saddr, 0, tos, 0, dev,
1755 					  in_dev, &itag);
1756 		if (err < 0)
1757 			goto martian_source_keep_err;
1758 	}
1759 	flags |= RTCF_BROADCAST;
1760 	res.type = RTN_BROADCAST;
1761 	RT_CACHE_STAT_INC(in_brd);
1762 
1763 local_input:
1764 	do_cache = false;
1765 	if (res.fi) {
1766 		if (!itag) {
1767 			rth = rcu_dereference(FIB_RES_NH(res).nh_rth_input);
1768 			if (rt_cache_valid(rth)) {
1769 				skb_dst_set_noref(skb, &rth->dst);
1770 				err = 0;
1771 				goto out;
1772 			}
1773 			do_cache = true;
1774 		}
1775 	}
1776 
1777 	rth = rt_dst_alloc(net->loopback_dev,
1778 			   IN_DEV_CONF_GET(in_dev, NOPOLICY), false, do_cache);
1779 	if (!rth)
1780 		goto e_nobufs;
1781 
1782 	rth->dst.input= ip_local_deliver;
1783 	rth->dst.output= ip_rt_bug;
1784 #ifdef CONFIG_IP_ROUTE_CLASSID
1785 	rth->dst.tclassid = itag;
1786 #endif
1787 
1788 	rth->rt_genid = rt_genid_ipv4(net);
1789 	rth->rt_flags 	= flags|RTCF_LOCAL;
1790 	rth->rt_type	= res.type;
1791 	rth->rt_is_input = 1;
1792 	rth->rt_iif	= 0;
1793 	rth->rt_pmtu	= 0;
1794 	rth->rt_gateway	= 0;
1795 	rth->rt_uses_gateway = 0;
1796 	INIT_LIST_HEAD(&rth->rt_uncached);
1797 	RT_CACHE_STAT_INC(in_slow_tot);
1798 	if (res.type == RTN_UNREACHABLE) {
1799 		rth->dst.input= ip_error;
1800 		rth->dst.error= -err;
1801 		rth->rt_flags 	&= ~RTCF_LOCAL;
1802 	}
1803 	if (do_cache) {
1804 		if (unlikely(!rt_cache_route(&FIB_RES_NH(res), rth))) {
1805 			rth->dst.flags |= DST_NOCACHE;
1806 			rt_add_uncached_list(rth);
1807 		}
1808 	}
1809 	skb_dst_set(skb, &rth->dst);
1810 	err = 0;
1811 	goto out;
1812 
1813 no_route:
1814 	RT_CACHE_STAT_INC(in_no_route);
1815 	res.type = RTN_UNREACHABLE;
1816 	res.fi = NULL;
1817 	goto local_input;
1818 
1819 	/*
1820 	 *	Do not cache martian addresses: they should be logged (RFC1812)
1821 	 */
1822 martian_destination:
1823 	RT_CACHE_STAT_INC(in_martian_dst);
1824 #ifdef CONFIG_IP_ROUTE_VERBOSE
1825 	if (IN_DEV_LOG_MARTIANS(in_dev))
1826 		net_warn_ratelimited("martian destination %pI4 from %pI4, dev %s\n",
1827 				     &daddr, &saddr, dev->name);
1828 #endif
1829 
1830 e_inval:
1831 	err = -EINVAL;
1832 	goto out;
1833 
1834 e_nobufs:
1835 	err = -ENOBUFS;
1836 	goto out;
1837 
1838 martian_source:
1839 	err = -EINVAL;
1840 martian_source_keep_err:
1841 	ip_handle_martian_source(dev, in_dev, skb, daddr, saddr);
1842 	goto out;
1843 }
1844 
1845 int ip_route_input_noref(struct sk_buff *skb, __be32 daddr, __be32 saddr,
1846 			 u8 tos, struct net_device *dev)
1847 {
1848 	int res;
1849 
1850 	rcu_read_lock();
1851 
1852 	/* Multicast recognition logic is moved from route cache to here.
1853 	   The problem was that too many Ethernet cards have broken/missing
1854 	   hardware multicast filters :-( As result the host on multicasting
1855 	   network acquires a lot of useless route cache entries, sort of
1856 	   SDR messages from all the world. Now we try to get rid of them.
1857 	   Really, provided software IP multicast filter is organized
1858 	   reasonably (at least, hashed), it does not result in a slowdown
1859 	   comparing with route cache reject entries.
1860 	   Note, that multicast routers are not affected, because
1861 	   route cache entry is created eventually.
1862 	 */
1863 	if (ipv4_is_multicast(daddr)) {
1864 		struct in_device *in_dev = __in_dev_get_rcu(dev);
1865 
1866 		if (in_dev) {
1867 			int our = ip_check_mc_rcu(in_dev, daddr, saddr,
1868 						  ip_hdr(skb)->protocol);
1869 			if (our
1870 #ifdef CONFIG_IP_MROUTE
1871 				||
1872 			    (!ipv4_is_local_multicast(daddr) &&
1873 			     IN_DEV_MFORWARD(in_dev))
1874 #endif
1875 			   ) {
1876 				int res = ip_route_input_mc(skb, daddr, saddr,
1877 							    tos, dev, our);
1878 				rcu_read_unlock();
1879 				return res;
1880 			}
1881 		}
1882 		rcu_read_unlock();
1883 		return -EINVAL;
1884 	}
1885 	res = ip_route_input_slow(skb, daddr, saddr, tos, dev);
1886 	rcu_read_unlock();
1887 	return res;
1888 }
1889 EXPORT_SYMBOL(ip_route_input_noref);
1890 
1891 /* called with rcu_read_lock() */
1892 static struct rtable *__mkroute_output(const struct fib_result *res,
1893 				       const struct flowi4 *fl4, int orig_oif,
1894 				       struct net_device *dev_out,
1895 				       unsigned int flags)
1896 {
1897 	struct fib_info *fi = res->fi;
1898 	struct fib_nh_exception *fnhe;
1899 	struct in_device *in_dev;
1900 	u16 type = res->type;
1901 	struct rtable *rth;
1902 	bool do_cache;
1903 
1904 	in_dev = __in_dev_get_rcu(dev_out);
1905 	if (!in_dev)
1906 		return ERR_PTR(-EINVAL);
1907 
1908 	if (likely(!IN_DEV_ROUTE_LOCALNET(in_dev)))
1909 		if (ipv4_is_loopback(fl4->saddr) && !(dev_out->flags & IFF_LOOPBACK))
1910 			return ERR_PTR(-EINVAL);
1911 
1912 	if (ipv4_is_lbcast(fl4->daddr))
1913 		type = RTN_BROADCAST;
1914 	else if (ipv4_is_multicast(fl4->daddr))
1915 		type = RTN_MULTICAST;
1916 	else if (ipv4_is_zeronet(fl4->daddr))
1917 		return ERR_PTR(-EINVAL);
1918 
1919 	if (dev_out->flags & IFF_LOOPBACK)
1920 		flags |= RTCF_LOCAL;
1921 
1922 	do_cache = true;
1923 	if (type == RTN_BROADCAST) {
1924 		flags |= RTCF_BROADCAST | RTCF_LOCAL;
1925 		fi = NULL;
1926 	} else if (type == RTN_MULTICAST) {
1927 		flags |= RTCF_MULTICAST | RTCF_LOCAL;
1928 		if (!ip_check_mc_rcu(in_dev, fl4->daddr, fl4->saddr,
1929 				     fl4->flowi4_proto))
1930 			flags &= ~RTCF_LOCAL;
1931 		else
1932 			do_cache = false;
1933 		/* If multicast route do not exist use
1934 		 * default one, but do not gateway in this case.
1935 		 * Yes, it is hack.
1936 		 */
1937 		if (fi && res->prefixlen < 4)
1938 			fi = NULL;
1939 	}
1940 
1941 	fnhe = NULL;
1942 	do_cache &= fi != NULL;
1943 	if (do_cache) {
1944 		struct rtable __rcu **prth;
1945 		struct fib_nh *nh = &FIB_RES_NH(*res);
1946 
1947 		fnhe = find_exception(nh, fl4->daddr);
1948 		if (fnhe)
1949 			prth = &fnhe->fnhe_rth_output;
1950 		else {
1951 			if (unlikely(fl4->flowi4_flags &
1952 				     FLOWI_FLAG_KNOWN_NH &&
1953 				     !(nh->nh_gw &&
1954 				       nh->nh_scope == RT_SCOPE_LINK))) {
1955 				do_cache = false;
1956 				goto add;
1957 			}
1958 			prth = raw_cpu_ptr(nh->nh_pcpu_rth_output);
1959 		}
1960 		rth = rcu_dereference(*prth);
1961 		if (rt_cache_valid(rth)) {
1962 			dst_hold(&rth->dst);
1963 			return rth;
1964 		}
1965 	}
1966 
1967 add:
1968 	rth = rt_dst_alloc(dev_out,
1969 			   IN_DEV_CONF_GET(in_dev, NOPOLICY),
1970 			   IN_DEV_CONF_GET(in_dev, NOXFRM),
1971 			   do_cache);
1972 	if (!rth)
1973 		return ERR_PTR(-ENOBUFS);
1974 
1975 	rth->dst.output = ip_output;
1976 
1977 	rth->rt_genid = rt_genid_ipv4(dev_net(dev_out));
1978 	rth->rt_flags	= flags;
1979 	rth->rt_type	= type;
1980 	rth->rt_is_input = 0;
1981 	rth->rt_iif	= orig_oif ? : 0;
1982 	rth->rt_pmtu	= 0;
1983 	rth->rt_gateway = 0;
1984 	rth->rt_uses_gateway = 0;
1985 	INIT_LIST_HEAD(&rth->rt_uncached);
1986 
1987 	RT_CACHE_STAT_INC(out_slow_tot);
1988 
1989 	if (flags & RTCF_LOCAL)
1990 		rth->dst.input = ip_local_deliver;
1991 	if (flags & (RTCF_BROADCAST | RTCF_MULTICAST)) {
1992 		if (flags & RTCF_LOCAL &&
1993 		    !(dev_out->flags & IFF_LOOPBACK)) {
1994 			rth->dst.output = ip_mc_output;
1995 			RT_CACHE_STAT_INC(out_slow_mc);
1996 		}
1997 #ifdef CONFIG_IP_MROUTE
1998 		if (type == RTN_MULTICAST) {
1999 			if (IN_DEV_MFORWARD(in_dev) &&
2000 			    !ipv4_is_local_multicast(fl4->daddr)) {
2001 				rth->dst.input = ip_mr_input;
2002 				rth->dst.output = ip_mc_output;
2003 			}
2004 		}
2005 #endif
2006 	}
2007 
2008 	rt_set_nexthop(rth, fl4->daddr, res, fnhe, fi, type, 0);
2009 
2010 	return rth;
2011 }
2012 
2013 /*
2014  * Major route resolver routine.
2015  */
2016 
2017 struct rtable *__ip_route_output_key(struct net *net, struct flowi4 *fl4)
2018 {
2019 	struct net_device *dev_out = NULL;
2020 	__u8 tos = RT_FL_TOS(fl4);
2021 	unsigned int flags = 0;
2022 	struct fib_result res;
2023 	struct rtable *rth;
2024 	int orig_oif;
2025 
2026 	res.tclassid	= 0;
2027 	res.fi		= NULL;
2028 	res.table	= NULL;
2029 
2030 	orig_oif = fl4->flowi4_oif;
2031 
2032 	fl4->flowi4_iif = LOOPBACK_IFINDEX;
2033 	fl4->flowi4_tos = tos & IPTOS_RT_MASK;
2034 	fl4->flowi4_scope = ((tos & RTO_ONLINK) ?
2035 			 RT_SCOPE_LINK : RT_SCOPE_UNIVERSE);
2036 
2037 	rcu_read_lock();
2038 	if (fl4->saddr) {
2039 		rth = ERR_PTR(-EINVAL);
2040 		if (ipv4_is_multicast(fl4->saddr) ||
2041 		    ipv4_is_lbcast(fl4->saddr) ||
2042 		    ipv4_is_zeronet(fl4->saddr))
2043 			goto out;
2044 
2045 		/* I removed check for oif == dev_out->oif here.
2046 		   It was wrong for two reasons:
2047 		   1. ip_dev_find(net, saddr) can return wrong iface, if saddr
2048 		      is assigned to multiple interfaces.
2049 		   2. Moreover, we are allowed to send packets with saddr
2050 		      of another iface. --ANK
2051 		 */
2052 
2053 		if (fl4->flowi4_oif == 0 &&
2054 		    (ipv4_is_multicast(fl4->daddr) ||
2055 		     ipv4_is_lbcast(fl4->daddr))) {
2056 			/* It is equivalent to inet_addr_type(saddr) == RTN_LOCAL */
2057 			dev_out = __ip_dev_find(net, fl4->saddr, false);
2058 			if (!dev_out)
2059 				goto out;
2060 
2061 			/* Special hack: user can direct multicasts
2062 			   and limited broadcast via necessary interface
2063 			   without fiddling with IP_MULTICAST_IF or IP_PKTINFO.
2064 			   This hack is not just for fun, it allows
2065 			   vic,vat and friends to work.
2066 			   They bind socket to loopback, set ttl to zero
2067 			   and expect that it will work.
2068 			   From the viewpoint of routing cache they are broken,
2069 			   because we are not allowed to build multicast path
2070 			   with loopback source addr (look, routing cache
2071 			   cannot know, that ttl is zero, so that packet
2072 			   will not leave this host and route is valid).
2073 			   Luckily, this hack is good workaround.
2074 			 */
2075 
2076 			fl4->flowi4_oif = dev_out->ifindex;
2077 			goto make_route;
2078 		}
2079 
2080 		if (!(fl4->flowi4_flags & FLOWI_FLAG_ANYSRC)) {
2081 			/* It is equivalent to inet_addr_type(saddr) == RTN_LOCAL */
2082 			if (!__ip_dev_find(net, fl4->saddr, false))
2083 				goto out;
2084 		}
2085 	}
2086 
2087 
2088 	if (fl4->flowi4_oif) {
2089 		dev_out = dev_get_by_index_rcu(net, fl4->flowi4_oif);
2090 		rth = ERR_PTR(-ENODEV);
2091 		if (!dev_out)
2092 			goto out;
2093 
2094 		/* RACE: Check return value of inet_select_addr instead. */
2095 		if (!(dev_out->flags & IFF_UP) || !__in_dev_get_rcu(dev_out)) {
2096 			rth = ERR_PTR(-ENETUNREACH);
2097 			goto out;
2098 		}
2099 		if (ipv4_is_local_multicast(fl4->daddr) ||
2100 		    ipv4_is_lbcast(fl4->daddr)) {
2101 			if (!fl4->saddr)
2102 				fl4->saddr = inet_select_addr(dev_out, 0,
2103 							      RT_SCOPE_LINK);
2104 			goto make_route;
2105 		}
2106 		if (!fl4->saddr) {
2107 			if (ipv4_is_multicast(fl4->daddr))
2108 				fl4->saddr = inet_select_addr(dev_out, 0,
2109 							      fl4->flowi4_scope);
2110 			else if (!fl4->daddr)
2111 				fl4->saddr = inet_select_addr(dev_out, 0,
2112 							      RT_SCOPE_HOST);
2113 		}
2114 	}
2115 
2116 	if (!fl4->daddr) {
2117 		fl4->daddr = fl4->saddr;
2118 		if (!fl4->daddr)
2119 			fl4->daddr = fl4->saddr = htonl(INADDR_LOOPBACK);
2120 		dev_out = net->loopback_dev;
2121 		fl4->flowi4_oif = LOOPBACK_IFINDEX;
2122 		res.type = RTN_LOCAL;
2123 		flags |= RTCF_LOCAL;
2124 		goto make_route;
2125 	}
2126 
2127 	if (fib_lookup(net, fl4, &res)) {
2128 		res.fi = NULL;
2129 		res.table = NULL;
2130 		if (fl4->flowi4_oif) {
2131 			/* Apparently, routing tables are wrong. Assume,
2132 			   that the destination is on link.
2133 
2134 			   WHY? DW.
2135 			   Because we are allowed to send to iface
2136 			   even if it has NO routes and NO assigned
2137 			   addresses. When oif is specified, routing
2138 			   tables are looked up with only one purpose:
2139 			   to catch if destination is gatewayed, rather than
2140 			   direct. Moreover, if MSG_DONTROUTE is set,
2141 			   we send packet, ignoring both routing tables
2142 			   and ifaddr state. --ANK
2143 
2144 
2145 			   We could make it even if oif is unknown,
2146 			   likely IPv6, but we do not.
2147 			 */
2148 
2149 			if (fl4->saddr == 0)
2150 				fl4->saddr = inet_select_addr(dev_out, 0,
2151 							      RT_SCOPE_LINK);
2152 			res.type = RTN_UNICAST;
2153 			goto make_route;
2154 		}
2155 		rth = ERR_PTR(-ENETUNREACH);
2156 		goto out;
2157 	}
2158 
2159 	if (res.type == RTN_LOCAL) {
2160 		if (!fl4->saddr) {
2161 			if (res.fi->fib_prefsrc)
2162 				fl4->saddr = res.fi->fib_prefsrc;
2163 			else
2164 				fl4->saddr = fl4->daddr;
2165 		}
2166 		dev_out = net->loopback_dev;
2167 		fl4->flowi4_oif = dev_out->ifindex;
2168 		flags |= RTCF_LOCAL;
2169 		goto make_route;
2170 	}
2171 
2172 #ifdef CONFIG_IP_ROUTE_MULTIPATH
2173 	if (res.fi->fib_nhs > 1 && fl4->flowi4_oif == 0)
2174 		fib_select_multipath(&res);
2175 	else
2176 #endif
2177 	if (!res.prefixlen &&
2178 	    res.table->tb_num_default > 1 &&
2179 	    res.type == RTN_UNICAST && !fl4->flowi4_oif)
2180 		fib_select_default(&res);
2181 
2182 	if (!fl4->saddr)
2183 		fl4->saddr = FIB_RES_PREFSRC(net, res);
2184 
2185 	dev_out = FIB_RES_DEV(res);
2186 	fl4->flowi4_oif = dev_out->ifindex;
2187 
2188 
2189 make_route:
2190 	rth = __mkroute_output(&res, fl4, orig_oif, dev_out, flags);
2191 
2192 out:
2193 	rcu_read_unlock();
2194 	return rth;
2195 }
2196 EXPORT_SYMBOL_GPL(__ip_route_output_key);
2197 
2198 static struct dst_entry *ipv4_blackhole_dst_check(struct dst_entry *dst, u32 cookie)
2199 {
2200 	return NULL;
2201 }
2202 
2203 static unsigned int ipv4_blackhole_mtu(const struct dst_entry *dst)
2204 {
2205 	unsigned int mtu = dst_metric_raw(dst, RTAX_MTU);
2206 
2207 	return mtu ? : dst->dev->mtu;
2208 }
2209 
2210 static void ipv4_rt_blackhole_update_pmtu(struct dst_entry *dst, struct sock *sk,
2211 					  struct sk_buff *skb, u32 mtu)
2212 {
2213 }
2214 
2215 static void ipv4_rt_blackhole_redirect(struct dst_entry *dst, struct sock *sk,
2216 				       struct sk_buff *skb)
2217 {
2218 }
2219 
2220 static u32 *ipv4_rt_blackhole_cow_metrics(struct dst_entry *dst,
2221 					  unsigned long old)
2222 {
2223 	return NULL;
2224 }
2225 
2226 static struct dst_ops ipv4_dst_blackhole_ops = {
2227 	.family			=	AF_INET,
2228 	.check			=	ipv4_blackhole_dst_check,
2229 	.mtu			=	ipv4_blackhole_mtu,
2230 	.default_advmss		=	ipv4_default_advmss,
2231 	.update_pmtu		=	ipv4_rt_blackhole_update_pmtu,
2232 	.redirect		=	ipv4_rt_blackhole_redirect,
2233 	.cow_metrics		=	ipv4_rt_blackhole_cow_metrics,
2234 	.neigh_lookup		=	ipv4_neigh_lookup,
2235 };
2236 
2237 struct dst_entry *ipv4_blackhole_route(struct net *net, struct dst_entry *dst_orig)
2238 {
2239 	struct rtable *ort = (struct rtable *) dst_orig;
2240 	struct rtable *rt;
2241 
2242 	rt = dst_alloc(&ipv4_dst_blackhole_ops, NULL, 1, DST_OBSOLETE_NONE, 0);
2243 	if (rt) {
2244 		struct dst_entry *new = &rt->dst;
2245 
2246 		new->__use = 1;
2247 		new->input = dst_discard;
2248 		new->output = dst_discard_sk;
2249 
2250 		new->dev = ort->dst.dev;
2251 		if (new->dev)
2252 			dev_hold(new->dev);
2253 
2254 		rt->rt_is_input = ort->rt_is_input;
2255 		rt->rt_iif = ort->rt_iif;
2256 		rt->rt_pmtu = ort->rt_pmtu;
2257 
2258 		rt->rt_genid = rt_genid_ipv4(net);
2259 		rt->rt_flags = ort->rt_flags;
2260 		rt->rt_type = ort->rt_type;
2261 		rt->rt_gateway = ort->rt_gateway;
2262 		rt->rt_uses_gateway = ort->rt_uses_gateway;
2263 
2264 		INIT_LIST_HEAD(&rt->rt_uncached);
2265 
2266 		dst_free(new);
2267 	}
2268 
2269 	dst_release(dst_orig);
2270 
2271 	return rt ? &rt->dst : ERR_PTR(-ENOMEM);
2272 }
2273 
2274 struct rtable *ip_route_output_flow(struct net *net, struct flowi4 *flp4,
2275 				    struct sock *sk)
2276 {
2277 	struct rtable *rt = __ip_route_output_key(net, flp4);
2278 
2279 	if (IS_ERR(rt))
2280 		return rt;
2281 
2282 	if (flp4->flowi4_proto)
2283 		rt = (struct rtable *)xfrm_lookup_route(net, &rt->dst,
2284 							flowi4_to_flowi(flp4),
2285 							sk, 0);
2286 
2287 	return rt;
2288 }
2289 EXPORT_SYMBOL_GPL(ip_route_output_flow);
2290 
2291 static int rt_fill_info(struct net *net,  __be32 dst, __be32 src,
2292 			struct flowi4 *fl4, struct sk_buff *skb, u32 portid,
2293 			u32 seq, int event, int nowait, unsigned int flags)
2294 {
2295 	struct rtable *rt = skb_rtable(skb);
2296 	struct rtmsg *r;
2297 	struct nlmsghdr *nlh;
2298 	unsigned long expires = 0;
2299 	u32 error;
2300 	u32 metrics[RTAX_MAX];
2301 
2302 	nlh = nlmsg_put(skb, portid, seq, event, sizeof(*r), flags);
2303 	if (!nlh)
2304 		return -EMSGSIZE;
2305 
2306 	r = nlmsg_data(nlh);
2307 	r->rtm_family	 = AF_INET;
2308 	r->rtm_dst_len	= 32;
2309 	r->rtm_src_len	= 0;
2310 	r->rtm_tos	= fl4->flowi4_tos;
2311 	r->rtm_table	= RT_TABLE_MAIN;
2312 	if (nla_put_u32(skb, RTA_TABLE, RT_TABLE_MAIN))
2313 		goto nla_put_failure;
2314 	r->rtm_type	= rt->rt_type;
2315 	r->rtm_scope	= RT_SCOPE_UNIVERSE;
2316 	r->rtm_protocol = RTPROT_UNSPEC;
2317 	r->rtm_flags	= (rt->rt_flags & ~0xFFFF) | RTM_F_CLONED;
2318 	if (rt->rt_flags & RTCF_NOTIFY)
2319 		r->rtm_flags |= RTM_F_NOTIFY;
2320 	if (IPCB(skb)->flags & IPSKB_DOREDIRECT)
2321 		r->rtm_flags |= RTCF_DOREDIRECT;
2322 
2323 	if (nla_put_in_addr(skb, RTA_DST, dst))
2324 		goto nla_put_failure;
2325 	if (src) {
2326 		r->rtm_src_len = 32;
2327 		if (nla_put_in_addr(skb, RTA_SRC, src))
2328 			goto nla_put_failure;
2329 	}
2330 	if (rt->dst.dev &&
2331 	    nla_put_u32(skb, RTA_OIF, rt->dst.dev->ifindex))
2332 		goto nla_put_failure;
2333 #ifdef CONFIG_IP_ROUTE_CLASSID
2334 	if (rt->dst.tclassid &&
2335 	    nla_put_u32(skb, RTA_FLOW, rt->dst.tclassid))
2336 		goto nla_put_failure;
2337 #endif
2338 	if (!rt_is_input_route(rt) &&
2339 	    fl4->saddr != src) {
2340 		if (nla_put_in_addr(skb, RTA_PREFSRC, fl4->saddr))
2341 			goto nla_put_failure;
2342 	}
2343 	if (rt->rt_uses_gateway &&
2344 	    nla_put_in_addr(skb, RTA_GATEWAY, rt->rt_gateway))
2345 		goto nla_put_failure;
2346 
2347 	expires = rt->dst.expires;
2348 	if (expires) {
2349 		unsigned long now = jiffies;
2350 
2351 		if (time_before(now, expires))
2352 			expires -= now;
2353 		else
2354 			expires = 0;
2355 	}
2356 
2357 	memcpy(metrics, dst_metrics_ptr(&rt->dst), sizeof(metrics));
2358 	if (rt->rt_pmtu && expires)
2359 		metrics[RTAX_MTU - 1] = rt->rt_pmtu;
2360 	if (rtnetlink_put_metrics(skb, metrics) < 0)
2361 		goto nla_put_failure;
2362 
2363 	if (fl4->flowi4_mark &&
2364 	    nla_put_u32(skb, RTA_MARK, fl4->flowi4_mark))
2365 		goto nla_put_failure;
2366 
2367 	error = rt->dst.error;
2368 
2369 	if (rt_is_input_route(rt)) {
2370 #ifdef CONFIG_IP_MROUTE
2371 		if (ipv4_is_multicast(dst) && !ipv4_is_local_multicast(dst) &&
2372 		    IPV4_DEVCONF_ALL(net, MC_FORWARDING)) {
2373 			int err = ipmr_get_route(net, skb,
2374 						 fl4->saddr, fl4->daddr,
2375 						 r, nowait);
2376 			if (err <= 0) {
2377 				if (!nowait) {
2378 					if (err == 0)
2379 						return 0;
2380 					goto nla_put_failure;
2381 				} else {
2382 					if (err == -EMSGSIZE)
2383 						goto nla_put_failure;
2384 					error = err;
2385 				}
2386 			}
2387 		} else
2388 #endif
2389 			if (nla_put_u32(skb, RTA_IIF, skb->dev->ifindex))
2390 				goto nla_put_failure;
2391 	}
2392 
2393 	if (rtnl_put_cacheinfo(skb, &rt->dst, 0, expires, error) < 0)
2394 		goto nla_put_failure;
2395 
2396 	nlmsg_end(skb, nlh);
2397 	return 0;
2398 
2399 nla_put_failure:
2400 	nlmsg_cancel(skb, nlh);
2401 	return -EMSGSIZE;
2402 }
2403 
2404 static int inet_rtm_getroute(struct sk_buff *in_skb, struct nlmsghdr *nlh)
2405 {
2406 	struct net *net = sock_net(in_skb->sk);
2407 	struct rtmsg *rtm;
2408 	struct nlattr *tb[RTA_MAX+1];
2409 	struct rtable *rt = NULL;
2410 	struct flowi4 fl4;
2411 	__be32 dst = 0;
2412 	__be32 src = 0;
2413 	u32 iif;
2414 	int err;
2415 	int mark;
2416 	struct sk_buff *skb;
2417 
2418 	err = nlmsg_parse(nlh, sizeof(*rtm), tb, RTA_MAX, rtm_ipv4_policy);
2419 	if (err < 0)
2420 		goto errout;
2421 
2422 	rtm = nlmsg_data(nlh);
2423 
2424 	skb = alloc_skb(NLMSG_GOODSIZE, GFP_KERNEL);
2425 	if (!skb) {
2426 		err = -ENOBUFS;
2427 		goto errout;
2428 	}
2429 
2430 	/* Reserve room for dummy headers, this skb can pass
2431 	   through good chunk of routing engine.
2432 	 */
2433 	skb_reset_mac_header(skb);
2434 	skb_reset_network_header(skb);
2435 
2436 	/* Bugfix: need to give ip_route_input enough of an IP header to not gag. */
2437 	ip_hdr(skb)->protocol = IPPROTO_ICMP;
2438 	skb_reserve(skb, MAX_HEADER + sizeof(struct iphdr));
2439 
2440 	src = tb[RTA_SRC] ? nla_get_in_addr(tb[RTA_SRC]) : 0;
2441 	dst = tb[RTA_DST] ? nla_get_in_addr(tb[RTA_DST]) : 0;
2442 	iif = tb[RTA_IIF] ? nla_get_u32(tb[RTA_IIF]) : 0;
2443 	mark = tb[RTA_MARK] ? nla_get_u32(tb[RTA_MARK]) : 0;
2444 
2445 	memset(&fl4, 0, sizeof(fl4));
2446 	fl4.daddr = dst;
2447 	fl4.saddr = src;
2448 	fl4.flowi4_tos = rtm->rtm_tos;
2449 	fl4.flowi4_oif = tb[RTA_OIF] ? nla_get_u32(tb[RTA_OIF]) : 0;
2450 	fl4.flowi4_mark = mark;
2451 
2452 	if (iif) {
2453 		struct net_device *dev;
2454 
2455 		dev = __dev_get_by_index(net, iif);
2456 		if (!dev) {
2457 			err = -ENODEV;
2458 			goto errout_free;
2459 		}
2460 
2461 		skb->protocol	= htons(ETH_P_IP);
2462 		skb->dev	= dev;
2463 		skb->mark	= mark;
2464 		local_bh_disable();
2465 		err = ip_route_input(skb, dst, src, rtm->rtm_tos, dev);
2466 		local_bh_enable();
2467 
2468 		rt = skb_rtable(skb);
2469 		if (err == 0 && rt->dst.error)
2470 			err = -rt->dst.error;
2471 	} else {
2472 		rt = ip_route_output_key(net, &fl4);
2473 
2474 		err = 0;
2475 		if (IS_ERR(rt))
2476 			err = PTR_ERR(rt);
2477 	}
2478 
2479 	if (err)
2480 		goto errout_free;
2481 
2482 	skb_dst_set(skb, &rt->dst);
2483 	if (rtm->rtm_flags & RTM_F_NOTIFY)
2484 		rt->rt_flags |= RTCF_NOTIFY;
2485 
2486 	err = rt_fill_info(net, dst, src, &fl4, skb,
2487 			   NETLINK_CB(in_skb).portid, nlh->nlmsg_seq,
2488 			   RTM_NEWROUTE, 0, 0);
2489 	if (err < 0)
2490 		goto errout_free;
2491 
2492 	err = rtnl_unicast(skb, net, NETLINK_CB(in_skb).portid);
2493 errout:
2494 	return err;
2495 
2496 errout_free:
2497 	kfree_skb(skb);
2498 	goto errout;
2499 }
2500 
2501 void ip_rt_multicast_event(struct in_device *in_dev)
2502 {
2503 	rt_cache_flush(dev_net(in_dev->dev));
2504 }
2505 
2506 #ifdef CONFIG_SYSCTL
2507 static int ip_rt_gc_timeout __read_mostly	= RT_GC_TIMEOUT;
2508 static int ip_rt_gc_interval __read_mostly  = 60 * HZ;
2509 static int ip_rt_gc_min_interval __read_mostly	= HZ / 2;
2510 static int ip_rt_gc_elasticity __read_mostly	= 8;
2511 
2512 static int ipv4_sysctl_rtcache_flush(struct ctl_table *__ctl, int write,
2513 					void __user *buffer,
2514 					size_t *lenp, loff_t *ppos)
2515 {
2516 	struct net *net = (struct net *)__ctl->extra1;
2517 
2518 	if (write) {
2519 		rt_cache_flush(net);
2520 		fnhe_genid_bump(net);
2521 		return 0;
2522 	}
2523 
2524 	return -EINVAL;
2525 }
2526 
2527 static struct ctl_table ipv4_route_table[] = {
2528 	{
2529 		.procname	= "gc_thresh",
2530 		.data		= &ipv4_dst_ops.gc_thresh,
2531 		.maxlen		= sizeof(int),
2532 		.mode		= 0644,
2533 		.proc_handler	= proc_dointvec,
2534 	},
2535 	{
2536 		.procname	= "max_size",
2537 		.data		= &ip_rt_max_size,
2538 		.maxlen		= sizeof(int),
2539 		.mode		= 0644,
2540 		.proc_handler	= proc_dointvec,
2541 	},
2542 	{
2543 		/*  Deprecated. Use gc_min_interval_ms */
2544 
2545 		.procname	= "gc_min_interval",
2546 		.data		= &ip_rt_gc_min_interval,
2547 		.maxlen		= sizeof(int),
2548 		.mode		= 0644,
2549 		.proc_handler	= proc_dointvec_jiffies,
2550 	},
2551 	{
2552 		.procname	= "gc_min_interval_ms",
2553 		.data		= &ip_rt_gc_min_interval,
2554 		.maxlen		= sizeof(int),
2555 		.mode		= 0644,
2556 		.proc_handler	= proc_dointvec_ms_jiffies,
2557 	},
2558 	{
2559 		.procname	= "gc_timeout",
2560 		.data		= &ip_rt_gc_timeout,
2561 		.maxlen		= sizeof(int),
2562 		.mode		= 0644,
2563 		.proc_handler	= proc_dointvec_jiffies,
2564 	},
2565 	{
2566 		.procname	= "gc_interval",
2567 		.data		= &ip_rt_gc_interval,
2568 		.maxlen		= sizeof(int),
2569 		.mode		= 0644,
2570 		.proc_handler	= proc_dointvec_jiffies,
2571 	},
2572 	{
2573 		.procname	= "redirect_load",
2574 		.data		= &ip_rt_redirect_load,
2575 		.maxlen		= sizeof(int),
2576 		.mode		= 0644,
2577 		.proc_handler	= proc_dointvec,
2578 	},
2579 	{
2580 		.procname	= "redirect_number",
2581 		.data		= &ip_rt_redirect_number,
2582 		.maxlen		= sizeof(int),
2583 		.mode		= 0644,
2584 		.proc_handler	= proc_dointvec,
2585 	},
2586 	{
2587 		.procname	= "redirect_silence",
2588 		.data		= &ip_rt_redirect_silence,
2589 		.maxlen		= sizeof(int),
2590 		.mode		= 0644,
2591 		.proc_handler	= proc_dointvec,
2592 	},
2593 	{
2594 		.procname	= "error_cost",
2595 		.data		= &ip_rt_error_cost,
2596 		.maxlen		= sizeof(int),
2597 		.mode		= 0644,
2598 		.proc_handler	= proc_dointvec,
2599 	},
2600 	{
2601 		.procname	= "error_burst",
2602 		.data		= &ip_rt_error_burst,
2603 		.maxlen		= sizeof(int),
2604 		.mode		= 0644,
2605 		.proc_handler	= proc_dointvec,
2606 	},
2607 	{
2608 		.procname	= "gc_elasticity",
2609 		.data		= &ip_rt_gc_elasticity,
2610 		.maxlen		= sizeof(int),
2611 		.mode		= 0644,
2612 		.proc_handler	= proc_dointvec,
2613 	},
2614 	{
2615 		.procname	= "mtu_expires",
2616 		.data		= &ip_rt_mtu_expires,
2617 		.maxlen		= sizeof(int),
2618 		.mode		= 0644,
2619 		.proc_handler	= proc_dointvec_jiffies,
2620 	},
2621 	{
2622 		.procname	= "min_pmtu",
2623 		.data		= &ip_rt_min_pmtu,
2624 		.maxlen		= sizeof(int),
2625 		.mode		= 0644,
2626 		.proc_handler	= proc_dointvec,
2627 	},
2628 	{
2629 		.procname	= "min_adv_mss",
2630 		.data		= &ip_rt_min_advmss,
2631 		.maxlen		= sizeof(int),
2632 		.mode		= 0644,
2633 		.proc_handler	= proc_dointvec,
2634 	},
2635 	{ }
2636 };
2637 
2638 static struct ctl_table ipv4_route_flush_table[] = {
2639 	{
2640 		.procname	= "flush",
2641 		.maxlen		= sizeof(int),
2642 		.mode		= 0200,
2643 		.proc_handler	= ipv4_sysctl_rtcache_flush,
2644 	},
2645 	{ },
2646 };
2647 
2648 static __net_init int sysctl_route_net_init(struct net *net)
2649 {
2650 	struct ctl_table *tbl;
2651 
2652 	tbl = ipv4_route_flush_table;
2653 	if (!net_eq(net, &init_net)) {
2654 		tbl = kmemdup(tbl, sizeof(ipv4_route_flush_table), GFP_KERNEL);
2655 		if (!tbl)
2656 			goto err_dup;
2657 
2658 		/* Don't export sysctls to unprivileged users */
2659 		if (net->user_ns != &init_user_ns)
2660 			tbl[0].procname = NULL;
2661 	}
2662 	tbl[0].extra1 = net;
2663 
2664 	net->ipv4.route_hdr = register_net_sysctl(net, "net/ipv4/route", tbl);
2665 	if (!net->ipv4.route_hdr)
2666 		goto err_reg;
2667 	return 0;
2668 
2669 err_reg:
2670 	if (tbl != ipv4_route_flush_table)
2671 		kfree(tbl);
2672 err_dup:
2673 	return -ENOMEM;
2674 }
2675 
2676 static __net_exit void sysctl_route_net_exit(struct net *net)
2677 {
2678 	struct ctl_table *tbl;
2679 
2680 	tbl = net->ipv4.route_hdr->ctl_table_arg;
2681 	unregister_net_sysctl_table(net->ipv4.route_hdr);
2682 	BUG_ON(tbl == ipv4_route_flush_table);
2683 	kfree(tbl);
2684 }
2685 
2686 static __net_initdata struct pernet_operations sysctl_route_ops = {
2687 	.init = sysctl_route_net_init,
2688 	.exit = sysctl_route_net_exit,
2689 };
2690 #endif
2691 
2692 static __net_init int rt_genid_init(struct net *net)
2693 {
2694 	atomic_set(&net->ipv4.rt_genid, 0);
2695 	atomic_set(&net->fnhe_genid, 0);
2696 	get_random_bytes(&net->ipv4.dev_addr_genid,
2697 			 sizeof(net->ipv4.dev_addr_genid));
2698 	return 0;
2699 }
2700 
2701 static __net_initdata struct pernet_operations rt_genid_ops = {
2702 	.init = rt_genid_init,
2703 };
2704 
2705 static int __net_init ipv4_inetpeer_init(struct net *net)
2706 {
2707 	struct inet_peer_base *bp = kmalloc(sizeof(*bp), GFP_KERNEL);
2708 
2709 	if (!bp)
2710 		return -ENOMEM;
2711 	inet_peer_base_init(bp);
2712 	net->ipv4.peers = bp;
2713 	return 0;
2714 }
2715 
2716 static void __net_exit ipv4_inetpeer_exit(struct net *net)
2717 {
2718 	struct inet_peer_base *bp = net->ipv4.peers;
2719 
2720 	net->ipv4.peers = NULL;
2721 	inetpeer_invalidate_tree(bp);
2722 	kfree(bp);
2723 }
2724 
2725 static __net_initdata struct pernet_operations ipv4_inetpeer_ops = {
2726 	.init	=	ipv4_inetpeer_init,
2727 	.exit	=	ipv4_inetpeer_exit,
2728 };
2729 
2730 #ifdef CONFIG_IP_ROUTE_CLASSID
2731 struct ip_rt_acct __percpu *ip_rt_acct __read_mostly;
2732 #endif /* CONFIG_IP_ROUTE_CLASSID */
2733 
2734 int __init ip_rt_init(void)
2735 {
2736 	int rc = 0;
2737 	int cpu;
2738 
2739 	ip_idents = kmalloc(IP_IDENTS_SZ * sizeof(*ip_idents), GFP_KERNEL);
2740 	if (!ip_idents)
2741 		panic("IP: failed to allocate ip_idents\n");
2742 
2743 	prandom_bytes(ip_idents, IP_IDENTS_SZ * sizeof(*ip_idents));
2744 
2745 	for_each_possible_cpu(cpu) {
2746 		struct uncached_list *ul = &per_cpu(rt_uncached_list, cpu);
2747 
2748 		INIT_LIST_HEAD(&ul->head);
2749 		spin_lock_init(&ul->lock);
2750 	}
2751 #ifdef CONFIG_IP_ROUTE_CLASSID
2752 	ip_rt_acct = __alloc_percpu(256 * sizeof(struct ip_rt_acct), __alignof__(struct ip_rt_acct));
2753 	if (!ip_rt_acct)
2754 		panic("IP: failed to allocate ip_rt_acct\n");
2755 #endif
2756 
2757 	ipv4_dst_ops.kmem_cachep =
2758 		kmem_cache_create("ip_dst_cache", sizeof(struct rtable), 0,
2759 				  SLAB_HWCACHE_ALIGN|SLAB_PANIC, NULL);
2760 
2761 	ipv4_dst_blackhole_ops.kmem_cachep = ipv4_dst_ops.kmem_cachep;
2762 
2763 	if (dst_entries_init(&ipv4_dst_ops) < 0)
2764 		panic("IP: failed to allocate ipv4_dst_ops counter\n");
2765 
2766 	if (dst_entries_init(&ipv4_dst_blackhole_ops) < 0)
2767 		panic("IP: failed to allocate ipv4_dst_blackhole_ops counter\n");
2768 
2769 	ipv4_dst_ops.gc_thresh = ~0;
2770 	ip_rt_max_size = INT_MAX;
2771 
2772 	devinet_init();
2773 	ip_fib_init();
2774 
2775 	if (ip_rt_proc_init())
2776 		pr_err("Unable to create route proc files\n");
2777 #ifdef CONFIG_XFRM
2778 	xfrm_init();
2779 	xfrm4_init();
2780 #endif
2781 	rtnl_register(PF_INET, RTM_GETROUTE, inet_rtm_getroute, NULL, NULL);
2782 
2783 #ifdef CONFIG_SYSCTL
2784 	register_pernet_subsys(&sysctl_route_ops);
2785 #endif
2786 	register_pernet_subsys(&rt_genid_ops);
2787 	register_pernet_subsys(&ipv4_inetpeer_ops);
2788 	return rc;
2789 }
2790 
2791 #ifdef CONFIG_SYSCTL
2792 /*
2793  * We really need to sanitize the damn ipv4 init order, then all
2794  * this nonsense will go away.
2795  */
2796 void __init ip_static_sysctl_init(void)
2797 {
2798 	register_net_sysctl(&init_net, "net/ipv4/route", ipv4_route_table);
2799 }
2800 #endif
2801