[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;
	}
}

void memswp(void* buf1, void* buf2, unsigned int len)
{
	struct verify_header swap;
	memcpy(&swap, buf1, len);
	memcpy(buf1, buf2, len);
	memcpy(buf2, &swap, len);
}

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_crc7(struct verify_header *hdr, struct io_u *io_u,
                            unsigned char header_num)
{
	unsigned char *p = io_u->buf;
	unsigned char c;

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

	if (c != hdr->crc7) {
		log_err("crc7: verify failed at %llu/%u\n",
		                io_u->offset + header_num * hdr->len,
				hdr->len);
		log_err("crc7: wanted %x, got %x\n", hdr->crc7, c);
		return 1;
	}

	return 0;
}

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

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

	if (c != hdr->crc16) {
		log_err("crc16: verify failed at %llu/%u\n",
		                io_u->offset + header_num * hdr->len,
				hdr->len);
		log_err("crc16: wanted %x, got %x\n", hdr->crc16, c);
		return 1;
	}

	return 0;
}

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

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

	if (c != hdr->crc64) {
		log_err("crc64: verify failed at %llu/%u\n",
				io_u->offset + header_num * hdr->len,
				hdr->len);
		log_err("crc64: wanted %llx, got %llx\n", hdr->crc64, c);
		return 1;
	}

	return 0;
}

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

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

	if (c != hdr->crc32) {
		log_err("crc32: verify failed at %llu/%u\n",
		                io_u->offset + header_num * hdr->len,
				hdr->len);
		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 int header_num)
{
	unsigned char *p = io_u->buf;
	uint32_t hash[MD5_HASH_WORDS];
	struct md5_ctx md5_ctx = {
		.hash = hash,
	};

	p += header_num * hdr->len + 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/%u\n",
		              io_u->offset + header_num * hdr->len,
		              hdr->len);
		hexdump(hdr->md5_digest, sizeof(hdr->md5_digest));
		hexdump(md5_ctx.hash, sizeof(hash));
		return 1;
	}

	return 0;
}

int verify_io_u(struct thread_data *td, struct io_u *io_u)
{
	unsigned char *p = (unsigned char*) io_u->buf;
	struct verify_header *hdr;
	unsigned int hdr_inc, hdr_num = 0;
	int ret;

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

	hdr_inc = io_u->buflen;
	if (td->o.header_interval)
		hdr_inc = td->o.header_interval;

	for (; p < (unsigned char*) io_u->buf + io_u->buflen; p += hdr_inc) {
		if (td->o.header_offset)
			memswp(p, &p[td->o.header_offset], sizeof(*hdr));

		hdr = (struct verify_header*) p;

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

		switch (hdr->verify_type) {
		case VERIFY_MD5:
			ret = verify_io_u_md5(hdr, io_u, hdr_num);
			break;
		case VERIFY_CRC64:
			ret = verify_io_u_crc64(hdr, io_u, hdr_num);
			break;
		case VERIFY_CRC32:
			ret = verify_io_u_crc32(hdr, io_u, hdr_num);
			break;
		case VERIFY_CRC16:
			ret = verify_io_u_crc16(hdr, io_u, hdr_num);
			break;
		case VERIFY_CRC7:
			ret = verify_io_u_crc7(hdr, io_u, hdr_num);
			break;
		default:
			log_err("Bad verify type %u\n", hdr->verify_type);
			ret = 1;
		}
		hdr_num++;
	}

	return 0;
}

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

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_crc64(struct verify_header *hdr, void *p, unsigned int len)
{
	hdr->crc64 = crc64(p, len);
}

static void fill_md5(struct verify_header *hdr, void *p, unsigned int len)
{
	struct md5_ctx md5_ctx = {
		.hash = (uint32_t *) hdr->md5_digest,
	};

	md5_update(&md5_ctx, p, len);
}

/*
 * 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)
{
	struct verify_header *hdr;
	unsigned char *p = io_u->buf, *data;
	unsigned int hdr_inc, data_len;

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

	fill_random_bytes(td, p, io_u->buflen);

	hdr_inc = io_u->buflen;
	if (td->o.header_interval)
		hdr_inc = td->o.header_interval;
	data_len = hdr_inc - sizeof(*hdr);

	for (;p < (unsigned char*) io_u->buf + io_u->buflen; p += hdr_inc) {
		hdr = (struct verify_header*) p;

		hdr->fio_magic = FIO_HDR_MAGIC;
		hdr->verify_type = td->o.verify;
		hdr->len = hdr_inc;

		data = p + sizeof(*hdr);
		switch (td->o.verify) {
		case VERIFY_MD5:
			fill_md5(hdr, data, data_len);
			break;
		case VERIFY_CRC64:
			fill_crc64(hdr, data, data_len);
			break;
		case VERIFY_CRC32:
			fill_crc32(hdr, data, data_len);
			break;
		case VERIFY_CRC16:
			fill_crc16(hdr, data, data_len);
			break;
		case VERIFY_CRC7:
			fill_crc7(hdr, data, data_len);
			break;
		default:
			log_err("fio: bad verify type: %d\n", td->o.verify);
			assert(0);
		}
		if (td->o.header_offset)
			memswp(p, &p[td->o.header_offset], 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
546a9142 SL	35	void memswp(void* buf1, void* buf2, unsigned int len)
	36	{
	37	struct verify_header swap;
	38	memcpy(&swap, buf1, len);
	39	memcpy(buf1, buf2, len);
	40	memcpy(buf2, &swap, len);
	41	}
	42
e29d1b70 JA	43	static void hexdump(void *buffer, int len)
	44	{
	45	unsigned char *p = buffer;
	46	int i;
	47
	48	for (i = 0; i < len; i++)
6d86144d JA	49	log_info("%02x", p[i]);
6d86144d JA	50	log_info("\n");
e29d1b70 JA	51	}
e29d1b70 JA	52
3f9f4e26 SL	53	static int verify_io_u_crc7(struct verify_header hdr, struct io_u io_u,
3f9f4e26 SL	54	unsigned char header_num)
1e154bdb JA	55	{
	56	unsigned char *p = io_u->buf;
	57	unsigned char c;
	58
3f9f4e26	59	p += header_num * hdr->len + sizeof(*hdr);
1e154bdb JA	60	c = crc7(p, hdr->len - sizeof(*hdr));
	61
	62	if (c != hdr->crc7) {
3f9f4e26 SL	63	log_err("crc7: verify failed at %llu/%u\n",
	64	io_u->offset + header_num * hdr->len,
	65	hdr->len);
1e154bdb JA	66	log_err("crc7: wanted %x, got %x\n", hdr->crc7, c);
	67	return 1;
	68	}
	69
	70	return 0;
	71	}
	72
3f9f4e26 SL	73	static int verify_io_u_crc16(struct verify_header hdr, struct io_u io_u,
3f9f4e26 SL	74	unsigned int header_num)
969f7ed3 JA	75	{
	76	unsigned char *p = io_u->buf;
	77	unsigned short c;
	78
3f9f4e26	79	p += header_num * hdr->len + sizeof(*hdr);
969f7ed3 JA	80	c = crc16(p, hdr->len - sizeof(*hdr));
	81
	82	if (c != hdr->crc16) {
3f9f4e26 SL	83	log_err("crc16: verify failed at %llu/%u\n",
	84	io_u->offset + header_num * hdr->len,
	85	hdr->len);
1f24ea44	86	log_err("crc16: wanted %x, got %x\n", hdr->crc16, c);
969f7ed3 JA	87	return 1;
	88	}
	89
	90	return 0;
	91	}
	92
3f9f4e26 SL	93	static int verify_io_u_crc64(struct verify_header hdr, struct io_u io_u,
3f9f4e26 SL	94	unsigned int header_num)
d77a7af3	95	{
3f9f4e26	96	unsigned char *p = io_u->buf;
d77a7af3 JA	97	unsigned long long c;
d77a7af3 JA	98
3f9f4e26	99	p += header_num * hdr->len + sizeof(*hdr);
d77a7af3 JA	100	c = crc64(p, hdr->len - sizeof(*hdr));
	101
	102	if (c != hdr->crc64) {
3f9f4e26 SL	103	log_err("crc64: verify failed at %llu/%u\n",
	104	io_u->offset + header_num * hdr->len,
	105	hdr->len);
d77a7af3 JA	106	log_err("crc64: wanted %llx, got %llx\n", hdr->crc64, c);
	107	return 1;
	108	}
	109
	110	return 0;
	111	}
	112
3f9f4e26 SL	113	static int verify_io_u_crc32(struct verify_header hdr, struct io_u io_u,
3f9f4e26 SL	114	unsigned int header_num)
e29d1b70	115	{
969f7ed3	116	unsigned char *p = io_u->buf;
e29d1b70 JA	117	unsigned long c;
e29d1b70 JA	118
3f9f4e26	119	p += header_num * hdr->len + sizeof(*hdr);
e29d1b70 JA	120	c = crc32(p, hdr->len - sizeof(*hdr));
	121
	122	if (c != hdr->crc32) {
3f9f4e26 SL	123	log_err("crc32: verify failed at %llu/%u\n",
	124	io_u->offset + header_num * hdr->len,
	125	hdr->len);
e29d1b70 JA	126	log_err("crc32: wanted %lx, got %lx\n", hdr->crc32, c);
	127	return 1;
	128	}
	129
	130	return 0;
	131	}
	132
3f9f4e26 SL	133	static int verify_io_u_md5(struct verify_header hdr, struct io_u io_u,
3f9f4e26 SL	134	unsigned int header_num)
e29d1b70	135	{
3f9f4e26	136	unsigned char *p = io_u->buf;
8c432325 JA	137	uint32_t hash[MD5_HASH_WORDS];
	138	struct md5_ctx md5_ctx = {
	139	.hash = hash,
	140	};
e29d1b70	141
3f9f4e26	142	p += header_num * hdr->len + sizeof(*hdr);
e29d1b70 JA	143	md5_update(&md5_ctx, p, hdr->len - sizeof(*hdr));
e29d1b70 JA	144
3f9f4e26 SL	145	if (memcmp(hdr->md5_digest, md5_ctx.hash, sizeof(md5_ctx.hash))) {
	146	log_err("md5: verify failed at %llu/%u\n",
	147	io_u->offset + header_num * hdr->len,
	148	hdr->len);
e29d1b70	149	hexdump(hdr->md5_digest, sizeof(hdr->md5_digest));
8c432325	150	hexdump(md5_ctx.hash, sizeof(hash));
e29d1b70 JA	151	return 1;
	152	}
	153
	154	return 0;
	155	}
	156
36690c9b	157	int verify_io_u(struct thread_data td, struct io_u io_u)
e29d1b70	158	{
3f9f4e26 SL	159	unsigned char p = (unsigned char) io_u->buf;
	160	struct verify_header *hdr;
	161	unsigned int hdr_inc, hdr_num = 0;
e29d1b70 JA	162	int ret;
e29d1b70 JA	163
1dcc0498	164	if (td->o.verify == VERIFY_NULL \|\| io_u->ddir != DDIR_READ)
36690c9b JA	165	return 0;
36690c9b JA	166
3f9f4e26 SL	167	hdr_inc = io_u->buflen;
	168	if (td->o.header_interval)
	169	hdr_inc = td->o.header_interval;
e29d1b70	170
3f9f4e26	171	for (; p < (unsigned char*) io_u->buf + io_u->buflen; p += hdr_inc) {
546a9142 SL	172	if (td->o.header_offset)
	173	memswp(p, &p[td->o.header_offset], sizeof(*hdr));
	174
3f9f4e26	175	hdr = (struct verify_header*) p;
e29d1b70	176
3f9f4e26 SL	177	if (hdr->fio_magic != FIO_HDR_MAGIC) {
	178	log_err("Bad verify header %x\n", hdr->fio_magic);
	179	return EIO;
	180	}
	181
	182	switch (hdr->verify_type) {
	183	case VERIFY_MD5:
	184	ret = verify_io_u_md5(hdr, io_u, hdr_num);
	185	break;
	186	case VERIFY_CRC64:
	187	ret = verify_io_u_crc64(hdr, io_u, hdr_num);
	188	break;
	189	case VERIFY_CRC32:
	190	ret = verify_io_u_crc32(hdr, io_u, hdr_num);
	191	break;
	192	case VERIFY_CRC16:
	193	ret = verify_io_u_crc16(hdr, io_u, hdr_num);
	194	break;
	195	case VERIFY_CRC7:
	196	ret = verify_io_u_crc7(hdr, io_u, hdr_num);
	197	break;
	198	default:
	199	log_err("Bad verify type %u\n", hdr->verify_type);
	200	ret = 1;
	201	}
	202	hdr_num++;
	203	}
a7dfe862 JA	204
a7dfe862 JA	205	return 0;
e29d1b70 JA	206	}
e29d1b70 JA	207
1e154bdb JA	208	static void fill_crc7(struct verify_header hdr, void p, unsigned int len)
	209	{
	210	hdr->crc7 = crc7(p, len);
	211	}
	212
969f7ed3 JA	213	static void fill_crc16(struct verify_header hdr, void p, unsigned int len)
	214	{
	215	hdr->crc16 = crc16(p, len);
	216	}
	217
e29d1b70 JA	218	static void fill_crc32(struct verify_header hdr, void p, unsigned int len)
	219	{
	220	hdr->crc32 = crc32(p, len);
	221	}
	222
d77a7af3 JA	223	static void fill_crc64(struct verify_header hdr, void p, unsigned int len)
	224	{
	225	hdr->crc64 = crc64(p, len);
	226	}
	227
e29d1b70 JA	228	static void fill_md5(struct verify_header hdr, void p, unsigned int len)
e29d1b70 JA	229	{
8c432325 JA	230	struct md5_ctx md5_ctx = {
	231	.hash = (uint32_t *) hdr->md5_digest,
	232	};
e29d1b70	233
e29d1b70	234	md5_update(&md5_ctx, p, len);
e29d1b70 JA	235	}
	236
	237	/*
	238	* fill body of io_u->buf with random data and add a header with the
	239	* crc32 or md5 sum of that data.
	240	*/
	241	void populate_verify_io_u(struct thread_data td, struct io_u io_u)
	242	{
baefa9be	243	struct verify_header *hdr;
3f9f4e26	244	unsigned char p = io_u->buf, data;
546a9142	245	unsigned int hdr_inc, data_len;
e29d1b70	246
9cc3d150 JA	247	if (td->o.verify == VERIFY_NULL)
	248	return;
	249
546a9142 SL	250	fill_random_bytes(td, p, io_u->buflen);
	251
	252	hdr_inc = io_u->buflen;
	253	if (td->o.header_interval)
	254	hdr_inc = td->o.header_interval;
	255	data_len = hdr_inc - sizeof(*hdr);
baefa9be	256
546a9142	257	for (;p < (unsigned char*) io_u->buf + io_u->buflen; p += hdr_inc) {
3f9f4e26 SL	258	hdr = (struct verify_header*) p;
	259
	260	hdr->fio_magic = FIO_HDR_MAGIC;
	261	hdr->verify_type = td->o.verify;
546a9142	262	hdr->len = hdr_inc;
3f9f4e26 SL	263
3f9f4e26 SL	264	data = p + sizeof(*hdr);
3f9f4e26 SL	265	switch (td->o.verify) {
	266	case VERIFY_MD5:
	267	fill_md5(hdr, data, data_len);
	268	break;
	269	case VERIFY_CRC64:
	270	fill_crc64(hdr, data, data_len);
	271	break;
	272	case VERIFY_CRC32:
	273	fill_crc32(hdr, data, data_len);
	274	break;
	275	case VERIFY_CRC16:
	276	fill_crc16(hdr, data, data_len);
	277	break;
	278	case VERIFY_CRC7:
	279	fill_crc7(hdr, data, data_len);
	280	break;
	281	default:
	282	log_err("fio: bad verify type: %d\n", td->o.verify);
	283	assert(0);
	284	}
546a9142 SL	285	if (td->o.header_offset)
546a9142 SL	286	memswp(p, &p[td->o.header_offset], sizeof(*hdr));
e29d1b70	287	}
e29d1b70 JA	288	}
	289
	290	int get_next_verify(struct thread_data td, struct io_u io_u)
	291	{
8de8f047	292	struct io_piece *ipo = NULL;
e29d1b70	293
d2d7fa53 JA	294	/*
	295	* this io_u is from a requeue, we already filled the offsets
	296	*/
	297	if (io_u->file)
	298	return 0;
	299
8de8f047 JA	300	if (!RB_EMPTY_ROOT(&td->io_hist_tree)) {
8de8f047 JA	301	struct rb_node *n = rb_first(&td->io_hist_tree);
e29d1b70	302
8de8f047	303	ipo = rb_entry(n, struct io_piece, rb_node);
4b87898e	304	rb_erase(n, &td->io_hist_tree);
8de8f047 JA	305	} else if (!list_empty(&td->io_hist_list)) {
	306	ipo = list_entry(td->io_hist_list.next, struct io_piece, list);
	307	list_del(&ipo->list);
	308	}
e29d1b70	309
8de8f047	310	if (ipo) {
e29d1b70 JA	311	io_u->offset = ipo->offset;
e29d1b70 JA	312	io_u->buflen = ipo->len;
36167d82	313	io_u->file = ipo->file;
97af62ce JA	314
	315	if ((io_u->file->flags & FIO_FILE_OPEN) == 0) {
	316	int r = td_io_open_file(td, io_u->file);
	317
	318	if (r)
	319	return 1;
	320	}
	321
	322	get_file(ipo->file);
	323	assert(io_u->file->flags & FIO_FILE_OPEN);
e29d1b70	324	io_u->ddir = DDIR_READ;
36167d82 JA	325	io_u->xfer_buf = io_u->buf;
36167d82 JA	326	io_u->xfer_buflen = io_u->buflen;
e29d1b70 JA	327	free(ipo);
	328	return 0;
	329	}
	330
	331	return 1;
	332	}