[fio.git] / engines / net.c

/*
 * net engine
 *
 * IO engine that reads/writes to/from sockets.
 *
 */
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <errno.h>
#include <assert.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <netdb.h>
#include <sys/poll.h>
#include <sys/types.h>
#include <sys/socket.h>

#include "../fio.h"

struct netio_data {
	int listenfd;
	int send_to_net;
	int use_splice;
	int net_protocol;
	int pipes[2];
	char host[64];
	struct sockaddr_in addr;
};

struct udp_close_msg {
	uint32_t magic;
	uint32_t cmd;
};

enum {
	FIO_LINK_CLOSE = 0x89,
	FIO_LINK_CLOSE_MAGIC = 0x6c696e6b,
};

/*
 * Return -1 for error and 'nr events' for a positive number
 * of events
 */
static int poll_wait(struct thread_data *td, int fd, short events)
{
	struct pollfd pfd;
	int ret;

	while (!td->terminate) {
		pfd.fd = fd;
		pfd.events = events;
		ret = poll(&pfd, 1, -1);
		if (ret < 0) {
			if (errno == EINTR)
				break;

			td_verror(td, errno, "poll");
			return -1;
		} else if (!ret)
			continue;

		break;
	}

	if (pfd.revents & events)
		return 1;

	return -1;
}

static int fio_netio_prep(struct thread_data *td, struct io_u *io_u)
{
	struct netio_data *nd = td->io_ops->data;

	/*
	 * Make sure we don't see spurious reads to a receiver, and vice versa
	 */
	if ((nd->send_to_net && io_u->ddir == DDIR_READ) ||
	    (!nd->send_to_net && io_u->ddir == DDIR_WRITE)) {
		td_verror(td, EINVAL, "bad direction");
		return 1;
	}
		
	return 0;
}

#ifdef FIO_HAVE_SPLICE
static int splice_io_u(int fdin, int fdout, unsigned int len)
{
	int bytes = 0;

	while (len) {
		int ret = splice(fdin, NULL, fdout, NULL, len, 0);

		if (ret < 0) {
			if (!bytes)
				bytes = ret;

			break;
		} else if (!ret)
			break;

		bytes += ret;
		len -= ret;
	}

	return bytes;
}

/*
 * Receive bytes from a socket and fill them into the internal pipe
 */
static int splice_in(struct thread_data *td, struct io_u *io_u)
{
	struct netio_data *nd = td->io_ops->data;

	return splice_io_u(io_u->file->fd, nd->pipes[1], io_u->xfer_buflen);
}

/*
 * Transmit 'len' bytes from the internal pipe
 */
static int splice_out(struct thread_data *td, struct io_u *io_u,
		      unsigned int len)
{
	struct netio_data *nd = td->io_ops->data;

	return splice_io_u(nd->pipes[0], io_u->file->fd, len);
}

static int vmsplice_io_u(struct io_u *io_u, int fd, unsigned int len)
{
	struct iovec iov = {
		.iov_base = io_u->xfer_buf,
		.iov_len = len,
	};
	int bytes = 0;

	while (iov.iov_len) {
		int ret = vmsplice(fd, &iov, 1, SPLICE_F_MOVE);

		if (ret < 0) {
			if (!bytes)
				bytes = ret;
			break;
		} else if (!ret)
			break;

		iov.iov_len -= ret;
		iov.iov_base += ret;
		bytes += ret;
	}

	return bytes;

}

/*
 * vmsplice() pipe to io_u buffer
 */
static int vmsplice_io_u_out(struct thread_data *td, struct io_u *io_u,
			     unsigned int len)
{
	struct netio_data *nd = td->io_ops->data;

	return vmsplice_io_u(io_u, nd->pipes[0], len);
}

/*
 * vmsplice() io_u to pipe
 */
static int vmsplice_io_u_in(struct thread_data *td, struct io_u *io_u)
{
	struct netio_data *nd = td->io_ops->data;

	return vmsplice_io_u(io_u, nd->pipes[1], io_u->xfer_buflen);
}

/*
 * splice receive - transfer socket data into a pipe using splice, then map
 * that pipe data into the io_u using vmsplice.
 */
static int fio_netio_splice_in(struct thread_data *td, struct io_u *io_u)
{
	int ret;

	ret = splice_in(td, io_u);
	if (ret > 0)
		return vmsplice_io_u_out(td, io_u, ret);

	return ret;
}

/*
 * splice transmit - map data from the io_u into a pipe by using vmsplice,
 * then transfer that pipe to a socket using splice.
 */
static int fio_netio_splice_out(struct thread_data *td, struct io_u *io_u)
{
	int ret;

	ret = vmsplice_io_u_in(td, io_u);
	if (ret > 0)
		return splice_out(td, io_u, ret);

	return ret;
}
#else
static int fio_netio_splice_in(struct thread_data *td, struct io_u *io_u)
{
	errno = EOPNOTSUPP;
	return -1;
}

static int fio_netio_splice_out(struct thread_data *td, struct io_u *io_u)
{
	errno = EOPNOTSUPP;
	return -1;
}
#endif

static int fio_netio_send(struct thread_data *td, struct io_u *io_u)
{
	struct netio_data *nd = td->io_ops->data;
	int ret, flags = OS_MSG_DONTWAIT;

	do {
		if (nd->net_protocol == IPPROTO_UDP) {
			struct sockaddr *to = (struct sockaddr *) &nd->addr;

			ret = sendto(io_u->file->fd, io_u->xfer_buf,
					io_u->xfer_buflen, flags, to,
					sizeof(*to));
		} else {
			/*
			 * if we are going to write more, set MSG_MORE
			 */
#ifdef MSG_MORE
			if (td->this_io_bytes[DDIR_WRITE] + io_u->xfer_buflen <
			    td->o.size)
				flags |= MSG_MORE;
#endif
			ret = send(io_u->file->fd, io_u->xfer_buf,
					io_u->xfer_buflen, flags);
		}
		if (ret > 0)
			break;

		ret = poll_wait(td, io_u->file->fd, POLLOUT);
		if (ret <= 0)
			break;

		flags &= ~OS_MSG_DONTWAIT;
	} while (1);

	return ret;
}

static int is_udp_close(struct io_u *io_u, int len)
{
	struct udp_close_msg *msg;

	if (len != sizeof(struct udp_close_msg))
		return 0;

	msg = io_u->xfer_buf;
	if (ntohl(msg->magic) != FIO_LINK_CLOSE_MAGIC)
		return 0;
	if (ntohl(msg->cmd) != FIO_LINK_CLOSE)
		return 0;

	return 1;
}

static int fio_netio_recv(struct thread_data *td, struct io_u *io_u)
{
	struct netio_data *nd = td->io_ops->data;
	int ret, flags = OS_MSG_DONTWAIT;

	do {
		if (nd->net_protocol == IPPROTO_UDP) {
#ifdef __hpux
			int len = sizeof(nd->addr);
#else
			socklen_t len = sizeof(nd->addr);
#endif
			struct sockaddr *from = (struct sockaddr *) &nd->addr;

			ret = recvfrom(io_u->file->fd, io_u->xfer_buf,
					io_u->xfer_buflen, flags, from, &len);
			if (is_udp_close(io_u, ret)) {
				td->done = 1;
				return 0;
			}
		} else {
			ret = recv(io_u->file->fd, io_u->xfer_buf,
					io_u->xfer_buflen, flags);
		}
		if (ret > 0)
			break;

		ret = poll_wait(td, io_u->file->fd, POLLIN);
		if (ret <= 0)
			break;
		flags &= ~OS_MSG_DONTWAIT;
		flags |= MSG_WAITALL;
	} while (1);

	return ret;
}

static int fio_netio_queue(struct thread_data *td, struct io_u *io_u)
{
	struct netio_data *nd = td->io_ops->data;
	int ret;

	fio_ro_check(td, io_u);

	if (io_u->ddir == DDIR_WRITE) {
		if (!nd->use_splice || nd->net_protocol == IPPROTO_UDP)
			ret = fio_netio_send(td, io_u);
		else
			ret = fio_netio_splice_out(td, io_u);
	} else if (io_u->ddir == DDIR_READ) {
		if (!nd->use_splice || nd->net_protocol == IPPROTO_UDP)
			ret = fio_netio_recv(td, io_u);
		else
			ret = fio_netio_splice_in(td, io_u);
	} else
		ret = 0;	/* must be a SYNC */

	if (ret != (int) io_u->xfer_buflen) {
		if (ret >= 0) {
			io_u->resid = io_u->xfer_buflen - ret;
			io_u->error = 0;
			return FIO_Q_COMPLETED;
		} else {
			int err = errno;

			if (io_u->ddir == DDIR_WRITE && err == EMSGSIZE)
				return FIO_Q_BUSY;

			io_u->error = err;
		}
	}

	if (io_u->error)
		td_verror(td, io_u->error, "xfer");

	return FIO_Q_COMPLETED;
}

static int fio_netio_connect(struct thread_data *td, struct fio_file *f)
{
	struct netio_data *nd = td->io_ops->data;
	int type;

	if (nd->net_protocol == IPPROTO_TCP)
		type = SOCK_STREAM;
	else
		type = SOCK_DGRAM;

	f->fd = socket(AF_INET, type, nd->net_protocol);
	if (f->fd < 0) {
		td_verror(td, errno, "socket");
		return 1;
	}

	if (nd->net_protocol == IPPROTO_UDP)
		return 0;

	if (connect(f->fd, (struct sockaddr *) &nd->addr, sizeof(nd->addr)) < 0) {
		td_verror(td, errno, "connect");
		return 1;
	}

	return 0;
}

static int fio_netio_accept(struct thread_data *td, struct fio_file *f)
{
	struct netio_data *nd = td->io_ops->data;
#ifdef __hpux
	int socklen = sizeof(nd->addr);
#else
	socklen_t socklen = sizeof(nd->addr);
#endif

	if (nd->net_protocol == IPPROTO_UDP) {
		f->fd = nd->listenfd;
		return 0;
	}

	log_info("fio: waiting for connection\n");

	if (poll_wait(td, nd->listenfd, POLLIN) < 0)
		return 1;

	f->fd = accept(nd->listenfd, (struct sockaddr *) &nd->addr, &socklen);
	if (f->fd < 0) {
		td_verror(td, errno, "accept");
		return 1;
	}

	return 0;
}

static int fio_netio_open_file(struct thread_data *td, struct fio_file *f)
{
	if (td_read(td))
		return fio_netio_accept(td, f);
	else
		return fio_netio_connect(td, f);
}

static void fio_netio_udp_close(struct thread_data *td, struct fio_file *f)
{
	struct netio_data *nd = td->io_ops->data;
	struct udp_close_msg msg;
	struct sockaddr *to = (struct sockaddr *) &nd->addr;
	int ret;

	msg.magic = htonl(FIO_LINK_CLOSE_MAGIC);
	msg.cmd = htonl(FIO_LINK_CLOSE);

	ret = sendto(f->fd, &msg, sizeof(msg), MSG_WAITALL, to,
			sizeof(nd->addr));
	if (ret < 0)
		td_verror(td, errno, "sendto udp link close");
}

static int fio_netio_close_file(struct thread_data *td, struct fio_file *f)
{
	struct netio_data *nd = td->io_ops->data;

	/*
	 * If this is an UDP connection, notify the receiver that we are
	 * closing down the link
	 */
	if (nd->net_protocol == IPPROTO_UDP)
		fio_netio_udp_close(td, f);

	return generic_close_file(td, f);
}

static int fio_netio_setup_connect(struct thread_data *td, const char *host,
				   unsigned short port)
{
	struct netio_data *nd = td->io_ops->data;

	nd->addr.sin_family = AF_INET;
	nd->addr.sin_port = htons(port);

	if (inet_aton(host, &nd->addr.sin_addr) != 1) {
		struct hostent *hent;

		hent = gethostbyname(host);
		if (!hent) {
			td_verror(td, errno, "gethostbyname");
			return 1;
		}

		memcpy(&nd->addr.sin_addr, hent->h_addr, 4);
	}

	return 0;
}

static int fio_netio_setup_listen(struct thread_data *td, short port)
{
	struct netio_data *nd = td->io_ops->data;
	int fd, opt, type;

	if (nd->net_protocol == IPPROTO_TCP)
		type = SOCK_STREAM;
	else
		type = SOCK_DGRAM;

	fd = socket(AF_INET, type, nd->net_protocol);
	if (fd < 0) {
		td_verror(td, errno, "socket");
		return 1;
	}

	opt = 1;
	if (setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, &opt, sizeof(opt)) < 0) {
		td_verror(td, errno, "setsockopt");
		return 1;
	}
#ifdef SO_REUSEPORT
	if (setsockopt(fd, SOL_SOCKET, SO_REUSEPORT, &opt, sizeof(opt)) < 0) {
		td_verror(td, errno, "setsockopt");
		return 1;
	}
#endif

	nd->addr.sin_family = AF_INET;
	nd->addr.sin_addr.s_addr = htonl(INADDR_ANY);
	nd->addr.sin_port = htons(port);

	if (bind(fd, (struct sockaddr *) &nd->addr, sizeof(nd->addr)) < 0) {
		td_verror(td, errno, "bind");
		return 1;
	}
	if (nd->net_protocol == IPPROTO_TCP && listen(fd, 1) < 0) {
		td_verror(td, errno, "listen");
		return 1;
	}

	nd->listenfd = fd;
	return 0;
}

static int fio_netio_init(struct thread_data *td)
{
	struct netio_data *nd = td->io_ops->data;
	unsigned int port;
	char host[64], buf[128];
	char *sep, *portp, *modep;
	int ret;

	if (td_rw(td)) {
		log_err("fio: network connections must be read OR write\n");
		return 1;
	}
	if (td_random(td)) {
		log_err("fio: network IO can't be random\n");
		return 1;
	}

	strcpy(buf, td->o.filename);

	sep = strchr(buf, '/');
	if (!sep)
		goto bad_host;

	*sep = '\0';
	sep++;
	strcpy(host, buf);
	if (!strlen(host))
		goto bad_host;

	modep = NULL;
	portp = sep;
	sep = strchr(portp, '/');
	if (sep) {
		*sep = '\0';
		modep = sep + 1;
	}
		
	port = strtol(portp, NULL, 10);
	if (!port || port > 65535)
		goto bad_host;

	if (modep) {
		if (!strncmp("tcp", modep, strlen(modep)) ||
		    !strncmp("TCP", modep, strlen(modep)))
			nd->net_protocol = IPPROTO_TCP;
		else if (!strncmp("udp", modep, strlen(modep)) ||
			 !strncmp("UDP", modep, strlen(modep)))
			nd->net_protocol = IPPROTO_UDP;
		else
			goto bad_host;
	} else
		nd->net_protocol = IPPROTO_TCP;

	if (td_read(td)) {
		nd->send_to_net = 0;
		ret = fio_netio_setup_listen(td, port);
	} else {
		nd->send_to_net = 1;
		ret = fio_netio_setup_connect(td, host, port);
	}

	return ret;
bad_host:
	log_err("fio: bad network host/port/protocol: %s\n", td->o.filename);
	return 1;
}

static void fio_netio_cleanup(struct thread_data *td)
{
	struct netio_data *nd = td->io_ops->data;

	if (nd) {
		if (nd->listenfd != -1)
			close(nd->listenfd);
		if (nd->pipes[0] != -1)
			close(nd->pipes[0]);
		if (nd->pipes[1] != -1)
			close(nd->pipes[1]);

		free(nd);
	}
}

static int fio_netio_setup(struct thread_data *td)
{
	struct netio_data *nd;

	if (!td->io_ops->data) {
		nd = malloc(sizeof(*nd));;

		memset(nd, 0, sizeof(*nd));
		nd->listenfd = -1;
		nd->pipes[0] = nd->pipes[1] = -1;
		td->io_ops->data = nd;
	}

	return 0;
}

#ifdef FIO_HAVE_SPLICE
static int fio_netio_setup_splice(struct thread_data *td)
{
	struct netio_data *nd;

	fio_netio_setup(td);

	nd = td->io_ops->data;
	if (nd) {
		if (pipe(nd->pipes) < 0)
			return 1;

		nd->use_splice = 1;
		return 0;
	}

	return 1;
}

static struct ioengine_ops ioengine_splice = {
	.name		= "netsplice",
	.version	= FIO_IOOPS_VERSION,
	.prep		= fio_netio_prep,
	.queue		= fio_netio_queue,
	.setup		= fio_netio_setup_splice,
	.init		= fio_netio_init,
	.cleanup	= fio_netio_cleanup,
	.open_file	= fio_netio_open_file,
	.close_file	= generic_close_file,
	.flags		= FIO_SYNCIO | FIO_DISKLESSIO | FIO_UNIDIR |
			  FIO_SIGTERM | FIO_PIPEIO,
};
#endif

static struct ioengine_ops ioengine_rw = {
	.name		= "net",
	.version	= FIO_IOOPS_VERSION,
	.prep		= fio_netio_prep,
	.queue		= fio_netio_queue,
	.setup		= fio_netio_setup,
	.init		= fio_netio_init,
	.cleanup	= fio_netio_cleanup,
	.open_file	= fio_netio_open_file,
	.close_file	= fio_netio_close_file,
	.flags		= FIO_SYNCIO | FIO_DISKLESSIO | FIO_UNIDIR |
			  FIO_SIGTERM | FIO_PIPEIO,
};

static void fio_init fio_netio_register(void)
{
	register_ioengine(&ioengine_rw);
#ifdef FIO_HAVE_SPLICE
	register_ioengine(&ioengine_splice);
#endif
}

static void fio_exit fio_netio_unregister(void)
{
	unregister_ioengine(&ioengine_rw);
#ifdef FIO_HAVE_SPLICE
	unregister_ioengine(&ioengine_splice);
#endif
}
Commit	Line	Data
ed92ac0c	1	/*
da751ca9 JA	2	* net engine
	3	*
	4	* IO engine that reads/writes to/from sockets.
	5	*
ed92ac0c JA	6	*/
	7	#include <stdio.h>
	8	#include <stdlib.h>
	9	#include <unistd.h>
	10	#include <errno.h>
	11	#include <assert.h>
	12	#include <netinet/in.h>
	13	#include <arpa/inet.h>
	14	#include <netdb.h>
5fdd124a	15	#include <sys/poll.h>
7292056a JA	16	#include <sys/types.h>
7292056a JA	17	#include <sys/socket.h>
ed92ac0c JA	18
ed92ac0c JA	19	#include "../fio.h"
ed92ac0c	20
b5af8293 JA	21	struct netio_data {
	22	int listenfd;
	23	int send_to_net;
9cce02e8	24	int use_splice;
414c2a3e	25	int net_protocol;
9cce02e8	26	int pipes[2];
b5af8293 JA	27	char host[64];
	28	struct sockaddr_in addr;
	29	};
ed92ac0c	30
664fb3bd JA	31	struct udp_close_msg {
	32	uint32_t magic;
	33	uint32_t cmd;
	34	};
	35
	36	enum {
	37	FIO_LINK_CLOSE = 0x89,
	38	FIO_LINK_CLOSE_MAGIC = 0x6c696e6b,
	39	};
	40
371d456c JA	41	/*
	42	* Return -1 for error and 'nr events' for a positive number
	43	* of events
	44	*/
	45	static int poll_wait(struct thread_data *td, int fd, short events)
	46	{
	47	struct pollfd pfd;
	48	int ret;
	49
	50	while (!td->terminate) {
	51	pfd.fd = fd;
	52	pfd.events = events;
	53	ret = poll(&pfd, 1, -1);
	54	if (ret < 0) {
	55	if (errno == EINTR)
d5b388a5	56	break;
371d456c JA	57
	58	td_verror(td, errno, "poll");
	59	return -1;
	60	} else if (!ret)
	61	continue;
	62
	63	break;
	64	}
	65
	66	if (pfd.revents & events)
	67	return 1;
371d456c JA	68
	69	return -1;
	70	}
	71
ed92ac0c JA	72	static int fio_netio_prep(struct thread_data td, struct io_u io_u)
ed92ac0c JA	73	{
b5af8293	74	struct netio_data *nd = td->io_ops->data;
ed92ac0c	75
7a6499da JA	76	/*
	77	* Make sure we don't see spurious reads to a receiver, and vice versa
	78	*/
b5af8293 JA	79	if ((nd->send_to_net && io_u->ddir == DDIR_READ) \|\|
b5af8293 JA	80	(!nd->send_to_net && io_u->ddir == DDIR_WRITE)) {
e1161c32	81	td_verror(td, EINVAL, "bad direction");
7a6499da	82	return 1;
ed92ac0c	83	}
7a6499da	84
f85ac25a	85	return 0;
ed92ac0c JA	86	}
ed92ac0c JA	87
5921e80c	88	#ifdef FIO_HAVE_SPLICE
cd963e18	89	static int splice_io_u(int fdin, int fdout, unsigned int len)
ed92ac0c	90	{
9cce02e8	91	int bytes = 0;
7a6499da	92
9cce02e8	93	while (len) {
cd963e18	94	int ret = splice(fdin, NULL, fdout, NULL, len, 0);
9cce02e8 JA	95
	96	if (ret < 0) {
	97	if (!bytes)
	98	bytes = ret;
	99
	100	break;
	101	} else if (!ret)
	102	break;
	103
	104	bytes += ret;
f657a2fb	105	len -= ret;
9cce02e8 JA	106	}
	107
	108	return bytes;
	109	}
	110
	111	/*
cd963e18	112	* Receive bytes from a socket and fill them into the internal pipe
9cce02e8	113	*/
cd963e18	114	static int splice_in(struct thread_data td, struct io_u io_u)
9cce02e8 JA	115	{
9cce02e8 JA	116	struct netio_data *nd = td->io_ops->data;
9cce02e8	117
cd963e18	118	return splice_io_u(io_u->file->fd, nd->pipes[1], io_u->xfer_buflen);
9cce02e8 JA	119	}
	120
	121	/*
cd963e18	122	* Transmit 'len' bytes from the internal pipe
9cce02e8	123	*/
cd963e18 JA	124	static int splice_out(struct thread_data td, struct io_u io_u,
cd963e18 JA	125	unsigned int len)
9cce02e8 JA	126	{
9cce02e8 JA	127	struct netio_data *nd = td->io_ops->data;
cd963e18 JA	128
	129	return splice_io_u(nd->pipes[0], io_u->file->fd, len);
	130	}
	131
	132	static int vmsplice_io_u(struct io_u *io_u, int fd, unsigned int len)
	133	{
9cce02e8 JA	134	struct iovec iov = {
	135	.iov_base = io_u->xfer_buf,
	136	.iov_len = len,
	137	};
	138	int bytes = 0;
	139
	140	while (iov.iov_len) {
cd963e18	141	int ret = vmsplice(fd, &iov, 1, SPLICE_F_MOVE);
9cce02e8 JA	142
	143	if (ret < 0) {
	144	if (!bytes)
	145	bytes = ret;
	146	break;
	147	} else if (!ret)
	148	break;
	149
	150	iov.iov_len -= ret;
cd963e18	151	iov.iov_base += ret;
f657a2fb	152	bytes += ret;
9cce02e8 JA	153	}
	154
	155	return bytes;
cd963e18	156
9cce02e8 JA	157	}
	158
	159	/*
cd963e18	160	* vmsplice() pipe to io_u buffer
9cce02e8	161	*/
cd963e18 JA	162	static int vmsplice_io_u_out(struct thread_data td, struct io_u io_u,
cd963e18 JA	163	unsigned int len)
9cce02e8 JA	164	{
9cce02e8 JA	165	struct netio_data *nd = td->io_ops->data;
9cce02e8	166
cd963e18 JA	167	return vmsplice_io_u(io_u, nd->pipes[0], len);
cd963e18 JA	168	}
9cce02e8	169
cd963e18 JA	170	/*
	171	* vmsplice() io_u to pipe
	172	*/
	173	static int vmsplice_io_u_in(struct thread_data td, struct io_u io_u)
	174	{
	175	struct netio_data *nd = td->io_ops->data;
ed92ac0c	176
cd963e18	177	return vmsplice_io_u(io_u, nd->pipes[1], io_u->xfer_buflen);
9cce02e8 JA	178	}
9cce02e8 JA	179
cd963e18 JA	180	/*
	181	* splice receive - transfer socket data into a pipe using splice, then map
	182	* that pipe data into the io_u using vmsplice.
	183	*/
9cce02e8 JA	184	static int fio_netio_splice_in(struct thread_data td, struct io_u io_u)
	185	{
	186	int ret;
	187
	188	ret = splice_in(td, io_u);
cd963e18 JA	189	if (ret > 0)
cd963e18 JA	190	return vmsplice_io_u_out(td, io_u, ret);
9cce02e8	191
cd963e18	192	return ret;
9cce02e8 JA	193	}
9cce02e8 JA	194
cd963e18 JA	195	/*
	196	* splice transmit - map data from the io_u into a pipe by using vmsplice,
	197	* then transfer that pipe to a socket using splice.
	198	*/
9cce02e8 JA	199	static int fio_netio_splice_out(struct thread_data td, struct io_u io_u)
	200	{
	201	int ret;
	202
	203	ret = vmsplice_io_u_in(td, io_u);
cd963e18 JA	204	if (ret > 0)
cd963e18 JA	205	return splice_out(td, io_u, ret);
9cce02e8	206
cd963e18	207	return ret;
9cce02e8	208	}
5921e80c JA	209	#else
	210	static int fio_netio_splice_in(struct thread_data td, struct io_u io_u)
	211	{
af8771b9	212	errno = EOPNOTSUPP;
5921e80c JA	213	return -1;
	214	}
	215
	216	static int fio_netio_splice_out(struct thread_data td, struct io_u io_u)
	217	{
af8771b9	218	errno = EOPNOTSUPP;
5921e80c JA	219	return -1;
	220	}
	221	#endif
9cce02e8 JA	222
	223	static int fio_netio_send(struct thread_data td, struct io_u io_u)
	224	{
414c2a3e	225	struct netio_data *nd = td->io_ops->data;
8e239cae	226	int ret, flags = OS_MSG_DONTWAIT;
371d456c	227
664fb3bd JA	228	do {
664fb3bd JA	229	if (nd->net_protocol == IPPROTO_UDP) {
62b38926 JA	230	struct sockaddr to = (struct sockaddr ) &nd->addr;
62b38926 JA	231
664fb3bd	232	ret = sendto(io_u->file->fd, io_u->xfer_buf,
62b38926 JA	233	io_u->xfer_buflen, flags, to,
62b38926 JA	234	sizeof(*to));
664fb3bd JA	235	} else {
	236	/*
	237	* if we are going to write more, set MSG_MORE
	238	*/
5921e80c	239	#ifdef MSG_MORE
664fb3bd JA	240	if (td->this_io_bytes[DDIR_WRITE] + io_u->xfer_buflen <
	241	td->o.size)
	242	flags \|= MSG_MORE;
5921e80c	243	#endif
664fb3bd JA	244	ret = send(io_u->file->fd, io_u->xfer_buf,
	245	io_u->xfer_buflen, flags);
	246	}
	247	if (ret > 0)
	248	break;
9cce02e8	249
664fb3bd JA	250	ret = poll_wait(td, io_u->file->fd, POLLOUT);
	251	if (ret <= 0)
	252	break;
	253
8e239cae	254	flags &= ~OS_MSG_DONTWAIT;
664fb3bd JA	255	} while (1);
	256
	257	return ret;
	258	}
	259
	260	static int is_udp_close(struct io_u *io_u, int len)
	261	{
	262	struct udp_close_msg *msg;
	263
	264	if (len != sizeof(struct udp_close_msg))
	265	return 0;
	266
	267	msg = io_u->xfer_buf;
	268	if (ntohl(msg->magic) != FIO_LINK_CLOSE_MAGIC)
	269	return 0;
	270	if (ntohl(msg->cmd) != FIO_LINK_CLOSE)
	271	return 0;
	272
	273	return 1;
9cce02e8 JA	274	}
9cce02e8 JA	275
414c2a3e	276	static int fio_netio_recv(struct thread_data td, struct io_u io_u)
9cce02e8	277	{
414c2a3e	278	struct netio_data *nd = td->io_ops->data;
8e239cae	279	int ret, flags = OS_MSG_DONTWAIT;
664fb3bd JA	280
	281	do {
	282	if (nd->net_protocol == IPPROTO_UDP) {
d48a9799 JA	283	#ifdef __hpux
	284	int len = sizeof(nd->addr);
	285	#else
664fb3bd	286	socklen_t len = sizeof(nd->addr);
d48a9799	287	#endif
62b38926	288	struct sockaddr from = (struct sockaddr ) &nd->addr;
664fb3bd JA	289
664fb3bd JA	290	ret = recvfrom(io_u->file->fd, io_u->xfer_buf,
62b38926	291	io_u->xfer_buflen, flags, from, &len);
664fb3bd JA	292	if (is_udp_close(io_u, ret)) {
	293	td->done = 1;
	294	return 0;
	295	}
	296	} else {
	297	ret = recv(io_u->file->fd, io_u->xfer_buf,
	298	io_u->xfer_buflen, flags);
	299	}
	300	if (ret > 0)
	301	break;
9cce02e8	302
664fb3bd JA	303	ret = poll_wait(td, io_u->file->fd, POLLIN);
	304	if (ret <= 0)
	305	break;
8e239cae	306	flags &= ~OS_MSG_DONTWAIT;
664fb3bd JA	307	flags \|= MSG_WAITALL;
664fb3bd JA	308	} while (1);
414c2a3e	309
664fb3bd	310	return ret;
9cce02e8 JA	311	}
	312
	313	static int fio_netio_queue(struct thread_data td, struct io_u io_u)
	314	{
	315	struct netio_data *nd = td->io_ops->data;
	316	int ret;
	317
7101d9c2 JA	318	fio_ro_check(td, io_u);
7101d9c2 JA	319
9cce02e8	320	if (io_u->ddir == DDIR_WRITE) {
414c2a3e	321	if (!nd->use_splice \|\| nd->net_protocol == IPPROTO_UDP)
9cce02e8	322	ret = fio_netio_send(td, io_u);
414c2a3e JA	323	else
414c2a3e JA	324	ret = fio_netio_splice_out(td, io_u);
d4f12dd0	325	} else if (io_u->ddir == DDIR_READ) {
414c2a3e JA	326	if (!nd->use_splice \|\| nd->net_protocol == IPPROTO_UDP)
414c2a3e JA	327	ret = fio_netio_recv(td, io_u);
9cce02e8	328	else
414c2a3e	329	ret = fio_netio_splice_in(td, io_u);
d4f12dd0	330	} else
7a6499da	331	ret = 0; /* must be a SYNC */
ed92ac0c	332
cec6b55d	333	if (ret != (int) io_u->xfer_buflen) {
22819ec2	334	if (ret >= 0) {
cec6b55d JA	335	io_u->resid = io_u->xfer_buflen - ret;
cec6b55d JA	336	io_u->error = 0;
36167d82	337	return FIO_Q_COMPLETED;
414c2a3e JA	338	} else {
	339	int err = errno;
	340
	341	if (io_u->ddir == DDIR_WRITE && err == EMSGSIZE)
	342	return FIO_Q_BUSY;
	343
	344	io_u->error = err;
	345	}
ed92ac0c JA	346	}
ed92ac0c JA	347
36167d82	348	if (io_u->error)
e1161c32	349	td_verror(td, io_u->error, "xfer");
ed92ac0c	350
36167d82	351	return FIO_Q_COMPLETED;
ed92ac0c JA	352	}
ed92ac0c JA	353
b5af8293	354	static int fio_netio_connect(struct thread_data td, struct fio_file f)
ed92ac0c	355	{
b5af8293	356	struct netio_data *nd = td->io_ops->data;
414c2a3e JA	357	int type;
	358
	359	if (nd->net_protocol == IPPROTO_TCP)
	360	type = SOCK_STREAM;
	361	else
	362	type = SOCK_DGRAM;
ed92ac0c	363
414c2a3e	364	f->fd = socket(AF_INET, type, nd->net_protocol);
b5af8293 JA	365	if (f->fd < 0) {
	366	td_verror(td, errno, "socket");
	367	return 1;
ed92ac0c JA	368	}
ed92ac0c JA	369
414c2a3e JA	370	if (nd->net_protocol == IPPROTO_UDP)
	371	return 0;
	372
b5af8293 JA	373	if (connect(f->fd, (struct sockaddr *) &nd->addr, sizeof(nd->addr)) < 0) {
	374	td_verror(td, errno, "connect");
	375	return 1;
ed92ac0c JA	376	}
	377
	378	return 0;
ed92ac0c JA	379	}
ed92ac0c JA	380
b5af8293	381	static int fio_netio_accept(struct thread_data td, struct fio_file f)
5fdd124a	382	{
b5af8293	383	struct netio_data *nd = td->io_ops->data;
d48a9799 JA	384	#ifdef __hpux
	385	int socklen = sizeof(nd->addr);
	386	#else
b5af8293	387	socklen_t socklen = sizeof(nd->addr);
d48a9799	388	#endif
5fdd124a	389
414c2a3e JA	390	if (nd->net_protocol == IPPROTO_UDP) {
	391	f->fd = nd->listenfd;
	392	return 0;
	393	}
	394
6d86144d	395	log_info("fio: waiting for connection\n");
5fdd124a	396
371d456c JA	397	if (poll_wait(td, nd->listenfd, POLLIN) < 0)
371d456c JA	398	return 1;
0c09442b	399
371d456c JA	400	f->fd = accept(nd->listenfd, (struct sockaddr *) &nd->addr, &socklen);
	401	if (f->fd < 0) {
	402	td_verror(td, errno, "accept");
	403	return 1;
b5af8293	404	}
5fdd124a	405
b5af8293 JA	406	return 0;
	407	}
	408
b5af8293 JA	409	static int fio_netio_open_file(struct thread_data td, struct fio_file f)
	410	{
	411	if (td_read(td))
	412	return fio_netio_accept(td, f);
	413	else
	414	return fio_netio_connect(td, f);
	415	}
	416
664fb3bd JA	417	static void fio_netio_udp_close(struct thread_data td, struct fio_file f)
	418	{
	419	struct netio_data *nd = td->io_ops->data;
	420	struct udp_close_msg msg;
62b38926	421	struct sockaddr to = (struct sockaddr ) &nd->addr;
664fb3bd JA	422	int ret;
	423
	424	msg.magic = htonl(FIO_LINK_CLOSE_MAGIC);
	425	msg.cmd = htonl(FIO_LINK_CLOSE);
	426
62b38926	427	ret = sendto(f->fd, &msg, sizeof(msg), MSG_WAITALL, to,
664fb3bd JA	428	sizeof(nd->addr));
	429	if (ret < 0)
	430	td_verror(td, errno, "sendto udp link close");
	431	}
	432
	433	static int fio_netio_close_file(struct thread_data td, struct fio_file f)
	434	{
	435	struct netio_data *nd = td->io_ops->data;
	436
	437	/*
	438	* If this is an UDP connection, notify the receiver that we are
	439	* closing down the link
	440	*/
	441	if (nd->net_protocol == IPPROTO_UDP)
	442	fio_netio_udp_close(td, f);
	443
	444	return generic_close_file(td, f);
	445	}
	446
b5af8293 JA	447	static int fio_netio_setup_connect(struct thread_data td, const char host,
	448	unsigned short port)
	449	{
	450	struct netio_data *nd = td->io_ops->data;
	451
	452	nd->addr.sin_family = AF_INET;
	453	nd->addr.sin_port = htons(port);
	454
	455	if (inet_aton(host, &nd->addr.sin_addr) != 1) {
	456	struct hostent *hent;
	457
	458	hent = gethostbyname(host);
	459	if (!hent) {
	460	td_verror(td, errno, "gethostbyname");
	461	return 1;
5fdd124a	462	}
b5af8293 JA	463
b5af8293 JA	464	memcpy(&nd->addr.sin_addr, hent->h_addr, 4);
5fdd124a JA	465	}
	466
	467	return 0;
	468	}
	469
b5af8293	470	static int fio_netio_setup_listen(struct thread_data *td, short port)
ed92ac0c	471	{
b5af8293	472	struct netio_data *nd = td->io_ops->data;
414c2a3e	473	int fd, opt, type;
ed92ac0c	474
414c2a3e JA	475	if (nd->net_protocol == IPPROTO_TCP)
	476	type = SOCK_STREAM;
	477	else
	478	type = SOCK_DGRAM;
	479
	480	fd = socket(AF_INET, type, nd->net_protocol);
ed92ac0c	481	if (fd < 0) {
e1161c32	482	td_verror(td, errno, "socket");
ed92ac0c JA	483	return 1;
	484	}
	485
	486	opt = 1;
	487	if (setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, &opt, sizeof(opt)) < 0) {
e1161c32	488	td_verror(td, errno, "setsockopt");
ed92ac0c JA	489	return 1;
ed92ac0c JA	490	}
6bedbfaf JA	491	#ifdef SO_REUSEPORT
6bedbfaf JA	492	if (setsockopt(fd, SOL_SOCKET, SO_REUSEPORT, &opt, sizeof(opt)) < 0) {
e1161c32	493	td_verror(td, errno, "setsockopt");
6bedbfaf JA	494	return 1;
	495	}
	496	#endif
ed92ac0c	497
b5af8293 JA	498	nd->addr.sin_family = AF_INET;
	499	nd->addr.sin_addr.s_addr = htonl(INADDR_ANY);
	500	nd->addr.sin_port = htons(port);
ed92ac0c	501
b5af8293	502	if (bind(fd, (struct sockaddr *) &nd->addr, sizeof(nd->addr)) < 0) {
e1161c32	503	td_verror(td, errno, "bind");
ed92ac0c JA	504	return 1;
ed92ac0c JA	505	}
414c2a3e	506	if (nd->net_protocol == IPPROTO_TCP && listen(fd, 1) < 0) {
e1161c32	507	td_verror(td, errno, "listen");
ed92ac0c JA	508	return 1;
	509	}
	510
b5af8293 JA	511	nd->listenfd = fd;
b5af8293 JA	512	return 0;
ed92ac0c JA	513	}
ed92ac0c JA	514
9bec88e1	515	static int fio_netio_init(struct thread_data *td)
ed92ac0c	516	{
b5af8293	517	struct netio_data *nd = td->io_ops->data;
443662ef	518	unsigned int port;
b5af8293	519	char host[64], buf[128];
414c2a3e	520	char sep, portp, *modep;
af52b345	521	int ret;
ed92ac0c	522
413dd459	523	if (td_rw(td)) {
ed92ac0c JA	524	log_err("fio: network connections must be read OR write\n");
	525	return 1;
	526	}
16d55aae JA	527	if (td_random(td)) {
	528	log_err("fio: network IO can't be random\n");
	529	return 1;
	530	}
ed92ac0c	531
2dc1bbeb	532	strcpy(buf, td->o.filename);
ed92ac0c	533
9f9214f2	534	sep = strchr(buf, '/');
443662ef JA	535	if (!sep)
443662ef JA	536	goto bad_host;
ed92ac0c JA	537
	538	*sep = '\0';
	539	sep++;
	540	strcpy(host, buf);
443662ef JA	541	if (!strlen(host))
	542	goto bad_host;
	543
414c2a3e JA	544	modep = NULL;
	545	portp = sep;
	546	sep = strchr(portp, '/');
	547	if (sep) {
	548	*sep = '\0';
	549	modep = sep + 1;
	550	}
	551
	552	port = strtol(portp, NULL, 10);
443662ef JA	553	if (!port \|\| port > 65535)
443662ef JA	554	goto bad_host;
ed92ac0c	555
414c2a3e	556	if (modep) {
3f8fc5ad JA	557	if (!strncmp("tcp", modep, strlen(modep)) \|\|
3f8fc5ad JA	558	!strncmp("TCP", modep, strlen(modep)))
414c2a3e	559	nd->net_protocol = IPPROTO_TCP;
3f8fc5ad JA	560	else if (!strncmp("udp", modep, strlen(modep)) \|\|
3f8fc5ad JA	561	!strncmp("UDP", modep, strlen(modep)))
414c2a3e JA	562	nd->net_protocol = IPPROTO_UDP;
	563	else
	564	goto bad_host;
	565	} else
	566	nd->net_protocol = IPPROTO_TCP;
	567
413dd459	568	if (td_read(td)) {
b5af8293	569	nd->send_to_net = 0;
ed92ac0c JA	570	ret = fio_netio_setup_listen(td, port);
ed92ac0c JA	571	} else {
b5af8293	572	nd->send_to_net = 1;
ed92ac0c JA	573	ret = fio_netio_setup_connect(td, host, port);
	574	}
	575
7bb48f84	576	return ret;
443662ef	577	bad_host:
414c2a3e	578	log_err("fio: bad network host/port/protocol: %s\n", td->o.filename);
443662ef	579	return 1;
ed92ac0c JA	580	}
ed92ac0c JA	581
b5af8293	582	static void fio_netio_cleanup(struct thread_data *td)
9bec88e1	583	{
b5af8293 JA	584	struct netio_data *nd = td->io_ops->data;
	585
	586	if (nd) {
64b24cd8 JA	587	if (nd->listenfd != -1)
	588	close(nd->listenfd);
	589	if (nd->pipes[0] != -1)
	590	close(nd->pipes[0]);
	591	if (nd->pipes[1] != -1)
	592	close(nd->pipes[1]);
	593
b5af8293	594	free(nd);
b5af8293 JA	595	}
	596	}
	597
	598	static int fio_netio_setup(struct thread_data *td)
	599	{
7bb48f84	600	struct netio_data *nd;
7bb48f84 JA	601
	602	if (!td->io_ops->data) {
	603	nd = malloc(sizeof(*nd));;
	604
	605	memset(nd, 0, sizeof(*nd));
	606	nd->listenfd = -1;
64b24cd8	607	nd->pipes[0] = nd->pipes[1] = -1;
7bb48f84	608	td->io_ops->data = nd;
7bb48f84	609	}
b5af8293	610
9bec88e1 JA	611	return 0;
	612	}
	613
5921e80c	614	#ifdef FIO_HAVE_SPLICE
9cce02e8 JA	615	static int fio_netio_setup_splice(struct thread_data *td)
	616	{
	617	struct netio_data *nd;
	618
	619	fio_netio_setup(td);
	620
	621	nd = td->io_ops->data;
	622	if (nd) {
	623	if (pipe(nd->pipes) < 0)
	624	return 1;
	625
	626	nd->use_splice = 1;
	627	return 0;
	628	}
	629
	630	return 1;
	631	}
	632
5921e80c JA	633	static struct ioengine_ops ioengine_splice = {
5921e80c JA	634	.name = "netsplice",
ed92ac0c	635	.version = FIO_IOOPS_VERSION,
ed92ac0c JA	636	.prep = fio_netio_prep,
ed92ac0c JA	637	.queue = fio_netio_queue,
5921e80c	638	.setup = fio_netio_setup_splice,
9bec88e1	639	.init = fio_netio_init,
b5af8293 JA	640	.cleanup = fio_netio_cleanup,
	641	.open_file = fio_netio_open_file,
	642	.close_file = generic_close_file,
ad830ed7	643	.flags = FIO_SYNCIO \| FIO_DISKLESSIO \| FIO_UNIDIR \|
03e20d68	644	FIO_SIGTERM \| FIO_PIPEIO,
ed92ac0c	645	};
5921e80c	646	#endif
ed92ac0c	647
5921e80c JA	648	static struct ioengine_ops ioengine_rw = {
5921e80c JA	649	.name = "net",
9cce02e8 JA	650	.version = FIO_IOOPS_VERSION,
	651	.prep = fio_netio_prep,
	652	.queue = fio_netio_queue,
5921e80c	653	.setup = fio_netio_setup,
9cce02e8 JA	654	.init = fio_netio_init,
	655	.cleanup = fio_netio_cleanup,
	656	.open_file = fio_netio_open_file,
664fb3bd	657	.close_file = fio_netio_close_file,
ad830ed7	658	.flags = FIO_SYNCIO \| FIO_DISKLESSIO \| FIO_UNIDIR \|
03e20d68	659	FIO_SIGTERM \| FIO_PIPEIO,
9cce02e8 JA	660	};
9cce02e8 JA	661
ed92ac0c JA	662	static void fio_init fio_netio_register(void)
ed92ac0c JA	663	{
9cce02e8	664	register_ioengine(&ioengine_rw);
5921e80c	665	#ifdef FIO_HAVE_SPLICE
9cce02e8	666	register_ioengine(&ioengine_splice);
5921e80c	667	#endif
ed92ac0c JA	668	}
	669
	670	static void fio_exit fio_netio_unregister(void)
	671	{
9cce02e8	672	unregister_ioengine(&ioengine_rw);
5921e80c	673	#ifdef FIO_HAVE_SPLICE
9cce02e8	674	unregister_ioengine(&ioengine_splice);
5921e80c	675	#endif
ed92ac0c	676	}