Skip to content
Snippets Groups Projects
tcp_ipv4.c 64.3 KiB
Newer Older
  • Learn to ignore specific revisions
  • Linus Torvalds's avatar
    Linus Torvalds committed
    
    	bh_lock_sock(sk);
    	/* If too many ICMPs get dropped on busy
    	 * servers this needs to be solved differently.
    	 */
    	if (sock_owned_by_user(sk))
    		NET_INC_STATS_BH(LINUX_MIB_LOCKDROPPEDICMPS);
    
    	if (sk->sk_state == TCP_CLOSE)
    		goto out;
    
    	tp = tcp_sk(sk);
    	seq = ntohl(th->seq);
    	if (sk->sk_state != TCP_LISTEN &&
    	    !between(seq, tp->snd_una, tp->snd_nxt)) {
    		NET_INC_STATS(LINUX_MIB_OUTOFWINDOWICMPS);
    		goto out;
    	}
    
    	switch (type) {
    	case ICMP_SOURCE_QUENCH:
    		/* Just silently ignore these. */
    		goto out;
    	case ICMP_PARAMETERPROB:
    		err = EPROTO;
    		break;
    	case ICMP_DEST_UNREACH:
    		if (code > NR_ICMP_UNREACH)
    			goto out;
    
    		if (code == ICMP_FRAG_NEEDED) { /* PMTU discovery (RFC1191) */
    			if (!sock_owned_by_user(sk))
    				do_pmtu_discovery(sk, iph, info);
    			goto out;
    		}
    
    		err = icmp_err_convert[code].errno;
    		break;
    	case ICMP_TIME_EXCEEDED:
    		err = EHOSTUNREACH;
    		break;
    	default:
    		goto out;
    	}
    
    	switch (sk->sk_state) {
    
    		struct request_sock *req, **prev;
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    	case TCP_LISTEN:
    		if (sock_owned_by_user(sk))
    			goto out;
    
    		req = tcp_v4_search_req(tp, &prev, th->dest,
    					iph->daddr, iph->saddr);
    		if (!req)
    			goto out;
    
    		/* ICMPs are not backlogged, hence we cannot get
    		   an established socket here.
    		 */
    		BUG_TRAP(!req->sk);
    
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    			NET_INC_STATS_BH(LINUX_MIB_OUTOFWINDOWICMPS);
    			goto out;
    		}
    
    		/*
    		 * Still in SYN_RECV, just remove it silently.
    		 * There is no good way to pass the error to the newly
    		 * created socket, and POSIX does not want network
    		 * errors returned from accept().
    		 */
    		tcp_synq_drop(sk, req, prev);
    		goto out;
    
    	case TCP_SYN_SENT:
    	case TCP_SYN_RECV:  /* Cannot happen.
    			       It can f.e. if SYNs crossed.
    			     */
    		if (!sock_owned_by_user(sk)) {
    			TCP_INC_STATS_BH(TCP_MIB_ATTEMPTFAILS);
    			sk->sk_err = err;
    
    			sk->sk_error_report(sk);
    
    			tcp_done(sk);
    		} else {
    			sk->sk_err_soft = err;
    		}
    		goto out;
    	}
    
    	/* If we've already connected we will keep trying
    	 * until we time out, or the user gives up.
    	 *
    	 * rfc1122 4.2.3.9 allows to consider as hard errors
    	 * only PROTO_UNREACH and PORT_UNREACH (well, FRAG_FAILED too,
    	 * but it is obsoleted by pmtu discovery).
    	 *
    	 * Note, that in modern internet, where routing is unreliable
    	 * and in each dark corner broken firewalls sit, sending random
    	 * errors ordered by their masters even this two messages finally lose
    	 * their original sense (even Linux sends invalid PORT_UNREACHs)
    	 *
    	 * Now we are in compliance with RFCs.
    	 *							--ANK (980905)
    	 */
    
    	inet = inet_sk(sk);
    	if (!sock_owned_by_user(sk) && inet->recverr) {
    		sk->sk_err = err;
    		sk->sk_error_report(sk);
    	} else	{ /* Only an error on timeout */
    		sk->sk_err_soft = err;
    	}
    
    out:
    	bh_unlock_sock(sk);
    	sock_put(sk);
    }
    
    /* This routine computes an IPv4 TCP checksum. */
    void tcp_v4_send_check(struct sock *sk, struct tcphdr *th, int len,
    		       struct sk_buff *skb)
    {
    	struct inet_sock *inet = inet_sk(sk);
    
    	if (skb->ip_summed == CHECKSUM_HW) {
    		th->check = ~tcp_v4_check(th, len, inet->saddr, inet->daddr, 0);
    		skb->csum = offsetof(struct tcphdr, check);
    	} else {
    		th->check = tcp_v4_check(th, len, inet->saddr, inet->daddr,
    					 csum_partial((char *)th,
    						      th->doff << 2,
    						      skb->csum));
    	}
    }
    
    /*
     *	This routine will send an RST to the other tcp.
     *
     *	Someone asks: why I NEVER use socket parameters (TOS, TTL etc.)
     *		      for reset.
     *	Answer: if a packet caused RST, it is not for a socket
     *		existing in our system, if it is matched to a socket,
     *		it is just duplicate segment or bug in other side's TCP.
     *		So that we build reply only basing on parameters
     *		arrived with segment.
     *	Exception: precedence violation. We do not implement it in any case.
     */
    
    static void tcp_v4_send_reset(struct sk_buff *skb)
    {
    	struct tcphdr *th = skb->h.th;
    	struct tcphdr rth;
    	struct ip_reply_arg arg;
    
    	/* Never send a reset in response to a reset. */
    	if (th->rst)
    		return;
    
    	if (((struct rtable *)skb->dst)->rt_type != RTN_LOCAL)
    		return;
    
    	/* Swap the send and the receive. */
    	memset(&rth, 0, sizeof(struct tcphdr));
    	rth.dest   = th->source;
    	rth.source = th->dest;
    	rth.doff   = sizeof(struct tcphdr) / 4;
    	rth.rst    = 1;
    
    	if (th->ack) {
    		rth.seq = th->ack_seq;
    	} else {
    		rth.ack = 1;
    		rth.ack_seq = htonl(ntohl(th->seq) + th->syn + th->fin +
    				    skb->len - (th->doff << 2));
    	}
    
    	memset(&arg, 0, sizeof arg);
    	arg.iov[0].iov_base = (unsigned char *)&rth;
    	arg.iov[0].iov_len  = sizeof rth;
    	arg.csum = csum_tcpudp_nofold(skb->nh.iph->daddr,
    				      skb->nh.iph->saddr, /*XXX*/
    				      sizeof(struct tcphdr), IPPROTO_TCP, 0);
    	arg.csumoffset = offsetof(struct tcphdr, check) / 2;
    
    	ip_send_reply(tcp_socket->sk, skb, &arg, sizeof rth);
    
    	TCP_INC_STATS_BH(TCP_MIB_OUTSEGS);
    	TCP_INC_STATS_BH(TCP_MIB_OUTRSTS);
    }
    
    /* The code following below sending ACKs in SYN-RECV and TIME-WAIT states
       outside socket context is ugly, certainly. What can I do?
     */
    
    static void tcp_v4_send_ack(struct sk_buff *skb, u32 seq, u32 ack,
    			    u32 win, u32 ts)
    {
    	struct tcphdr *th = skb->h.th;
    	struct {
    		struct tcphdr th;
    		u32 tsopt[3];
    	} rep;
    	struct ip_reply_arg arg;
    
    	memset(&rep.th, 0, sizeof(struct tcphdr));
    	memset(&arg, 0, sizeof arg);
    
    	arg.iov[0].iov_base = (unsigned char *)&rep;
    	arg.iov[0].iov_len  = sizeof(rep.th);
    	if (ts) {
    		rep.tsopt[0] = htonl((TCPOPT_NOP << 24) | (TCPOPT_NOP << 16) |
    				     (TCPOPT_TIMESTAMP << 8) |
    				     TCPOLEN_TIMESTAMP);
    		rep.tsopt[1] = htonl(tcp_time_stamp);
    		rep.tsopt[2] = htonl(ts);
    		arg.iov[0].iov_len = sizeof(rep);
    	}
    
    	/* Swap the send and the receive. */
    	rep.th.dest    = th->source;
    	rep.th.source  = th->dest;
    	rep.th.doff    = arg.iov[0].iov_len / 4;
    	rep.th.seq     = htonl(seq);
    	rep.th.ack_seq = htonl(ack);
    	rep.th.ack     = 1;
    	rep.th.window  = htons(win);
    
    	arg.csum = csum_tcpudp_nofold(skb->nh.iph->daddr,
    				      skb->nh.iph->saddr, /*XXX*/
    				      arg.iov[0].iov_len, IPPROTO_TCP, 0);
    	arg.csumoffset = offsetof(struct tcphdr, check) / 2;
    
    	ip_send_reply(tcp_socket->sk, skb, &arg, arg.iov[0].iov_len);
    
    	TCP_INC_STATS_BH(TCP_MIB_OUTSEGS);
    }
    
    static void tcp_v4_timewait_ack(struct sock *sk, struct sk_buff *skb)
    {
    	struct tcp_tw_bucket *tw = (struct tcp_tw_bucket *)sk;
    
    	tcp_v4_send_ack(skb, tw->tw_snd_nxt, tw->tw_rcv_nxt,
    			tw->tw_rcv_wnd >> tw->tw_rcv_wscale, tw->tw_ts_recent);
    
    	tcp_tw_put(tw);
    }
    
    
    static void tcp_v4_reqsk_send_ack(struct sk_buff *skb, struct request_sock *req)
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    {
    
    	tcp_v4_send_ack(skb, tcp_rsk(req)->snt_isn + 1, tcp_rsk(req)->rcv_isn + 1, req->rcv_wnd,
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    			req->ts_recent);
    }
    
    static struct dst_entry* tcp_v4_route_req(struct sock *sk,
    
    					  struct request_sock *req)
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    {
    	struct rtable *rt;
    
    	const struct inet_request_sock *ireq = inet_rsk(req);
    	struct ip_options *opt = inet_rsk(req)->opt;
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    	struct flowi fl = { .oif = sk->sk_bound_dev_if,
    			    .nl_u = { .ip4_u =
    				      { .daddr = ((opt && opt->srr) ?
    						  opt->faddr :
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    					.tos = RT_CONN_FLAGS(sk) } },
    			    .proto = IPPROTO_TCP,
    			    .uli_u = { .ports =
    				       { .sport = inet_sk(sk)->sport,
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    
    	if (ip_route_output_flow(&rt, &fl, sk, 0)) {
    		IP_INC_STATS_BH(IPSTATS_MIB_OUTNOROUTES);
    		return NULL;
    	}
    	if (opt && opt->is_strictroute && rt->rt_dst != rt->rt_gateway) {
    		ip_rt_put(rt);
    		IP_INC_STATS_BH(IPSTATS_MIB_OUTNOROUTES);
    		return NULL;
    	}
    	return &rt->u.dst;
    }
    
    /*
     *	Send a SYN-ACK after having received an ACK.
    
     *	This still operates on a request_sock only, not on a big
    
    Linus Torvalds's avatar
    Linus Torvalds committed
     *	socket.
     */
    
    static int tcp_v4_send_synack(struct sock *sk, struct request_sock *req,
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    			      struct dst_entry *dst)
    {
    
    	const struct inet_request_sock *ireq = inet_rsk(req);
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    	int err = -1;
    	struct sk_buff * skb;
    
    	/* First, grab a route. */
    	if (!dst && (dst = tcp_v4_route_req(sk, req)) == NULL)
    		goto out;
    
    	skb = tcp_make_synack(sk, dst, req);
    
    	if (skb) {
    		struct tcphdr *th = skb->h.th;
    
    		th->check = tcp_v4_check(th, skb->len,
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    					 csum_partial((char *)th, skb->len,
    						      skb->csum));
    
    
    		err = ip_build_and_send_pkt(skb, sk, ireq->loc_addr,
    					    ireq->rmt_addr,
    					    ireq->opt);
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    		if (err == NET_XMIT_CN)
    			err = 0;
    	}
    
    out:
    	dst_release(dst);
    	return err;
    }
    
    /*
    
     *	IPv4 request_sock destructor.
    
    Linus Torvalds's avatar
    Linus Torvalds committed
     */
    
    static void tcp_v4_reqsk_destructor(struct request_sock *req)
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    {
    
    	if (inet_rsk(req)->opt)
    		kfree(inet_rsk(req)->opt);
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    }
    
    static inline void syn_flood_warning(struct sk_buff *skb)
    {
    	static unsigned long warntime;
    
    	if (time_after(jiffies, (warntime + HZ * 60))) {
    		warntime = jiffies;
    		printk(KERN_INFO
    		       "possible SYN flooding on port %d. Sending cookies.\n",
    		       ntohs(skb->h.th->dest));
    	}
    }
    
    /*
    
     * Save and compile IPv4 options into the request_sock if needed.
    
    Linus Torvalds's avatar
    Linus Torvalds committed
     */
    static inline struct ip_options *tcp_v4_save_options(struct sock *sk,
    						     struct sk_buff *skb)
    {
    	struct ip_options *opt = &(IPCB(skb)->opt);
    	struct ip_options *dopt = NULL;
    
    	if (opt && opt->optlen) {
    		int opt_size = optlength(opt);
    		dopt = kmalloc(opt_size, GFP_ATOMIC);
    		if (dopt) {
    			if (ip_options_echo(dopt, skb)) {
    				kfree(dopt);
    				dopt = NULL;
    			}
    		}
    	}
    	return dopt;
    }
    
    
    struct request_sock_ops tcp_request_sock_ops = {
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    	.family		=	PF_INET,
    
    	.obj_size	=	sizeof(struct tcp_request_sock),
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    	.rtx_syn_ack	=	tcp_v4_send_synack,
    
    	.send_ack	=	tcp_v4_reqsk_send_ack,
    	.destructor	=	tcp_v4_reqsk_destructor,
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    	.send_reset	=	tcp_v4_send_reset,
    };
    
    int tcp_v4_conn_request(struct sock *sk, struct sk_buff *skb)
    {
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    	struct tcp_options_received tmp_opt;
    
    	struct request_sock *req;
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    	__u32 saddr = skb->nh.iph->saddr;
    	__u32 daddr = skb->nh.iph->daddr;
    	__u32 isn = TCP_SKB_CB(skb)->when;
    	struct dst_entry *dst = NULL;
    #ifdef CONFIG_SYN_COOKIES
    	int want_cookie = 0;
    #else
    #define want_cookie 0 /* Argh, why doesn't gcc optimize this :( */
    #endif
    
    	/* Never answer to SYNs send to broadcast or multicast */
    	if (((struct rtable *)skb->dst)->rt_flags &
    	    (RTCF_BROADCAST | RTCF_MULTICAST))
    		goto drop;
    
    	/* TW buckets are converted to open requests without
    	 * limitations, they conserve resources and peer is
    	 * evidently real one.
    	 */
    	if (tcp_synq_is_full(sk) && !isn) {
    #ifdef CONFIG_SYN_COOKIES
    		if (sysctl_tcp_syncookies) {
    			want_cookie = 1;
    		} else
    #endif
    		goto drop;
    	}
    
    	/* Accept backlog is full. If we have already queued enough
    	 * of warm entries in syn queue, drop request. It is better than
    	 * clogging syn queue with openreqs with exponentially increasing
    	 * timeout.
    	 */
    	if (sk_acceptq_is_full(sk) && tcp_synq_young(sk) > 1)
    		goto drop;
    
    
    	req = reqsk_alloc(&tcp_request_sock_ops);
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    	if (!req)
    		goto drop;
    
    	tcp_clear_options(&tmp_opt);
    	tmp_opt.mss_clamp = 536;
    	tmp_opt.user_mss  = tcp_sk(sk)->rx_opt.user_mss;
    
    	tcp_parse_options(skb, &tmp_opt, 0);
    
    	if (want_cookie) {
    		tcp_clear_options(&tmp_opt);
    		tmp_opt.saw_tstamp = 0;
    	}
    
    	if (tmp_opt.saw_tstamp && !tmp_opt.rcv_tsval) {
    		/* Some OSes (unknown ones, but I see them on web server, which
    		 * contains information interesting only for windows'
    		 * users) do not send their stamp in SYN. It is easy case.
    		 * We simply do not advertise TS support.
    		 */
    		tmp_opt.saw_tstamp = 0;
    		tmp_opt.tstamp_ok  = 0;
    	}
    	tmp_opt.tstamp_ok = tmp_opt.saw_tstamp;
    
    	tcp_openreq_init(req, &tmp_opt, skb);
    
    
    	ireq = inet_rsk(req);
    	ireq->loc_addr = daddr;
    	ireq->rmt_addr = saddr;
    	ireq->opt = tcp_v4_save_options(sk, skb);
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    	if (!want_cookie)
    		TCP_ECN_create_request(req, skb->h.th);
    
    	if (want_cookie) {
    #ifdef CONFIG_SYN_COOKIES
    		syn_flood_warning(skb);
    #endif
    		isn = cookie_v4_init_sequence(sk, skb, &req->mss);
    	} else if (!isn) {
    		struct inet_peer *peer = NULL;
    
    		/* VJ's idea. We save last timestamp seen
    		 * from the destination in peer table, when entering
    		 * state TIME-WAIT, and check against it before
    		 * accepting new connection request.
    		 *
    		 * If "isn" is not zero, this request hit alive
    		 * timewait bucket, so that all the necessary checks
    		 * are made in the function processing timewait state.
    		 */
    		if (tmp_opt.saw_tstamp &&
    		    sysctl_tcp_tw_recycle &&
    		    (dst = tcp_v4_route_req(sk, req)) != NULL &&
    		    (peer = rt_get_peer((struct rtable *)dst)) != NULL &&
    		    peer->v4daddr == saddr) {
    			if (xtime.tv_sec < peer->tcp_ts_stamp + TCP_PAWS_MSL &&
    			    (s32)(peer->tcp_ts - req->ts_recent) >
    							TCP_PAWS_WINDOW) {
    				NET_INC_STATS_BH(LINUX_MIB_PAWSPASSIVEREJECTED);
    				dst_release(dst);
    				goto drop_and_free;
    			}
    		}
    		/* Kill the following clause, if you dislike this way. */
    		else if (!sysctl_tcp_syncookies &&
    			 (sysctl_max_syn_backlog - tcp_synq_len(sk) <
    			  (sysctl_max_syn_backlog >> 2)) &&
    			 (!peer || !peer->tcp_ts_stamp) &&
    			 (!dst || !dst_metric(dst, RTAX_RTT))) {
    			/* Without syncookies last quarter of
    			 * backlog is filled with destinations,
    			 * proven to be alive.
    			 * It means that we continue to communicate
    			 * to destinations, already remembered
    			 * to the moment of synflood.
    			 */
    			NETDEBUG(if (net_ratelimit()) \
    					printk(KERN_DEBUG "TCP: drop open "
    							  "request from %u.%u."
    							  "%u.%u/%u\n", \
    					       NIPQUAD(saddr),
    					       ntohs(skb->h.th->source)));
    			dst_release(dst);
    			goto drop_and_free;
    		}
    
    		isn = tcp_v4_init_sequence(sk, skb);
    	}
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    
    	if (tcp_v4_send_synack(sk, req, dst))
    		goto drop_and_free;
    
    	if (want_cookie) {
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    	} else {
    		tcp_v4_synq_add(sk, req);
    	}
    	return 0;
    
    drop_and_free:
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    drop:
    	TCP_INC_STATS_BH(TCP_MIB_ATTEMPTFAILS);
    	return 0;
    }
    
    
    /*
     * The three way handshake has completed - we got a valid synack -
     * now create the new socket.
     */
    struct sock *tcp_v4_syn_recv_sock(struct sock *sk, struct sk_buff *skb,
    
    				  struct request_sock *req,
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    				  struct dst_entry *dst)
    {
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    	struct inet_sock *newinet;
    	struct tcp_sock *newtp;
    	struct sock *newsk;
    
    	if (sk_acceptq_is_full(sk))
    		goto exit_overflow;
    
    	if (!dst && (dst = tcp_v4_route_req(sk, req)) == NULL)
    		goto exit;
    
    	newsk = tcp_create_openreq_child(sk, req, skb);
    	if (!newsk)
    		goto exit;
    
    	newsk->sk_dst_cache = dst;
    	tcp_v4_setup_caps(newsk, dst);
    
    	newtp		      = tcp_sk(newsk);
    	newinet		      = inet_sk(newsk);
    
    	ireq		      = inet_rsk(req);
    	newinet->daddr	      = ireq->rmt_addr;
    	newinet->rcv_saddr    = ireq->loc_addr;
    	newinet->saddr	      = ireq->loc_addr;
    	newinet->opt	      = ireq->opt;
    	ireq->opt	      = NULL;
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    	newinet->mc_index     = tcp_v4_iif(skb);
    	newinet->mc_ttl	      = skb->nh.iph->ttl;
    	newtp->ext_header_len = 0;
    	if (newinet->opt)
    		newtp->ext_header_len = newinet->opt->optlen;
    	newinet->id = newtp->write_seq ^ jiffies;
    
    	tcp_sync_mss(newsk, dst_mtu(dst));
    	newtp->advmss = dst_metric(dst, RTAX_ADVMSS);
    	tcp_initialize_rcv_mss(newsk);
    
    	__tcp_v4_hash(newsk, 0);
    	__tcp_inherit_port(sk, newsk);
    
    	return newsk;
    
    exit_overflow:
    	NET_INC_STATS_BH(LINUX_MIB_LISTENOVERFLOWS);
    exit:
    	NET_INC_STATS_BH(LINUX_MIB_LISTENDROPS);
    	dst_release(dst);
    	return NULL;
    }
    
    static struct sock *tcp_v4_hnd_req(struct sock *sk, struct sk_buff *skb)
    {
    	struct tcphdr *th = skb->h.th;
    	struct iphdr *iph = skb->nh.iph;
    	struct tcp_sock *tp = tcp_sk(sk);
    	struct sock *nsk;
    
    	struct request_sock **prev;
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    	/* Find possible connection requests. */
    
    	struct request_sock *req = tcp_v4_search_req(tp, &prev, th->source,
    
    Linus Torvalds's avatar
    Linus Torvalds committed
    1596 1597 1598 1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661 1662 1663 1664 1665 1666 1667 1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681 1682 1683 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717 1718 1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755 1756 1757 1758 1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799 1800 1801 1802 1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846 1847 1848 1849 1850 1851 1852 1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863 1864 1865 1866 1867 1868 1869 1870 1871 1872 1873 1874 1875 1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886 1887 1888 1889 1890 1891 1892 1893 1894 1895 1896 1897 1898 1899 1900 1901 1902 1903 1904 1905 1906 1907 1908 1909 1910 1911 1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940 1941 1942 1943 1944 1945 1946 1947 1948 1949 1950 1951 1952 1953 1954 1955 1956 1957 1958 1959 1960 1961 1962 1963 1964 1965 1966 1967 1968 1969 1970 1971 1972 1973 1974 1975 1976 1977 1978 1979 1980 1981 1982 1983 1984 1985 1986 1987 1988 1989 1990 1991 1992 1993 1994 1995 1996 1997 1998 1999 2000
    						     iph->saddr, iph->daddr);
    	if (req)
    		return tcp_check_req(sk, skb, req, prev);
    
    	nsk = __tcp_v4_lookup_established(skb->nh.iph->saddr,
    					  th->source,
    					  skb->nh.iph->daddr,
    					  ntohs(th->dest),
    					  tcp_v4_iif(skb));
    
    	if (nsk) {
    		if (nsk->sk_state != TCP_TIME_WAIT) {
    			bh_lock_sock(nsk);
    			return nsk;
    		}
    		tcp_tw_put((struct tcp_tw_bucket *)nsk);
    		return NULL;
    	}
    
    #ifdef CONFIG_SYN_COOKIES
    	if (!th->rst && !th->syn && th->ack)
    		sk = cookie_v4_check(sk, skb, &(IPCB(skb)->opt));
    #endif
    	return sk;
    }
    
    static int tcp_v4_checksum_init(struct sk_buff *skb)
    {
    	if (skb->ip_summed == CHECKSUM_HW) {
    		skb->ip_summed = CHECKSUM_UNNECESSARY;
    		if (!tcp_v4_check(skb->h.th, skb->len, skb->nh.iph->saddr,
    				  skb->nh.iph->daddr, skb->csum))
    			return 0;
    
    		NETDEBUG(if (net_ratelimit())
    				printk(KERN_DEBUG "hw tcp v4 csum failed\n"));
    		skb->ip_summed = CHECKSUM_NONE;
    	}
    	if (skb->len <= 76) {
    		if (tcp_v4_check(skb->h.th, skb->len, skb->nh.iph->saddr,
    				 skb->nh.iph->daddr,
    				 skb_checksum(skb, 0, skb->len, 0)))
    			return -1;
    		skb->ip_summed = CHECKSUM_UNNECESSARY;
    	} else {
    		skb->csum = ~tcp_v4_check(skb->h.th, skb->len,
    					  skb->nh.iph->saddr,
    					  skb->nh.iph->daddr, 0);
    	}
    	return 0;
    }
    
    
    /* The socket must have it's spinlock held when we get
     * here.
     *
     * We have a potential double-lock case here, so even when
     * doing backlog processing we use the BH locking scheme.
     * This is because we cannot sleep with the original spinlock
     * held.
     */
    int tcp_v4_do_rcv(struct sock *sk, struct sk_buff *skb)
    {
    	if (sk->sk_state == TCP_ESTABLISHED) { /* Fast path */
    		TCP_CHECK_TIMER(sk);
    		if (tcp_rcv_established(sk, skb, skb->h.th, skb->len))
    			goto reset;
    		TCP_CHECK_TIMER(sk);
    		return 0;
    	}
    
    	if (skb->len < (skb->h.th->doff << 2) || tcp_checksum_complete(skb))
    		goto csum_err;
    
    	if (sk->sk_state == TCP_LISTEN) {
    		struct sock *nsk = tcp_v4_hnd_req(sk, skb);
    		if (!nsk)
    			goto discard;
    
    		if (nsk != sk) {
    			if (tcp_child_process(sk, nsk, skb))
    				goto reset;
    			return 0;
    		}
    	}
    
    	TCP_CHECK_TIMER(sk);
    	if (tcp_rcv_state_process(sk, skb, skb->h.th, skb->len))
    		goto reset;
    	TCP_CHECK_TIMER(sk);
    	return 0;
    
    reset:
    	tcp_v4_send_reset(skb);
    discard:
    	kfree_skb(skb);
    	/* Be careful here. If this function gets more complicated and
    	 * gcc suffers from register pressure on the x86, sk (in %ebx)
    	 * might be destroyed here. This current version compiles correctly,
    	 * but you have been warned.
    	 */
    	return 0;
    
    csum_err:
    	TCP_INC_STATS_BH(TCP_MIB_INERRS);
    	goto discard;
    }
    
    /*
     *	From tcp_input.c
     */
    
    int tcp_v4_rcv(struct sk_buff *skb)
    {
    	struct tcphdr *th;
    	struct sock *sk;
    	int ret;
    
    	if (skb->pkt_type != PACKET_HOST)
    		goto discard_it;
    
    	/* Count it even if it's bad */
    	TCP_INC_STATS_BH(TCP_MIB_INSEGS);
    
    	if (!pskb_may_pull(skb, sizeof(struct tcphdr)))
    		goto discard_it;
    
    	th = skb->h.th;
    
    	if (th->doff < sizeof(struct tcphdr) / 4)
    		goto bad_packet;
    	if (!pskb_may_pull(skb, th->doff * 4))
    		goto discard_it;
    
    	/* An explanation is required here, I think.
    	 * Packet length and doff are validated by header prediction,
    	 * provided case of th->doff==0 is elimineted.
    	 * So, we defer the checks. */
    	if ((skb->ip_summed != CHECKSUM_UNNECESSARY &&
    	     tcp_v4_checksum_init(skb) < 0))
    		goto bad_packet;
    
    	th = skb->h.th;
    	TCP_SKB_CB(skb)->seq = ntohl(th->seq);
    	TCP_SKB_CB(skb)->end_seq = (TCP_SKB_CB(skb)->seq + th->syn + th->fin +
    				    skb->len - th->doff * 4);
    	TCP_SKB_CB(skb)->ack_seq = ntohl(th->ack_seq);
    	TCP_SKB_CB(skb)->when	 = 0;
    	TCP_SKB_CB(skb)->flags	 = skb->nh.iph->tos;
    	TCP_SKB_CB(skb)->sacked	 = 0;
    
    	sk = __tcp_v4_lookup(skb->nh.iph->saddr, th->source,
    			     skb->nh.iph->daddr, ntohs(th->dest),
    			     tcp_v4_iif(skb));
    
    	if (!sk)
    		goto no_tcp_socket;
    
    process:
    	if (sk->sk_state == TCP_TIME_WAIT)
    		goto do_time_wait;
    
    	if (!xfrm4_policy_check(sk, XFRM_POLICY_IN, skb))
    		goto discard_and_relse;
    
    	if (sk_filter(sk, skb, 0))
    		goto discard_and_relse;
    
    	skb->dev = NULL;
    
    	bh_lock_sock(sk);
    	ret = 0;
    	if (!sock_owned_by_user(sk)) {
    		if (!tcp_prequeue(sk, skb))
    			ret = tcp_v4_do_rcv(sk, skb);
    	} else
    		sk_add_backlog(sk, skb);
    	bh_unlock_sock(sk);
    
    	sock_put(sk);
    
    	return ret;
    
    no_tcp_socket:
    	if (!xfrm4_policy_check(NULL, XFRM_POLICY_IN, skb))
    		goto discard_it;
    
    	if (skb->len < (th->doff << 2) || tcp_checksum_complete(skb)) {
    bad_packet:
    		TCP_INC_STATS_BH(TCP_MIB_INERRS);
    	} else {
    		tcp_v4_send_reset(skb);
    	}
    
    discard_it:
    	/* Discard frame. */
    	kfree_skb(skb);
      	return 0;
    
    discard_and_relse:
    	sock_put(sk);
    	goto discard_it;
    
    do_time_wait:
    	if (!xfrm4_policy_check(NULL, XFRM_POLICY_IN, skb)) {
    		tcp_tw_put((struct tcp_tw_bucket *) sk);
    		goto discard_it;
    	}
    
    	if (skb->len < (th->doff << 2) || tcp_checksum_complete(skb)) {
    		TCP_INC_STATS_BH(TCP_MIB_INERRS);
    		tcp_tw_put((struct tcp_tw_bucket *) sk);
    		goto discard_it;
    	}
    	switch (tcp_timewait_state_process((struct tcp_tw_bucket *)sk,
    					   skb, th, skb->len)) {
    	case TCP_TW_SYN: {
    		struct sock *sk2 = tcp_v4_lookup_listener(skb->nh.iph->daddr,
    							  ntohs(th->dest),
    							  tcp_v4_iif(skb));
    		if (sk2) {
    			tcp_tw_deschedule((struct tcp_tw_bucket *)sk);
    			tcp_tw_put((struct tcp_tw_bucket *)sk);
    			sk = sk2;
    			goto process;
    		}
    		/* Fall through to ACK */
    	}
    	case TCP_TW_ACK:
    		tcp_v4_timewait_ack(sk, skb);
    		break;
    	case TCP_TW_RST:
    		goto no_tcp_socket;
    	case TCP_TW_SUCCESS:;
    	}
    	goto discard_it;
    }
    
    /* With per-bucket locks this operation is not-atomic, so that
     * this version is not worse.
     */
    static void __tcp_v4_rehash(struct sock *sk)
    {
    	sk->sk_prot->unhash(sk);
    	sk->sk_prot->hash(sk);
    }
    
    static int tcp_v4_reselect_saddr(struct sock *sk)
    {
    	struct inet_sock *inet = inet_sk(sk);
    	int err;
    	struct rtable *rt;
    	__u32 old_saddr = inet->saddr;
    	__u32 new_saddr;
    	__u32 daddr = inet->daddr;
    
    	if (inet->opt && inet->opt->srr)
    		daddr = inet->opt->faddr;
    
    	/* Query new route. */
    	err = ip_route_connect(&rt, daddr, 0,
    			       RT_CONN_FLAGS(sk),
    			       sk->sk_bound_dev_if,
    			       IPPROTO_TCP,
    			       inet->sport, inet->dport, sk);
    	if (err)
    		return err;
    
    	__sk_dst_set(sk, &rt->u.dst);
    	tcp_v4_setup_caps(sk, &rt->u.dst);
    
    	new_saddr = rt->rt_src;
    
    	if (new_saddr == old_saddr)
    		return 0;
    
    	if (sysctl_ip_dynaddr > 1) {
    		printk(KERN_INFO "tcp_v4_rebuild_header(): shifting inet->"
    				 "saddr from %d.%d.%d.%d to %d.%d.%d.%d\n",
    		       NIPQUAD(old_saddr),
    		       NIPQUAD(new_saddr));
    	}
    
    	inet->saddr = new_saddr;
    	inet->rcv_saddr = new_saddr;
    
    	/* XXX The only one ugly spot where we need to
    	 * XXX really change the sockets identity after
    	 * XXX it has entered the hashes. -DaveM
    	 *
    	 * Besides that, it does not check for connection
    	 * uniqueness. Wait for troubles.
    	 */
    	__tcp_v4_rehash(sk);
    	return 0;
    }
    
    int tcp_v4_rebuild_header(struct sock *sk)
    {
    	struct inet_sock *inet = inet_sk(sk);
    	struct rtable *rt = (struct rtable *)__sk_dst_check(sk, 0);
    	u32 daddr;
    	int err;
    
    	/* Route is OK, nothing to do. */
    	if (rt)
    		return 0;
    
    	/* Reroute. */
    	daddr = inet->daddr;
    	if (inet->opt && inet->opt->srr)
    		daddr = inet->opt->faddr;
    
    	{
    		struct flowi fl = { .oif = sk->sk_bound_dev_if,
    				    .nl_u = { .ip4_u =
    					      { .daddr = daddr,
    						.saddr = inet->saddr,
    						.tos = RT_CONN_FLAGS(sk) } },
    				    .proto = IPPROTO_TCP,
    				    .uli_u = { .ports =
    					       { .sport = inet->sport,
    						 .dport = inet->dport } } };
    						
    		err = ip_route_output_flow(&rt, &fl, sk, 0);
    	}
    	if (!err) {
    		__sk_dst_set(sk, &rt->u.dst);
    		tcp_v4_setup_caps(sk, &rt->u.dst);
    		return 0;
    	}
    
    	/* Routing failed... */
    	sk->sk_route_caps = 0;
    
    	if (!sysctl_ip_dynaddr ||
    	    sk->sk_state != TCP_SYN_SENT ||
    	    (sk->sk_userlocks & SOCK_BINDADDR_LOCK) ||
    	    (err = tcp_v4_reselect_saddr(sk)) != 0)
    		sk->sk_err_soft = -err;
    
    	return err;
    }
    
    static void v4_addr2sockaddr(struct sock *sk, struct sockaddr * uaddr)
    {
    	struct sockaddr_in *sin = (struct sockaddr_in *) uaddr;
    	struct inet_sock *inet = inet_sk(sk);
    
    	sin->sin_family		= AF_INET;
    	sin->sin_addr.s_addr	= inet->daddr;
    	sin->sin_port		= inet->dport;
    }
    
    /* VJ's idea. Save last timestamp seen from this destination
     * and hold it at least for normal timewait interval to use for duplicate
     * segment detection in subsequent connections, before they enter synchronized
     * state.
     */
    
    int tcp_v4_remember_stamp(struct sock *sk)
    {
    	struct inet_sock *inet = inet_sk(sk);
    	struct tcp_sock *tp = tcp_sk(sk);
    	struct rtable *rt = (struct rtable *)__sk_dst_get(sk);
    	struct inet_peer *peer = NULL;
    	int release_it = 0;
    
    	if (!rt || rt->rt_dst != inet->daddr) {
    		peer = inet_getpeer(inet->daddr, 1);
    		release_it = 1;
    	} else {
    		if (!rt->peer)
    			rt_bind_peer(rt, 1);
    		peer = rt->peer;
    	}
    
    	if (peer) {
    		if ((s32)(peer->tcp_ts - tp->rx_opt.ts_recent) <= 0 ||
    		    (peer->tcp_ts_stamp + TCP_PAWS_MSL < xtime.tv_sec &&
    		     peer->tcp_ts_stamp <= tp->rx_opt.ts_recent_stamp)) {
    			peer->tcp_ts_stamp = tp->rx_opt.ts_recent_stamp;
    			peer->tcp_ts = tp->rx_opt.ts_recent;
    		}
    		if (release_it)
    			inet_putpeer(peer);
    		return 1;
    	}
    
    	return 0;
    }
    
    int tcp_v4_tw_remember_stamp(struct tcp_tw_bucket *tw)
    {
    	struct inet_peer *peer = NULL;
    
    	peer = inet_getpeer(tw->tw_daddr, 1);
    
    	if (peer) {
    		if ((s32)(peer->tcp_ts - tw->tw_ts_recent) <= 0 ||
    		    (peer->tcp_ts_stamp + TCP_PAWS_MSL < xtime.tv_sec &&
    		     peer->tcp_ts_stamp <= tw->tw_ts_recent_stamp)) {
    			peer->tcp_ts_stamp = tw->tw_ts_recent_stamp;
    			peer->tcp_ts = tw->tw_ts_recent;
    		}