radare2/libr/core/yank.c

/* radare - LGPL - Copyright 2009-2012 pancake<nopcode.org> */

#include "r_core.h"

R_API void r_core_yank_set (RCore *core, const char *str) {
	free (core->yank);
	if (str) {
		core->yank = (ut8*)strdup (str);
		core->yank_off = core->offset;
		core->yank_len = strlen (str);
	} else {
		core->yank = NULL;
		core->yank_len = 0;
	}
}

R_API int r_core_yank(struct r_core_t *core, ut64 addr, int len) {
	ut64 oldbsz = 0LL;
	ut64 curseek = core->offset;
	free (core->yank);
	core->yank = (ut8 *)malloc (len);
	if (addr != core->offset)
		r_core_seek (core, addr, 1);
	if (len == 0)
		len = core->blocksize;
	if (len > core->blocksize) {
		oldbsz = core->blocksize;
		r_core_block_size (core, len);
	}
	memcpy (core->yank, core->block, len);
	core->yank_off = addr;
	core->yank_len = len;
	if (curseek != addr)
		r_core_seek (core, curseek, 1);
	if (oldbsz)
		r_core_block_size (core, oldbsz);
	return R_TRUE;
}

R_API int r_core_yank_paste(struct r_core_t *core, ut64 addr, int len) {
	if (len == 0)
		len = core->yank_len;
	if (len > core->yank_len)
		len = core->yank_len;
	r_core_write_at (core, addr, core->yank, len);
	return R_TRUE;
}