[deliverable/linux.git] / net / rds / tcp_send.c

/*
 * Copyright (c) 2006 Oracle.  All rights reserved.
 *
 * This software is available to you under a choice of one of two
 * licenses.  You may choose to be licensed under the terms of the GNU
 * General Public License (GPL) Version 2, available from the file
 * COPYING in the main directory of this source tree, or the
 * OpenIB.org BSD license below:
 *
 *     Redistribution and use in source and binary forms, with or
 *     without modification, are permitted provided that the following
 *     conditions are met:
 *
 *      - Redistributions of source code must retain the above
 *        copyright notice, this list of conditions and the following
 *        disclaimer.
 *
 *      - Redistributions in binary form must reproduce the above
 *        copyright notice, this list of conditions and the following
 *        disclaimer in the documentation and/or other materials
 *        provided with the distribution.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
 * SOFTWARE.
 *
 */
#include <linux/kernel.h>
#include <linux/in.h>
#include <net/tcp.h>

#include "rds_single_path.h"
#include "rds.h"
#include "tcp.h"

static void rds_tcp_cork(struct socket *sock, int val)
{
	mm_segment_t oldfs;

	oldfs = get_fs();
	set_fs(KERNEL_DS);
	sock->ops->setsockopt(sock, SOL_TCP, TCP_CORK, (char __user *)&val,
			      sizeof(val));
	set_fs(oldfs);
}

void rds_tcp_xmit_path_prepare(struct rds_conn_path *cp)
{
	struct rds_tcp_connection *tc = cp->cp_transport_data;

	rds_tcp_cork(tc->t_sock, 1);
}

void rds_tcp_xmit_path_complete(struct rds_conn_path *cp)
{
	struct rds_tcp_connection *tc = cp->cp_transport_data;

	rds_tcp_cork(tc->t_sock, 0);
}

/* the core send_sem serializes this with other xmit and shutdown */
static int rds_tcp_sendmsg(struct socket *sock, void *data, unsigned int len)
{
	struct kvec vec = {
		.iov_base = data,
		.iov_len = len,
	};
	struct msghdr msg = {
		.msg_flags = MSG_DONTWAIT | MSG_NOSIGNAL,
	};

	return kernel_sendmsg(sock, &msg, &vec, 1, vec.iov_len);
}

/* the core send_sem serializes this with other xmit and shutdown */
int rds_tcp_xmit(struct rds_connection *conn, struct rds_message *rm,
		 unsigned int hdr_off, unsigned int sg, unsigned int off)
{
	struct rds_tcp_connection *tc = conn->c_transport_data;
	int done = 0;
	int ret = 0;
	int more;

	if (hdr_off == 0) {
		/*
		 * m_ack_seq is set to the sequence number of the last byte of
		 * header and data.  see rds_tcp_is_acked().
		 */
		tc->t_last_sent_nxt = rds_tcp_snd_nxt(tc);
		rm->m_ack_seq = tc->t_last_sent_nxt +
				sizeof(struct rds_header) +
				be32_to_cpu(rm->m_inc.i_hdr.h_len) - 1;
		smp_mb__before_atomic();
		set_bit(RDS_MSG_HAS_ACK_SEQ, &rm->m_flags);
		tc->t_last_expected_una = rm->m_ack_seq + 1;

		rdsdebug("rm %p tcp nxt %u ack_seq %llu\n",
			 rm, rds_tcp_snd_nxt(tc),
			 (unsigned long long)rm->m_ack_seq);
	}

	if (hdr_off < sizeof(struct rds_header)) {
		/* see rds_tcp_write_space() */
		set_bit(SOCK_NOSPACE, &tc->t_sock->sk->sk_socket->flags);

		ret = rds_tcp_sendmsg(tc->t_sock,
				      (void *)&rm->m_inc.i_hdr + hdr_off,
				      sizeof(rm->m_inc.i_hdr) - hdr_off);
		if (ret < 0)
			goto out;
		done += ret;
		if (hdr_off + done != sizeof(struct rds_header))
			goto out;
	}

	more = rm->data.op_nents > 1 ? (MSG_MORE | MSG_SENDPAGE_NOTLAST) : 0;
	while (sg < rm->data.op_nents) {
		int flags = MSG_DONTWAIT | MSG_NOSIGNAL | more;

		ret = tc->t_sock->ops->sendpage(tc->t_sock,
						sg_page(&rm->data.op_sg[sg]),
						rm->data.op_sg[sg].offset + off,
						rm->data.op_sg[sg].length - off,
						flags);
		rdsdebug("tcp sendpage %p:%u:%u ret %d\n", (void *)sg_page(&rm->data.op_sg[sg]),
			 rm->data.op_sg[sg].offset + off, rm->data.op_sg[sg].length - off,
			 ret);
		if (ret <= 0)
			break;

		off += ret;
		done += ret;
		if (off == rm->data.op_sg[sg].length) {
			off = 0;
			sg++;
		}
		if (sg == rm->data.op_nents - 1)
			more = 0;
	}

out:
	if (ret <= 0) {
		/* write_space will hit after EAGAIN, all else fatal */
		if (ret == -EAGAIN) {
			rds_tcp_stats_inc(s_tcp_sndbuf_full);
			ret = 0;
		} else {
			printk(KERN_WARNING "RDS/tcp: send to %pI4 "
			       "returned %d, disconnecting and reconnecting\n",
			       &conn->c_faddr, ret);
			rds_conn_drop(conn);
		}
	}
	if (done == 0)
		done = ret;
	return done;
}

/*
 * rm->m_ack_seq is set to the tcp sequence number that corresponds to the
 * last byte of the message, including the header.  This means that the
 * entire message has been received if rm->m_ack_seq is "before" the next
 * unacked byte of the TCP sequence space.  We have to do very careful
 * wrapping 32bit comparisons here.
 */
static int rds_tcp_is_acked(struct rds_message *rm, uint64_t ack)
{
	if (!test_bit(RDS_MSG_HAS_ACK_SEQ, &rm->m_flags))
		return 0;
	return (__s32)((u32)rm->m_ack_seq - (u32)ack) < 0;
}

void rds_tcp_write_space(struct sock *sk)
{
	void (*write_space)(struct sock *sk);
	struct rds_connection *conn;
	struct rds_tcp_connection *tc;

	read_lock_bh(&sk->sk_callback_lock);
	conn = sk->sk_user_data;
	if (!conn) {
		write_space = sk->sk_write_space;
		goto out;
	}

	tc = conn->c_transport_data;
	rdsdebug("write_space for tc %p\n", tc);
	write_space = tc->t_orig_write_space;
	rds_tcp_stats_inc(s_tcp_write_space_calls);

	rdsdebug("tcp una %u\n", rds_tcp_snd_una(tc));
	tc->t_last_seen_una = rds_tcp_snd_una(tc);
	rds_send_drop_acked(conn, rds_tcp_snd_una(tc), rds_tcp_is_acked);

	if ((atomic_read(&sk->sk_wmem_alloc) << 1) <= sk->sk_sndbuf)
		queue_delayed_work(rds_wq, &conn->c_send_w, 0);

out:
	read_unlock_bh(&sk->sk_callback_lock);

	/*
	 * write_space is only called when data leaves tcp's send queue if
	 * SOCK_NOSPACE is set.  We set SOCK_NOSPACE every time we put
	 * data in tcp's send queue because we use write_space to parse the
	 * sequence numbers and notice that rds messages have been fully
	 * received.
	 *
	 * tcp's write_space clears SOCK_NOSPACE if the send queue has more
	 * than a certain amount of space. So we need to set it again *after*
	 * we call tcp's write_space or else we might only get called on the
	 * first of a series of incoming tcp acks.
	 */
	write_space(sk);

	if (sk->sk_socket)
		set_bit(SOCK_NOSPACE, &sk->sk_socket->flags);
}
Commit	Line	Data
70041088 AG	1	/*
	2	* Copyright (c) 2006 Oracle. All rights reserved.
	3	*
	4	* This software is available to you under a choice of one of two
	5	* licenses. You may choose to be licensed under the terms of the GNU
	6	* General Public License (GPL) Version 2, available from the file
	7	* COPYING in the main directory of this source tree, or the
	8	* OpenIB.org BSD license below:
	9	*
	10	* Redistribution and use in source and binary forms, with or
	11	* without modification, are permitted provided that the following
	12	* conditions are met:
	13	*
	14	* - Redistributions of source code must retain the above
	15	* copyright notice, this list of conditions and the following
	16	* disclaimer.
	17	*
	18	* - Redistributions in binary form must reproduce the above
	19	* copyright notice, this list of conditions and the following
	20	* disclaimer in the documentation and/or other materials
	21	* provided with the distribution.
	22	*
	23	* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
	24	* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
	25	* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
	26	* NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
	27	* BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
	28	* ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
	29	* CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
	30	* SOFTWARE.
	31	*
	32	*/
	33	#include <linux/kernel.h>
	34	#include <linux/in.h>
	35	#include <net/tcp.h>
	36
0cb43965	37	#include "rds_single_path.h"
70041088 AG	38	#include "rds.h"
	39	#include "tcp.h"
	40
	41	static void rds_tcp_cork(struct socket *sock, int val)
	42	{
	43	mm_segment_t oldfs;
	44
	45	oldfs = get_fs();
	46	set_fs(KERNEL_DS);
	47	sock->ops->setsockopt(sock, SOL_TCP, TCP_CORK, (char __user *)&val,
	48	sizeof(val));
	49	set_fs(oldfs);
	50	}
	51
226f7a7d	52	void rds_tcp_xmit_path_prepare(struct rds_conn_path *cp)
70041088	53	{
226f7a7d	54	struct rds_tcp_connection *tc = cp->cp_transport_data;
70041088 AG	55
	56	rds_tcp_cork(tc->t_sock, 1);
	57	}
	58
226f7a7d	59	void rds_tcp_xmit_path_complete(struct rds_conn_path *cp)
70041088	60	{
226f7a7d	61	struct rds_tcp_connection *tc = cp->cp_transport_data;
70041088 AG	62
	63	rds_tcp_cork(tc->t_sock, 0);
	64	}
	65
	66	/* the core send_sem serializes this with other xmit and shutdown */
ff51bf84	67	static int rds_tcp_sendmsg(struct socket sock, void data, unsigned int len)
70041088 AG	68	{
70041088 AG	69	struct kvec vec = {
5c3da57d JH	70	.iov_base = data,
	71	.iov_len = len,
	72	};
	73	struct msghdr msg = {
	74	.msg_flags = MSG_DONTWAIT \| MSG_NOSIGNAL,
70041088	75	};
70041088 AG	76
	77	return kernel_sendmsg(sock, &msg, &vec, 1, vec.iov_len);
	78	}
	79
70041088 AG	80	/* the core send_sem serializes this with other xmit and shutdown */
70041088 AG	81	int rds_tcp_xmit(struct rds_connection conn, struct rds_message rm,
5c3da57d	82	unsigned int hdr_off, unsigned int sg, unsigned int off)
70041088 AG	83	{
	84	struct rds_tcp_connection *tc = conn->c_transport_data;
	85	int done = 0;
	86	int ret = 0;
76b29ef1	87	int more;
70041088 AG	88
	89	if (hdr_off == 0) {
	90	/*
	91	* m_ack_seq is set to the sequence number of the last byte of
	92	* header and data. see rds_tcp_is_acked().
	93	*/
	94	tc->t_last_sent_nxt = rds_tcp_snd_nxt(tc);
	95	rm->m_ack_seq = tc->t_last_sent_nxt +
	96	sizeof(struct rds_header) +
	97	be32_to_cpu(rm->m_inc.i_hdr.h_len) - 1;
4e857c58	98	smp_mb__before_atomic();
70041088 AG	99	set_bit(RDS_MSG_HAS_ACK_SEQ, &rm->m_flags);
	100	tc->t_last_expected_una = rm->m_ack_seq + 1;
	101
	102	rdsdebug("rm %p tcp nxt %u ack_seq %llu\n",
	103	rm, rds_tcp_snd_nxt(tc),
	104	(unsigned long long)rm->m_ack_seq);
	105	}
	106
	107	if (hdr_off < sizeof(struct rds_header)) {
	108	/* see rds_tcp_write_space() */
	109	set_bit(SOCK_NOSPACE, &tc->t_sock->sk->sk_socket->flags);
	110
	111	ret = rds_tcp_sendmsg(tc->t_sock,
	112	(void *)&rm->m_inc.i_hdr + hdr_off,
	113	sizeof(rm->m_inc.i_hdr) - hdr_off);
	114	if (ret < 0)
	115	goto out;
	116	done += ret;
	117	if (hdr_off + done != sizeof(struct rds_header))
	118	goto out;
	119	}
	120
76b29ef1	121	more = rm->data.op_nents > 1 ? (MSG_MORE \| MSG_SENDPAGE_NOTLAST) : 0;
6c7cc6e4	122	while (sg < rm->data.op_nents) {
76b29ef1 SV	123	int flags = MSG_DONTWAIT \| MSG_NOSIGNAL \| more;
76b29ef1 SV	124
70041088	125	ret = tc->t_sock->ops->sendpage(tc->t_sock,
6c7cc6e4 AG	126	sg_page(&rm->data.op_sg[sg]),
	127	rm->data.op_sg[sg].offset + off,
	128	rm->data.op_sg[sg].length - off,
76b29ef1	129	flags);
6c7cc6e4 AG	130	rdsdebug("tcp sendpage %p:%u:%u ret %d\n", (void *)sg_page(&rm->data.op_sg[sg]),
6c7cc6e4 AG	131	rm->data.op_sg[sg].offset + off, rm->data.op_sg[sg].length - off,
70041088 AG	132	ret);
	133	if (ret <= 0)
	134	break;
	135
	136	off += ret;
	137	done += ret;
6c7cc6e4	138	if (off == rm->data.op_sg[sg].length) {
70041088 AG	139	off = 0;
	140	sg++;
	141	}
76b29ef1 SV	142	if (sg == rm->data.op_nents - 1)
76b29ef1 SV	143	more = 0;
70041088 AG	144	}
	145
	146	out:
	147	if (ret <= 0) {
	148	/* write_space will hit after EAGAIN, all else fatal */
	149	if (ret == -EAGAIN) {
	150	rds_tcp_stats_inc(s_tcp_sndbuf_full);
	151	ret = 0;
	152	} else {
6884b348	153	printk(KERN_WARNING "RDS/tcp: send to %pI4 "
70041088	154	"returned %d, disconnecting and reconnecting\n",
6884b348	155	&conn->c_faddr, ret);
70041088 AG	156	rds_conn_drop(conn);
	157	}
	158	}
	159	if (done == 0)
	160	done = ret;
	161	return done;
	162	}
	163
	164	/*
	165	* rm->m_ack_seq is set to the tcp sequence number that corresponds to the
	166	* last byte of the message, including the header. This means that the
	167	* entire message has been received if rm->m_ack_seq is "before" the next
	168	* unacked byte of the TCP sequence space. We have to do very careful
	169	* wrapping 32bit comparisons here.
	170	*/
	171	static int rds_tcp_is_acked(struct rds_message *rm, uint64_t ack)
	172	{
	173	if (!test_bit(RDS_MSG_HAS_ACK_SEQ, &rm->m_flags))
	174	return 0;
	175	return (__s32)((u32)rm->m_ack_seq - (u32)ack) < 0;
	176	}
	177
	178	void rds_tcp_write_space(struct sock *sk)
	179	{
	180	void (write_space)(struct sock sk);
	181	struct rds_connection *conn;
	182	struct rds_tcp_connection *tc;
	183
38036629	184	read_lock_bh(&sk->sk_callback_lock);
70041088	185	conn = sk->sk_user_data;
8690bfa1	186	if (!conn) {
70041088 AG	187	write_space = sk->sk_write_space;
	188	goto out;
	189	}
	190
	191	tc = conn->c_transport_data;
	192	rdsdebug("write_space for tc %p\n", tc);
	193	write_space = tc->t_orig_write_space;
	194	rds_tcp_stats_inc(s_tcp_write_space_calls);
	195
	196	rdsdebug("tcp una %u\n", rds_tcp_snd_una(tc));
	197	tc->t_last_seen_una = rds_tcp_snd_una(tc);
	198	rds_send_drop_acked(conn, rds_tcp_snd_una(tc), rds_tcp_is_acked);
	199
5c3da57d	200	if ((atomic_read(&sk->sk_wmem_alloc) << 1) <= sk->sk_sndbuf)
8e82376e AG	201	queue_delayed_work(rds_wq, &conn->c_send_w, 0);
8e82376e AG	202
70041088	203	out:
38036629	204	read_unlock_bh(&sk->sk_callback_lock);
70041088 AG	205
	206	/*
	207	* write_space is only called when data leaves tcp's send queue if
	208	* SOCK_NOSPACE is set. We set SOCK_NOSPACE every time we put
	209	* data in tcp's send queue because we use write_space to parse the
	210	* sequence numbers and notice that rds messages have been fully
	211	* received.
	212	*
	213	* tcp's write_space clears SOCK_NOSPACE if the send queue has more
	214	* than a certain amount of space. So we need to set it again after
	215	* we call tcp's write_space or else we might only get called on the
	216	* first of a series of incoming tcp acks.
	217	*/
	218	write_space(sk);
	219
	220	if (sk->sk_socket)
	221	set_bit(SOCK_NOSPACE, &sk->sk_socket->flags);
	222	}