[fio.git] / verify.c

/*
 * IO verification helpers
 */
#include <unistd.h>
#include <fcntl.h>
#include <string.h>
#include <assert.h>

#include "fio.h"

static void fill_random_bytes(struct thread_data *td,
			      unsigned char *p, unsigned int len)
{
	unsigned int todo;
	int r;

	while (len) {
		r = os_random_long(&td->verify_state);

		/*
		 * lrand48_r seems to be broken and only fill the bottom
		 * 32-bits, even on 64-bit archs with 64-bit longs
		 */
		todo = sizeof(r);
		if (todo > len)
			todo = len;

		memcpy(p, &r, todo);

		len -= todo;
		p += todo;
	}
}

static void hexdump(void *buffer, int len)
{
	unsigned char *p = buffer;
	int i;

	for (i = 0; i < len; i++)
		log_info("%02x", p[i]);
	log_info("\n");
}

static int verify_io_u_crc16(struct verify_header *hdr, struct io_u *io_u)
{
	unsigned char *p = io_u->buf;
	unsigned short c;

	p += sizeof(*hdr);
	c = crc16(p, hdr->len - sizeof(*hdr));

	if (c != hdr->crc16) {
		log_err("crc16: verify failed at %llu/%lu\n", io_u->offset, io_u->buflen);
		log_err("crc16: wanted %lx, got %x\n", hdr->crc32, c);
		return 1;
	}

	return 0;
}

static int verify_io_u_crc32(struct verify_header *hdr, struct io_u *io_u)
{
	unsigned char *p = io_u->buf;
	unsigned long c;

	p += sizeof(*hdr);
	c = crc32(p, hdr->len - sizeof(*hdr));

	if (c != hdr->crc32) {
		log_err("crc32: verify failed at %llu/%lu\n", io_u->offset, io_u->buflen);
		log_err("crc32: wanted %lx, got %lx\n", hdr->crc32, c);
		return 1;
	}

	return 0;
}

static int verify_io_u_md5(struct verify_header *hdr, struct io_u *io_u)
{
	unsigned char *p = io_u->buf;
	struct md5_ctx md5_ctx;

	memset(&md5_ctx, 0, sizeof(md5_ctx));
	p += sizeof(*hdr);
	md5_update(&md5_ctx, p, hdr->len - sizeof(*hdr));

	if (memcmp(hdr->md5_digest, md5_ctx.hash, sizeof(md5_ctx.hash))) {
		log_err("md5: verify failed at %llu/%lu\n", io_u->offset, io_u->buflen);
		hexdump(hdr->md5_digest, sizeof(hdr->md5_digest));
		hexdump(md5_ctx.hash, sizeof(md5_ctx.hash));
		return 1;
	}

	return 0;
}

int verify_io_u(struct thread_data *td, struct io_u *io_u)
{
	struct verify_header *hdr = (struct verify_header *) io_u->buf;
	int ret;

	if (td->o.verify == VERIFY_NULL || io_u->ddir != DDIR_READ)
		return 0;

	if (hdr->fio_magic != FIO_HDR_MAGIC) {
		log_err("Bad verify header %x\n", hdr->fio_magic);
		return EIO;
	}

	if (hdr->verify_type == VERIFY_MD5)
		ret = verify_io_u_md5(hdr, io_u);
	else if (hdr->verify_type == VERIFY_CRC32)
		ret = verify_io_u_crc32(hdr, io_u);
	else if (hdr->verify_type == VERIFY_CRC16)
		ret = verify_io_u_crc16(hdr, io_u);
	else {
		log_err("Bad verify type %u\n", hdr->verify_type);
		ret = 1;
	}

	if (ret)
		return EIO;

	return 0;
}

static void fill_crc16(struct verify_header *hdr, void *p, unsigned int len)
{
	hdr->crc16 = crc16(p, len);
}

static void fill_crc32(struct verify_header *hdr, void *p, unsigned int len)
{
	hdr->crc32 = crc32(p, len);
}

static void fill_md5(struct verify_header *hdr, void *p, unsigned int len)
{
	struct md5_ctx md5_ctx;

	memset(&md5_ctx, 0, sizeof(md5_ctx));
	md5_update(&md5_ctx, p, len);
	memcpy(hdr->md5_digest, md5_ctx.hash, sizeof(md5_ctx.hash));
}

/*
 * fill body of io_u->buf with random data and add a header with the
 * crc32 or md5 sum of that data.
 */
void populate_verify_io_u(struct thread_data *td, struct io_u *io_u)
{
	unsigned char *p = (unsigned char *) io_u->buf;
	struct verify_header hdr;

	if (td->o.verify == VERIFY_NULL)
		return;

	hdr.fio_magic = FIO_HDR_MAGIC;
	hdr.len = io_u->buflen;
	p += sizeof(hdr);
	fill_random_bytes(td, p, io_u->buflen - sizeof(hdr));

	if (td->o.verify == VERIFY_MD5) {
		fill_md5(&hdr, p, io_u->buflen - sizeof(hdr));
		hdr.verify_type = VERIFY_MD5;
	} else if (td->o.verify == VERIFY_CRC32) {
		fill_crc32(&hdr, p, io_u->buflen - sizeof(hdr));
		hdr.verify_type = VERIFY_CRC32;
	} else if (td->o.verify == VERIFY_CRC16) {
		fill_crc16(&hdr, p, io_u->buflen - sizeof(hdr));
		hdr.verify_type = VERIFY_CRC16;
	}

	memcpy(io_u->buf, &hdr, sizeof(hdr));
}

int get_next_verify(struct thread_data *td, struct io_u *io_u)
{
	struct io_piece *ipo = NULL;

	/*
	 * this io_u is from a requeue, we already filled the offsets
	 */
	if (io_u->file)
		return 0;

	if (!RB_EMPTY_ROOT(&td->io_hist_tree)) {
		struct rb_node *n = rb_first(&td->io_hist_tree);

		ipo = rb_entry(n, struct io_piece, rb_node);
		rb_erase(n, &td->io_hist_tree);
	} else if (!list_empty(&td->io_hist_list)) {
		ipo = list_entry(td->io_hist_list.next, struct io_piece, list);
		list_del(&ipo->list);
	}

	if (ipo) {
		io_u->offset = ipo->offset;
		io_u->buflen = ipo->len;
		io_u->file = ipo->file;

		if ((io_u->file->flags & FIO_FILE_OPEN) == 0) {
			int r = td_io_open_file(td, io_u->file);

			if (r)
				return 1;
		}

		get_file(ipo->file);
		assert(io_u->file->flags & FIO_FILE_OPEN);
		io_u->ddir = DDIR_READ;
		io_u->xfer_buf = io_u->buf;
		io_u->xfer_buflen = io_u->buflen;
		free(ipo);
		return 0;
	}

	return 1;
}
Commit	Line	Data
e29d1b70 JA	1	/*
	2	* IO verification helpers
	3	*/
	4	#include <unistd.h>
	5	#include <fcntl.h>
	6	#include <string.h>
97af62ce	7	#include <assert.h>
e29d1b70 JA	8
e29d1b70 JA	9	#include "fio.h"
e29d1b70 JA	10
	11	static void fill_random_bytes(struct thread_data *td,
	12	unsigned char *p, unsigned int len)
	13	{
	14	unsigned int todo;
4c5946c6	15	int r;
e29d1b70 JA	16
e29d1b70 JA	17	while (len) {
4c5946c6	18	r = os_random_long(&td->verify_state);
e29d1b70 JA	19
	20	/*
	21	* lrand48_r seems to be broken and only fill the bottom
	22	* 32-bits, even on 64-bit archs with 64-bit longs
	23	*/
	24	todo = sizeof(r);
	25	if (todo > len)
	26	todo = len;
	27
	28	memcpy(p, &r, todo);
	29
	30	len -= todo;
	31	p += todo;
	32	}
	33	}
	34
	35	static void hexdump(void *buffer, int len)
	36	{
	37	unsigned char *p = buffer;
	38	int i;
	39
	40	for (i = 0; i < len; i++)
6d86144d JA	41	log_info("%02x", p[i]);
6d86144d JA	42	log_info("\n");
e29d1b70 JA	43	}
e29d1b70 JA	44
969f7ed3 JA	45	static int verify_io_u_crc16(struct verify_header hdr, struct io_u io_u)
	46	{
	47	unsigned char *p = io_u->buf;
	48	unsigned short c;
	49
	50	p += sizeof(*hdr);
	51	c = crc16(p, hdr->len - sizeof(*hdr));
	52
	53	if (c != hdr->crc16) {
	54	log_err("crc16: verify failed at %llu/%lu\n", io_u->offset, io_u->buflen);
	55	log_err("crc16: wanted %lx, got %x\n", hdr->crc32, c);
	56	return 1;
	57	}
	58
	59	return 0;
	60	}
	61
e29d1b70 JA	62	static int verify_io_u_crc32(struct verify_header hdr, struct io_u io_u)
e29d1b70 JA	63	{
969f7ed3	64	unsigned char *p = io_u->buf;
e29d1b70 JA	65	unsigned long c;
	66
	67	p += sizeof(*hdr);
	68	c = crc32(p, hdr->len - sizeof(*hdr));
	69
	70	if (c != hdr->crc32) {
a4f4fdd7	71	log_err("crc32: verify failed at %llu/%lu\n", io_u->offset, io_u->buflen);
e29d1b70 JA	72	log_err("crc32: wanted %lx, got %lx\n", hdr->crc32, c);
	73	return 1;
	74	}
	75
	76	return 0;
	77	}
	78
	79	static int verify_io_u_md5(struct verify_header hdr, struct io_u io_u)
	80	{
969f7ed3	81	unsigned char *p = io_u->buf;
e29d1b70 JA	82	struct md5_ctx md5_ctx;
	83
	84	memset(&md5_ctx, 0, sizeof(md5_ctx));
	85	p += sizeof(*hdr);
	86	md5_update(&md5_ctx, p, hdr->len - sizeof(*hdr));
	87
	88	if (memcmp(hdr->md5_digest, md5_ctx.hash, sizeof(md5_ctx.hash))) {
a4f4fdd7	89	log_err("md5: verify failed at %llu/%lu\n", io_u->offset, io_u->buflen);
e29d1b70 JA	90	hexdump(hdr->md5_digest, sizeof(hdr->md5_digest));
	91	hexdump(md5_ctx.hash, sizeof(md5_ctx.hash));
	92	return 1;
	93	}
	94
	95	return 0;
	96	}
	97
36690c9b	98	int verify_io_u(struct thread_data td, struct io_u io_u)
e29d1b70 JA	99	{
	100	struct verify_header hdr = (struct verify_header ) io_u->buf;
	101	int ret;
	102
1dcc0498	103	if (td->o.verify == VERIFY_NULL \|\| io_u->ddir != DDIR_READ)
36690c9b JA	104	return 0;
36690c9b JA	105
36167d82 JA	106	if (hdr->fio_magic != FIO_HDR_MAGIC) {
36167d82 JA	107	log_err("Bad verify header %x\n", hdr->fio_magic);
a7dfe862	108	return EIO;
36167d82	109	}
e29d1b70 JA	110
	111	if (hdr->verify_type == VERIFY_MD5)
	112	ret = verify_io_u_md5(hdr, io_u);
	113	else if (hdr->verify_type == VERIFY_CRC32)
	114	ret = verify_io_u_crc32(hdr, io_u);
969f7ed3 JA	115	else if (hdr->verify_type == VERIFY_CRC16)
969f7ed3 JA	116	ret = verify_io_u_crc16(hdr, io_u);
e29d1b70	117	else {
1e97cce9	118	log_err("Bad verify type %u\n", hdr->verify_type);
e29d1b70 JA	119	ret = 1;
	120	}
	121
a7dfe862 JA	122	if (ret)
	123	return EIO;
	124
	125	return 0;
e29d1b70 JA	126	}
e29d1b70 JA	127
969f7ed3 JA	128	static void fill_crc16(struct verify_header hdr, void p, unsigned int len)
	129	{
	130	hdr->crc16 = crc16(p, len);
	131	}
	132
e29d1b70 JA	133	static void fill_crc32(struct verify_header hdr, void p, unsigned int len)
	134	{
	135	hdr->crc32 = crc32(p, len);
	136	}
	137
	138	static void fill_md5(struct verify_header hdr, void p, unsigned int len)
	139	{
	140	struct md5_ctx md5_ctx;
	141
	142	memset(&md5_ctx, 0, sizeof(md5_ctx));
	143	md5_update(&md5_ctx, p, len);
	144	memcpy(hdr->md5_digest, md5_ctx.hash, sizeof(md5_ctx.hash));
	145	}
	146
	147	/*
	148	* fill body of io_u->buf with random data and add a header with the
	149	* crc32 or md5 sum of that data.
	150	*/
	151	void populate_verify_io_u(struct thread_data td, struct io_u io_u)
	152	{
	153	unsigned char p = (unsigned char ) io_u->buf;
	154	struct verify_header hdr;
	155
9cc3d150 JA	156	if (td->o.verify == VERIFY_NULL)
	157	return;
	158
e29d1b70 JA	159	hdr.fio_magic = FIO_HDR_MAGIC;
	160	hdr.len = io_u->buflen;
	161	p += sizeof(hdr);
	162	fill_random_bytes(td, p, io_u->buflen - sizeof(hdr));
	163
2dc1bbeb	164	if (td->o.verify == VERIFY_MD5) {
e29d1b70 JA	165	fill_md5(&hdr, p, io_u->buflen - sizeof(hdr));
e29d1b70 JA	166	hdr.verify_type = VERIFY_MD5;
36690c9b	167	} else if (td->o.verify == VERIFY_CRC32) {
e29d1b70 JA	168	fill_crc32(&hdr, p, io_u->buflen - sizeof(hdr));
e29d1b70 JA	169	hdr.verify_type = VERIFY_CRC32;
969f7ed3 JA	170	} else if (td->o.verify == VERIFY_CRC16) {
	171	fill_crc16(&hdr, p, io_u->buflen - sizeof(hdr));
	172	hdr.verify_type = VERIFY_CRC16;
e29d1b70 JA	173	}
	174
	175	memcpy(io_u->buf, &hdr, sizeof(hdr));
	176	}
	177
	178	int get_next_verify(struct thread_data td, struct io_u io_u)
	179	{
8de8f047	180	struct io_piece *ipo = NULL;
e29d1b70	181
d2d7fa53 JA	182	/*
	183	* this io_u is from a requeue, we already filled the offsets
	184	*/
	185	if (io_u->file)
	186	return 0;
	187
8de8f047 JA	188	if (!RB_EMPTY_ROOT(&td->io_hist_tree)) {
8de8f047 JA	189	struct rb_node *n = rb_first(&td->io_hist_tree);
e29d1b70	190
8de8f047	191	ipo = rb_entry(n, struct io_piece, rb_node);
4b87898e	192	rb_erase(n, &td->io_hist_tree);
8de8f047 JA	193	} else if (!list_empty(&td->io_hist_list)) {
	194	ipo = list_entry(td->io_hist_list.next, struct io_piece, list);
	195	list_del(&ipo->list);
	196	}
e29d1b70	197
8de8f047	198	if (ipo) {
e29d1b70 JA	199	io_u->offset = ipo->offset;
e29d1b70 JA	200	io_u->buflen = ipo->len;
36167d82	201	io_u->file = ipo->file;
97af62ce JA	202
	203	if ((io_u->file->flags & FIO_FILE_OPEN) == 0) {
	204	int r = td_io_open_file(td, io_u->file);
	205
	206	if (r)
	207	return 1;
	208	}
	209
	210	get_file(ipo->file);
	211	assert(io_u->file->flags & FIO_FILE_OPEN);
e29d1b70	212	io_u->ddir = DDIR_READ;
36167d82 JA	213	io_u->xfer_buf = io_u->buf;
36167d82 JA	214	io_u->xfer_buflen = io_u->buflen;
e29d1b70 JA	215	free(ipo);
	216	return 0;
	217	}
	218
	219	return 1;
	220	}