[fio.git] / engines / guasi.c

/*
 * guasi engine
 *
 * IO engine using the GUASI library.
 *
 * This is currently disabled. To enable it, execute:
 *
 * $ export EXTFLAGS="-DFIO_HAVE_GUASI"
 * $ export EXTLIBS="-lguasi"
 *
 * before running make. You'll need the GUASI lib as well:
 *
 * http://www.xmailserver.org/guasi-lib.html
 *
 */
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <errno.h>
#include <assert.h>

#include "../fio.h"

#ifdef FIO_HAVE_GUASI

#define GFIO_MIN_THREADS 32
#ifndef GFIO_MAX_THREADS
#define GFIO_MAX_THREADS 2000
#endif

#include <guasi.h>
#include <guasi_syscalls.h>

#ifdef GFIO_DEBUG
#define GDBG_PRINT(a) printf a
#else
#define GDBG_PRINT(a) (void) 0
#endif

struct guasi_data {
	guasi_t hctx;
	int max_reqs;
	guasi_req_t *reqs;
	struct io_u **io_us;
	int queued_nr;
	int reqs_nr;
};

static int fio_guasi_prep(struct thread_data fio_unused *td, struct io_u *io_u)
{

	GDBG_PRINT(("fio_guasi_prep(%p)\n", io_u));
	io_u->greq = NULL;

	return 0;
}

static struct io_u *fio_guasi_event(struct thread_data *td, int event)
{
	struct guasi_data *ld = td->io_ops->data;
	struct io_u *io_u;
	struct guasi_reqinfo rinf;

	GDBG_PRINT(("fio_guasi_event(%d)\n", event));
	if (guasi_req_info(ld->reqs[event], &rinf) < 0) {
		log_err("guasi_req_info(%d) FAILED!\n", event);
		return NULL;
	}
	io_u = rinf.asid;
	io_u->error = EINPROGRESS;
	GDBG_PRINT(("fio_guasi_event(%d) -> %p\n", event, io_u));
	if (rinf.status == GUASI_STATUS_COMPLETE) {
		io_u->error = rinf.result;
		if (io_u->ddir == DDIR_READ ||
		    io_u->ddir == DDIR_WRITE) {
			io_u->error = 0;
			if (rinf.result != (long) io_u->xfer_buflen) {
				if (rinf.result >= 0)
					io_u->resid = io_u->xfer_buflen - rinf.result;
				else
					io_u->error = rinf.error;
			}
		}
	}

	return io_u;
}

static int fio_guasi_getevents(struct thread_data *td, unsigned int min,
			       unsigned int max, struct timespec *t)
{
	struct guasi_data *ld = td->io_ops->data;
	int n, r;
	long timeo = -1;

	GDBG_PRINT(("fio_guasi_getevents(%d, %d)\n", min, max));
	if (min > ld->max_reqs)
		min = ld->max_reqs;
	if (max > ld->max_reqs)
		max = ld->max_reqs;
	if (t)
		timeo = t->tv_sec * 1000L + t->tv_nsec / 1000000L;
	for (n = 0; n < ld->reqs_nr; n++)
		guasi_req_free(ld->reqs[n]);
	n = 0;
	do {
		r = guasi_fetch(ld->hctx, ld->reqs + n, min - n,
				max - n, timeo);
		if (r < 0) {
			log_err("guasi_fetch() FAILED! (%d)\n", r);
			break;
		}
		n += r;
		if (n >= min)
			break;
	} while (1);
	ld->reqs_nr = n;
	GDBG_PRINT(("fio_guasi_getevents() -> %d\n", n));

	return n;
}

static int fio_guasi_queue(struct thread_data *td, struct io_u *io_u)
{
	struct guasi_data *ld = td->io_ops->data;

	fio_ro_check(td, io_u);

	GDBG_PRINT(("fio_guasi_queue(%p)\n", io_u));
	if (ld->queued_nr == (int) td->o.iodepth)
		return FIO_Q_BUSY;

	ld->io_us[ld->queued_nr] = io_u;
	ld->queued_nr++;
	return FIO_Q_QUEUED;
}

static void fio_guasi_queued(struct thread_data *td, struct io_u **io_us, int nr)
{
	int i;
	struct io_u *io_u;
	struct timeval now;

	if (!fio_fill_issue_time(td))
		return;

	io_u_mark_submit(td, nr);
	fio_gettime(&now, NULL);
	for (i = 0; i < nr; i++) {
		io_u = io_us[i];
		memcpy(&io_u->issue_time, &now, sizeof(now));
		io_u_queued(td, io_u);
	}
}

static int fio_guasi_commit(struct thread_data *td)
{
	struct guasi_data *ld = td->io_ops->data;
	int i;
	struct io_u *io_u;
	struct fio_file *f;

	GDBG_PRINT(("fio_guasi_commit(%d)\n", ld->queued_nr));
	for (i = 0; i < ld->queued_nr; i++) {
		io_u = ld->io_us[i];
		GDBG_PRINT(("fio_guasi_commit(%d) --> %p\n", i, io_u));
		f = io_u->file;
		io_u->greq = NULL;
		if (io_u->ddir == DDIR_READ)
			io_u->greq = guasi__pread(ld->hctx, ld, io_u, 0,
						  f->fd, io_u->xfer_buf, io_u->xfer_buflen,
						  io_u->offset);
		else if (io_u->ddir == DDIR_WRITE)
			io_u->greq = guasi__pwrite(ld->hctx, ld, io_u, 0,
						   f->fd, io_u->xfer_buf, io_u->xfer_buflen,
						   io_u->offset);
		else if (ddir_sync(io_u->ddir))
			io_u->greq = guasi__fsync(ld->hctx, ld, io_u, 0, f->fd);
		else {
			log_err("fio_guasi_commit() FAILED: unknow request %d\n",
				io_u->ddir);
		}
		if (io_u->greq == NULL) {
			log_err("fio_guasi_commit() FAILED: submit failed (%s)\n",
				strerror(errno));
			return -1;
		}
	}
	fio_guasi_queued(td, ld->io_us, i);
	ld->queued_nr = 0;
	GDBG_PRINT(("fio_guasi_commit() -> %d\n", i));

	return 0;
}

static int fio_guasi_cancel(struct thread_data fio_unused *td,
			    struct io_u *io_u)
{
	GDBG_PRINT(("fio_guasi_cancel(%p) req=%p\n", io_u, io_u->greq));
	if (io_u->greq != NULL)
		guasi_req_cancel(io_u->greq);

	return 0;
}

static void fio_guasi_cleanup(struct thread_data *td)
{
	struct guasi_data *ld = td->io_ops->data;
	int n;

	GDBG_PRINT(("fio_guasi_cleanup(%p)\n", ld));
	if (ld) {
		for (n = 0; n < ld->reqs_nr; n++)
			guasi_req_free(ld->reqs[n]);
		guasi_free(ld->hctx);
		free(ld->reqs);
		free(ld->io_us);
		free(ld);
	}
	GDBG_PRINT(("fio_guasi_cleanup(%p) DONE\n", ld));
}

static int fio_guasi_init(struct thread_data *td)
{
	int maxthr;
	struct guasi_data *ld = malloc(sizeof(*ld));

	GDBG_PRINT(("fio_guasi_init(): depth=%d\n", td->o.iodepth));
	memset(ld, 0, sizeof(*ld));
	maxthr = td->o.iodepth > GFIO_MIN_THREADS ? td->o.iodepth: GFIO_MIN_THREADS;
	if (maxthr > GFIO_MAX_THREADS)
		maxthr = GFIO_MAX_THREADS;
	if ((ld->hctx = guasi_create(GFIO_MIN_THREADS, maxthr, 1)) == NULL) {
		td_verror(td, errno, "guasi_create");
		free(ld);
		return 1;
	}
	ld->max_reqs = td->o.iodepth;
	ld->reqs = malloc(ld->max_reqs * sizeof(guasi_req_t));
	ld->io_us = malloc(ld->max_reqs * sizeof(struct io_u *));
	memset(ld->io_us, 0, ld->max_reqs * sizeof(struct io_u *));
	ld->queued_nr = 0;
	ld->reqs_nr = 0;

	td->io_ops->data = ld;
	GDBG_PRINT(("fio_guasi_init(): depth=%d -> %p\n", td->o.iodepth, ld));

	return 0;
}

static struct ioengine_ops ioengine = {
	.name		= "guasi",
	.version	= FIO_IOOPS_VERSION,
	.init		= fio_guasi_init,
	.prep		= fio_guasi_prep,
	.queue		= fio_guasi_queue,
	.commit		= fio_guasi_commit,
	.cancel		= fio_guasi_cancel,
	.getevents	= fio_guasi_getevents,
	.event		= fio_guasi_event,
	.cleanup	= fio_guasi_cleanup,
	.open_file	= generic_open_file,
	.close_file	= generic_close_file,
	.get_file_size	= generic_get_file_size,
};

#else /* FIO_HAVE_GUASI */

/*
 * When we have a proper configure system in place, we simply wont build
 * and install this io engine. For now install a crippled version that
 * just complains and fails to load.
 */
static int fio_guasi_init(struct thread_data fio_unused *td)
{
	log_err("fio: guasi not available\n");
	return 1;
}

static struct ioengine_ops ioengine = {
	.name		= "guasi",
	.version	= FIO_IOOPS_VERSION,
	.init		= fio_guasi_init,
};

#endif

static void fio_init fio_guasi_register(void)
{
	register_ioengine(&ioengine);
}

static void fio_exit fio_guasi_unregister(void)
{
	unregister_ioengine(&ioengine);
}
Commit	Line	Data
609342ff DL	1	/*
	2	* guasi engine
	3	*
	4	* IO engine using the GUASI library.
	5	*
46eaa157 DL	6	* This is currently disabled. To enable it, execute:
	7	*
	8	* $ export EXTFLAGS="-DFIO_HAVE_GUASI"
	9	* $ export EXTLIBS="-lguasi"
	10	*
	11	* before running make. You'll need the GUASI lib as well:
609342ff DL	12	*
	13	* http://www.xmailserver.org/guasi-lib.html
	14	*
	15	*/
	16	#include <stdio.h>
	17	#include <stdlib.h>
	18	#include <unistd.h>
	19	#include <errno.h>
	20	#include <assert.h>
	21
	22	#include "../fio.h"
609342ff DL	23
	24	#ifdef FIO_HAVE_GUASI
	25
	26	#define GFIO_MIN_THREADS 32
d6c6810f	27	#ifndef GFIO_MAX_THREADS
97c26cbe	28	#define GFIO_MAX_THREADS 2000
d6c6810f	29	#endif
609342ff DL	30
	31	#include <guasi.h>
	32	#include <guasi_syscalls.h>
	33
	34	#ifdef GFIO_DEBUG
	35	#define GDBG_PRINT(a) printf a
	36	#else
	37	#define GDBG_PRINT(a) (void) 0
	38	#endif
	39
609342ff DL	40	struct guasi_data {
	41	guasi_t hctx;
	42	int max_reqs;
	43	guasi_req_t *reqs;
	44	struct io_u **io_us;
46eaa157	45	int queued_nr;
609342ff DL	46	int reqs_nr;
	47	};
	48
	49	static int fio_guasi_prep(struct thread_data fio_unused td, struct io_u io_u)
	50	{
609342ff DL	51
609342ff DL	52	GDBG_PRINT(("fio_guasi_prep(%p)\n", io_u));
46eaa157	53	io_u->greq = NULL;
609342ff DL	54
	55	return 0;
	56	}
	57
	58	static struct io_u fio_guasi_event(struct thread_data td, int event)
	59	{
	60	struct guasi_data *ld = td->io_ops->data;
	61	struct io_u *io_u;
	62	struct guasi_reqinfo rinf;
	63
	64	GDBG_PRINT(("fio_guasi_event(%d)\n", event));
	65	if (guasi_req_info(ld->reqs[event], &rinf) < 0) {
07257263	66	log_err("guasi_req_info(%d) FAILED!\n", event);
609342ff DL	67	return NULL;
	68	}
	69	io_u = rinf.asid;
66b83d9a	70	io_u->error = EINPROGRESS;
609342ff	71	GDBG_PRINT(("fio_guasi_event(%d) -> %p\n", event, io_u));
66b83d9a	72	if (rinf.status == GUASI_STATUS_COMPLETE) {
609342ff	73	io_u->error = rinf.result;
66b83d9a DL	74	if (io_u->ddir == DDIR_READ \|\|
	75	io_u->ddir == DDIR_WRITE) {
	76	io_u->error = 0;
	77	if (rinf.result != (long) io_u->xfer_buflen) {
	78	if (rinf.result >= 0)
	79	io_u->resid = io_u->xfer_buflen - rinf.result;
	80	else
	81	io_u->error = rinf.error;
	82	}
	83	}
	84	}
609342ff DL	85
	86	return io_u;
	87	}
	88
e7d2e616 JA	89	static int fio_guasi_getevents(struct thread_data *td, unsigned int min,
e7d2e616 JA	90	unsigned int max, struct timespec *t)
609342ff DL	91	{
609342ff DL	92	struct guasi_data *ld = td->io_ops->data;
46eaa157	93	int n, r;
609342ff DL	94	long timeo = -1;
	95
	96	GDBG_PRINT(("fio_guasi_getevents(%d, %d)\n", min, max));
	97	if (min > ld->max_reqs)
	98	min = ld->max_reqs;
	99	if (max > ld->max_reqs)
	100	max = ld->max_reqs;
	101	if (t)
	102	timeo = t->tv_sec * 1000L + t->tv_nsec / 1000000L;
46eaa157 DL	103	for (n = 0; n < ld->reqs_nr; n++)
	104	guasi_req_free(ld->reqs[n]);
	105	n = 0;
609342ff	106	do {
97c26cbe DL	107	r = guasi_fetch(ld->hctx, ld->reqs + n, min - n,
	108	max - n, timeo);
	109	if (r < 0) {
07257263	110	log_err("guasi_fetch() FAILED! (%d)\n", r);
609342ff	111	break;
97c26cbe	112	}
609342ff DL	113	n += r;
	114	if (n >= min)
	115	break;
	116	} while (1);
46eaa157	117	ld->reqs_nr = n;
609342ff DL	118	GDBG_PRINT(("fio_guasi_getevents() -> %d\n", n));
	119
	120	return n;
	121	}
	122
	123	static int fio_guasi_queue(struct thread_data td, struct io_u io_u)
	124	{
	125	struct guasi_data *ld = td->io_ops->data;
	126
7101d9c2 JA	127	fio_ro_check(td, io_u);
7101d9c2 JA	128
609342ff	129	GDBG_PRINT(("fio_guasi_queue(%p)\n", io_u));
46eaa157	130	if (ld->queued_nr == (int) td->o.iodepth)
609342ff DL	131	return FIO_Q_BUSY;
609342ff DL	132
46eaa157 DL	133	ld->io_us[ld->queued_nr] = io_u;
46eaa157 DL	134	ld->queued_nr++;
609342ff DL	135	return FIO_Q_QUEUED;
	136	}
	137
97c26cbe	138	static void fio_guasi_queued(struct thread_data td, struct io_u *io_us, int nr)
609342ff	139	{
97c26cbe DL	140	int i;
97c26cbe DL	141	struct io_u *io_u;
609342ff	142	struct timeval now;
609342ff	143
12d9d841 JA	144	if (!fio_fill_issue_time(td))
	145	return;
	146
838bc709	147	io_u_mark_submit(td, nr);
609342ff	148	fio_gettime(&now, NULL);
97c26cbe DL	149	for (i = 0; i < nr; i++) {
	150	io_u = io_us[i];
	151	memcpy(&io_u->issue_time, &now, sizeof(now));
	152	io_u_queued(td, io_u);
	153	}
609342ff DL	154	}
	155
	156	static int fio_guasi_commit(struct thread_data *td)
	157	{
	158	struct guasi_data *ld = td->io_ops->data;
	159	int i;
	160	struct io_u *io_u;
	161	struct fio_file *f;
	162
d6c6810f	163	GDBG_PRINT(("fio_guasi_commit(%d)\n", ld->queued_nr));
46eaa157	164	for (i = 0; i < ld->queued_nr; i++) {
609342ff	165	io_u = ld->io_us[i];
d6c6810f	166	GDBG_PRINT(("fio_guasi_commit(%d) --> %p\n", i, io_u));
609342ff DL	167	f = io_u->file;
	168	io_u->greq = NULL;
	169	if (io_u->ddir == DDIR_READ)
	170	io_u->greq = guasi__pread(ld->hctx, ld, io_u, 0,
	171	f->fd, io_u->xfer_buf, io_u->xfer_buflen,
	172	io_u->offset);
	173	else if (io_u->ddir == DDIR_WRITE)
	174	io_u->greq = guasi__pwrite(ld->hctx, ld, io_u, 0,
	175	f->fd, io_u->xfer_buf, io_u->xfer_buflen,
	176	io_u->offset);
5f9099ea	177	else if (ddir_sync(io_u->ddir))
609342ff DL	178	io_u->greq = guasi__fsync(ld->hctx, ld, io_u, 0, f->fd);
609342ff DL	179	else {
07257263	180	log_err("fio_guasi_commit() FAILED: unknow request %d\n",
66b83d9a	181	io_u->ddir);
609342ff	182	}
97c26cbe	183	if (io_u->greq == NULL) {
07257263	184	log_err("fio_guasi_commit() FAILED: submit failed (%s)\n",
d6c6810f	185	strerror(errno));
46eaa157 DL	186	return -1;
46eaa157 DL	187	}
609342ff	188	}
97c26cbe	189	fio_guasi_queued(td, ld->io_us, i);
46eaa157	190	ld->queued_nr = 0;
609342ff DL	191	GDBG_PRINT(("fio_guasi_commit() -> %d\n", i));
	192
	193	return 0;
	194	}
	195
ffa59cea JA	196	static int fio_guasi_cancel(struct thread_data fio_unused *td,
ffa59cea JA	197	struct io_u *io_u)
609342ff	198	{
46eaa157 DL	199	GDBG_PRINT(("fio_guasi_cancel(%p) req=%p\n", io_u, io_u->greq));
	200	if (io_u->greq != NULL)
	201	guasi_req_cancel(io_u->greq);
609342ff	202
46eaa157	203	return 0;
609342ff DL	204	}
	205
	206	static void fio_guasi_cleanup(struct thread_data *td)
	207	{
	208	struct guasi_data *ld = td->io_ops->data;
8999fe9a	209	int n;
609342ff	210
46eaa157	211	GDBG_PRINT(("fio_guasi_cleanup(%p)\n", ld));
609342ff	212	if (ld) {
8999fe9a DL	213	for (n = 0; n < ld->reqs_nr; n++)
8999fe9a DL	214	guasi_req_free(ld->reqs[n]);
609342ff DL	215	guasi_free(ld->hctx);
	216	free(ld->reqs);
	217	free(ld->io_us);
	218	free(ld);
609342ff	219	}
46eaa157	220	GDBG_PRINT(("fio_guasi_cleanup(%p) DONE\n", ld));
609342ff DL	221	}
	222
	223	static int fio_guasi_init(struct thread_data *td)
	224	{
	225	int maxthr;
	226	struct guasi_data ld = malloc(sizeof(ld));
	227
46eaa157	228	GDBG_PRINT(("fio_guasi_init(): depth=%d\n", td->o.iodepth));
609342ff	229	memset(ld, 0, sizeof(*ld));
46eaa157	230	maxthr = td->o.iodepth > GFIO_MIN_THREADS ? td->o.iodepth: GFIO_MIN_THREADS;
d6c6810f DL	231	if (maxthr > GFIO_MAX_THREADS)
d6c6810f DL	232	maxthr = GFIO_MAX_THREADS;
0798ba36	233	if ((ld->hctx = guasi_create(GFIO_MIN_THREADS, maxthr, 1)) == NULL) {
609342ff DL	234	td_verror(td, errno, "guasi_create");
	235	free(ld);
	236	return 1;
	237	}
46eaa157	238	ld->max_reqs = td->o.iodepth;
609342ff DL	239	ld->reqs = malloc(ld->max_reqs * sizeof(guasi_req_t));
	240	ld->io_us = malloc(ld->max_reqs * sizeof(struct io_u *));
	241	memset(ld->io_us, 0, ld->max_reqs * sizeof(struct io_u *));
46eaa157	242	ld->queued_nr = 0;
609342ff DL	243	ld->reqs_nr = 0;
	244
	245	td->io_ops->data = ld;
46eaa157	246	GDBG_PRINT(("fio_guasi_init(): depth=%d -> %p\n", td->o.iodepth, ld));
609342ff DL	247
	248	return 0;
	249	}
	250
	251	static struct ioengine_ops ioengine = {
	252	.name = "guasi",
	253	.version = FIO_IOOPS_VERSION,
	254	.init = fio_guasi_init,
	255	.prep = fio_guasi_prep,
	256	.queue = fio_guasi_queue,
	257	.commit = fio_guasi_commit,
	258	.cancel = fio_guasi_cancel,
	259	.getevents = fio_guasi_getevents,
	260	.event = fio_guasi_event,
	261	.cleanup = fio_guasi_cleanup,
	262	.open_file = generic_open_file,
	263	.close_file = generic_close_file,
df9c26b1	264	.get_file_size = generic_get_file_size,
609342ff DL	265	};
	266
	267	#else /* FIO_HAVE_GUASI */
	268
	269	/*
	270	* When we have a proper configure system in place, we simply wont build
	271	* and install this io engine. For now install a crippled version that
	272	* just complains and fails to load.
	273	*/
	274	static int fio_guasi_init(struct thread_data fio_unused *td)
	275	{
a3edaf76	276	log_err("fio: guasi not available\n");
609342ff DL	277	return 1;
	278	}
	279
	280	static struct ioengine_ops ioengine = {
	281	.name = "guasi",
	282	.version = FIO_IOOPS_VERSION,
	283	.init = fio_guasi_init,
	284	};
	285
	286	#endif
	287
	288	static void fio_init fio_guasi_register(void)
	289	{
	290	register_ioengine(&ioengine);
	291	}
	292
	293	static void fio_exit fio_guasi_unregister(void)
	294	{
	295	unregister_ioengine(&ioengine);
	296	}
	297