[thirdparty/linux.git] / drivers / vhost / test.c

// SPDX-License-Identifier: GPL-2.0-only
/* Copyright (C) 2009 Red Hat, Inc.
 * Author: Michael S. Tsirkin <mst@redhat.com>
 *
 * test virtio server in host kernel.
 */

#include <linux/compat.h>
#include <linux/eventfd.h>
#include <linux/vhost.h>
#include <linux/miscdevice.h>
#include <linux/module.h>
#include <linux/mutex.h>
#include <linux/workqueue.h>
#include <linux/file.h>
#include <linux/slab.h>

#include "test.h"
#include "vhost.h"

/* Max number of bytes transferred before requeueing the job.
 * Using this limit prevents one virtqueue from starving others. */
#define VHOST_TEST_WEIGHT 0x80000

/* Max number of packets transferred before requeueing the job.
 * Using this limit prevents one virtqueue from starving others with
 * pkts.
 */
#define VHOST_TEST_PKT_WEIGHT 256

enum {
	VHOST_TEST_VQ = 0,
	VHOST_TEST_VQ_MAX = 1,
};

struct vhost_test {
	struct vhost_dev dev;
	struct vhost_virtqueue vqs[VHOST_TEST_VQ_MAX];
};

/* Expects to be always run from workqueue - which acts as
 * read-size critical section for our kind of RCU. */
static void handle_vq(struct vhost_test *n)
{
	struct vhost_virtqueue *vq = &n->vqs[VHOST_TEST_VQ];
	unsigned out, in;
	int head;
	size_t len, total_len = 0;
	void *private;

	mutex_lock(&vq->mutex);
	private = vhost_vq_get_backend(vq);
	if (!private) {
		mutex_unlock(&vq->mutex);
		return;
	}

	vhost_disable_notify(&n->dev, vq);

	for (;;) {
		head = vhost_get_vq_desc(vq, vq->iov,
					 ARRAY_SIZE(vq->iov),
					 &out, &in,
					 NULL, NULL);
		/* On error, stop handling until the next kick. */
		if (unlikely(head < 0))
			break;
		/* Nothing new?  Wait for eventfd to tell us they refilled. */
		if (head == vq->num) {
			if (unlikely(vhost_enable_notify(&n->dev, vq))) {
				vhost_disable_notify(&n->dev, vq);
				continue;
			}
			break;
		}
		if (in) {
			vq_err(vq, "Unexpected descriptor format for TX: "
			       "out %d, int %d\n", out, in);
			break;
		}
		len = iov_length(vq->iov, out);
		/* Sanity check */
		if (!len) {
			vq_err(vq, "Unexpected 0 len for TX\n");
			break;
		}
		vhost_add_used_and_signal(&n->dev, vq, head, 0);
		total_len += len;
		if (unlikely(vhost_exceeds_weight(vq, 0, total_len)))
			break;
	}

	mutex_unlock(&vq->mutex);
}

static void handle_vq_kick(struct vhost_work *work)
{
	struct vhost_virtqueue *vq = container_of(work, struct vhost_virtqueue,
						  poll.work);
	struct vhost_test *n = container_of(vq->dev, struct vhost_test, dev);

	handle_vq(n);
}

static int vhost_test_open(struct inode *inode, struct file *f)
{
	struct vhost_test *n = kmalloc(sizeof *n, GFP_KERNEL);
	struct vhost_dev *dev;
	struct vhost_virtqueue **vqs;

	if (!n)
		return -ENOMEM;
	vqs = kmalloc_array(VHOST_TEST_VQ_MAX, sizeof(*vqs), GFP_KERNEL);
	if (!vqs) {
		kfree(n);
		return -ENOMEM;
	}

	dev = &n->dev;
	vqs[VHOST_TEST_VQ] = &n->vqs[VHOST_TEST_VQ];
	n->vqs[VHOST_TEST_VQ].handle_kick = handle_vq_kick;
	vhost_dev_init(dev, vqs, VHOST_TEST_VQ_MAX, UIO_MAXIOV,
		       VHOST_TEST_PKT_WEIGHT, VHOST_TEST_WEIGHT, NULL);

	f->private_data = n;

	return 0;
}

static void *vhost_test_stop_vq(struct vhost_test *n,
				struct vhost_virtqueue *vq)
{
	void *private;

	mutex_lock(&vq->mutex);
	private = vhost_vq_get_backend(vq);
	vhost_vq_set_backend(vq, NULL);
	mutex_unlock(&vq->mutex);
	return private;
}

static void vhost_test_stop(struct vhost_test *n, void **privatep)
{
	*privatep = vhost_test_stop_vq(n, n->vqs + VHOST_TEST_VQ);
}

static void vhost_test_flush_vq(struct vhost_test *n, int index)
{
	vhost_poll_flush(&n->vqs[index].poll);
}

static void vhost_test_flush(struct vhost_test *n)
{
	vhost_test_flush_vq(n, VHOST_TEST_VQ);
}

static int vhost_test_release(struct inode *inode, struct file *f)
{
	struct vhost_test *n = f->private_data;
	void  *private;

	vhost_test_stop(n, &private);
	vhost_test_flush(n);
	vhost_dev_stop(&n->dev);
	vhost_dev_cleanup(&n->dev);
	/* We do an extra flush before freeing memory,
	 * since jobs can re-queue themselves. */
	vhost_test_flush(n);
	kfree(n);
	return 0;
}

static long vhost_test_run(struct vhost_test *n, int test)
{
	void *priv, *oldpriv;
	struct vhost_virtqueue *vq;
	int r, index;

	if (test < 0 || test > 1)
		return -EINVAL;

	mutex_lock(&n->dev.mutex);
	r = vhost_dev_check_owner(&n->dev);
	if (r)
		goto err;

	for (index = 0; index < n->dev.nvqs; ++index) {
		/* Verify that ring has been setup correctly. */
		if (!vhost_vq_access_ok(&n->vqs[index])) {
			r = -EFAULT;
			goto err;
		}
	}

	for (index = 0; index < n->dev.nvqs; ++index) {
		vq = n->vqs + index;
		mutex_lock(&vq->mutex);
		priv = test ? n : NULL;

		/* start polling new socket */
		oldpriv = vhost_vq_get_backend(vq);
		vhost_vq_set_backend(vq, priv);

		r = vhost_vq_init_access(&n->vqs[index]);

		mutex_unlock(&vq->mutex);

		if (r)
			goto err;

		if (oldpriv) {
			vhost_test_flush_vq(n, index);
		}
	}

	mutex_unlock(&n->dev.mutex);
	return 0;

err:
	mutex_unlock(&n->dev.mutex);
	return r;
}

static long vhost_test_reset_owner(struct vhost_test *n)
{
	void *priv = NULL;
	long err;
	struct vhost_iotlb *umem;

	mutex_lock(&n->dev.mutex);
	err = vhost_dev_check_owner(&n->dev);
	if (err)
		goto done;
	umem = vhost_dev_reset_owner_prepare();
	if (!umem) {
		err = -ENOMEM;
		goto done;
	}
	vhost_test_stop(n, &priv);
	vhost_test_flush(n);
	vhost_dev_stop(&n->dev);
	vhost_dev_reset_owner(&n->dev, umem);
done:
	mutex_unlock(&n->dev.mutex);
	return err;
}

static int vhost_test_set_features(struct vhost_test *n, u64 features)
{
	struct vhost_virtqueue *vq;

	mutex_lock(&n->dev.mutex);
	if ((features & (1 << VHOST_F_LOG_ALL)) &&
	    !vhost_log_access_ok(&n->dev)) {
		mutex_unlock(&n->dev.mutex);
		return -EFAULT;
	}
	vq = &n->vqs[VHOST_TEST_VQ];
	mutex_lock(&vq->mutex);
	vq->acked_features = features;
	mutex_unlock(&vq->mutex);
	mutex_unlock(&n->dev.mutex);
	return 0;
}

static long vhost_test_ioctl(struct file *f, unsigned int ioctl,
			     unsigned long arg)
{
	struct vhost_test *n = f->private_data;
	void __user *argp = (void __user *)arg;
	u64 __user *featurep = argp;
	int test;
	u64 features;
	int r;
	switch (ioctl) {
	case VHOST_TEST_RUN:
		if (copy_from_user(&test, argp, sizeof test))
			return -EFAULT;
		return vhost_test_run(n, test);
	case VHOST_GET_FEATURES:
		features = VHOST_FEATURES;
		if (copy_to_user(featurep, &features, sizeof features))
			return -EFAULT;
		return 0;
	case VHOST_SET_FEATURES:
		printk(KERN_ERR "1\n");
		if (copy_from_user(&features, featurep, sizeof features))
			return -EFAULT;
		printk(KERN_ERR "2\n");
		if (features & ~VHOST_FEATURES)
			return -EOPNOTSUPP;
		printk(KERN_ERR "3\n");
		return vhost_test_set_features(n, features);
	case VHOST_RESET_OWNER:
		return vhost_test_reset_owner(n);
	default:
		mutex_lock(&n->dev.mutex);
		r = vhost_dev_ioctl(&n->dev, ioctl, argp);
                if (r == -ENOIOCTLCMD)
                        r = vhost_vring_ioctl(&n->dev, ioctl, argp);
		vhost_test_flush(n);
		mutex_unlock(&n->dev.mutex);
		return r;
	}
}

static const struct file_operations vhost_test_fops = {
	.owner          = THIS_MODULE,
	.release        = vhost_test_release,
	.unlocked_ioctl = vhost_test_ioctl,
	.compat_ioctl   = compat_ptr_ioctl,
	.open           = vhost_test_open,
	.llseek		= noop_llseek,
};

static struct miscdevice vhost_test_misc = {
	MISC_DYNAMIC_MINOR,
	"vhost-test",
	&vhost_test_fops,
};
module_misc_device(vhost_test_misc);

MODULE_VERSION("0.0.1");
MODULE_LICENSE("GPL v2");
MODULE_AUTHOR("Michael S. Tsirkin");
MODULE_DESCRIPTION("Host kernel side for virtio simulator");
Commit	Line	Data
7a338472	1	// SPDX-License-Identifier: GPL-2.0-only
71ccc212 MT	2	/* Copyright (C) 2009 Red Hat, Inc.
	3	* Author: Michael S. Tsirkin <mst@redhat.com>
	4	*
71ccc212 MT	5	* test virtio server in host kernel.
	6	*/
	7
	8	#include <linux/compat.h>
	9	#include <linux/eventfd.h>
	10	#include <linux/vhost.h>
	11	#include <linux/miscdevice.h>
	12	#include <linux/module.h>
	13	#include <linux/mutex.h>
	14	#include <linux/workqueue.h>
71ccc212 MT	15	#include <linux/file.h>
	16	#include <linux/slab.h>
	17
	18	#include "test.h"
6ac1afbf	19	#include "vhost.h"
71ccc212 MT	20
	21	/* Max number of bytes transferred before requeueing the job.
	22	* Using this limit prevents one virtqueue from starving others. */
	23	#define VHOST_TEST_WEIGHT 0x80000
	24
264b563b TB	25	/* Max number of packets transferred before requeueing the job.
	26	* Using this limit prevents one virtqueue from starving others with
	27	* pkts.
	28	*/
	29	#define VHOST_TEST_PKT_WEIGHT 256
	30
71ccc212 MT	31	enum {
	32	VHOST_TEST_VQ = 0,
	33	VHOST_TEST_VQ_MAX = 1,
	34	};
	35
	36	struct vhost_test {
	37	struct vhost_dev dev;
	38	struct vhost_virtqueue vqs[VHOST_TEST_VQ_MAX];
	39	};
	40
	41	/* Expects to be always run from workqueue - which acts as
	42	* read-size critical section for our kind of RCU. */
	43	static void handle_vq(struct vhost_test *n)
	44	{
09a34c84	45	struct vhost_virtqueue *vq = &n->vqs[VHOST_TEST_VQ];
71ccc212 MT	46	unsigned out, in;
	47	int head;
	48	size_t len, total_len = 0;
	49	void *private;
	50
09a34c84	51	mutex_lock(&vq->mutex);
247643f8	52	private = vhost_vq_get_backend(vq);
09a34c84 MT	53	if (!private) {
09a34c84 MT	54	mutex_unlock(&vq->mutex);
71ccc212	55	return;
09a34c84	56	}
71ccc212	57
8ea8cf89	58	vhost_disable_notify(&n->dev, vq);
71ccc212 MT	59
71ccc212 MT	60	for (;;) {
47283bef	61	head = vhost_get_vq_desc(vq, vq->iov,
71ccc212 MT	62	ARRAY_SIZE(vq->iov),
	63	&out, &in,
	64	NULL, NULL);
	65	/* On error, stop handling until the next kick. */
	66	if (unlikely(head < 0))
	67	break;
	68	/* Nothing new? Wait for eventfd to tell us they refilled. */
	69	if (head == vq->num) {
8ea8cf89 MT	70	if (unlikely(vhost_enable_notify(&n->dev, vq))) {
8ea8cf89 MT	71	vhost_disable_notify(&n->dev, vq);
71ccc212 MT	72	continue;
	73	}
	74	break;
	75	}
	76	if (in) {
	77	vq_err(vq, "Unexpected descriptor format for TX: "
	78	"out %d, int %d\n", out, in);
	79	break;
	80	}
	81	len = iov_length(vq->iov, out);
	82	/* Sanity check */
	83	if (!len) {
	84	vq_err(vq, "Unexpected 0 len for TX\n");
	85	break;
	86	}
	87	vhost_add_used_and_signal(&n->dev, vq, head, 0);
	88	total_len += len;
264b563b	89	if (unlikely(vhost_exceeds_weight(vq, 0, total_len)))
71ccc212	90	break;
71ccc212 MT	91	}
	92
	93	mutex_unlock(&vq->mutex);
	94	}
	95
	96	static void handle_vq_kick(struct vhost_work *work)
	97	{
	98	struct vhost_virtqueue *vq = container_of(work, struct vhost_virtqueue,
	99	poll.work);
	100	struct vhost_test *n = container_of(vq->dev, struct vhost_test, dev);
	101
	102	handle_vq(n);
	103	}
	104
	105	static int vhost_test_open(struct inode inode, struct file f)
	106	{
	107	struct vhost_test n = kmalloc(sizeof n, GFP_KERNEL);
	108	struct vhost_dev *dev;
09a34c84	109	struct vhost_virtqueue **vqs;
71ccc212 MT	110
	111	if (!n)
	112	return -ENOMEM;
6da2ec56	113	vqs = kmalloc_array(VHOST_TEST_VQ_MAX, sizeof(*vqs), GFP_KERNEL);
09a34c84 MT	114	if (!vqs) {
	115	kfree(n);
	116	return -ENOMEM;
	117	}
71ccc212 MT	118
71ccc212 MT	119	dev = &n->dev;
09a34c84	120	vqs[VHOST_TEST_VQ] = &n->vqs[VHOST_TEST_VQ];
71ccc212	121	n->vqs[VHOST_TEST_VQ].handle_kick = handle_vq_kick;
264b563b	122	vhost_dev_init(dev, vqs, VHOST_TEST_VQ_MAX, UIO_MAXIOV,
3302363a	123	VHOST_TEST_PKT_WEIGHT, VHOST_TEST_WEIGHT, NULL);
71ccc212 MT	124
	125	f->private_data = n;
	126
	127	return 0;
	128	}
	129
	130	static void vhost_test_stop_vq(struct vhost_test n,
	131	struct vhost_virtqueue *vq)
	132	{
	133	void *private;
	134
	135	mutex_lock(&vq->mutex);
247643f8 EP	136	private = vhost_vq_get_backend(vq);
247643f8 EP	137	vhost_vq_set_backend(vq, NULL);
71ccc212 MT	138	mutex_unlock(&vq->mutex);
	139	return private;
	140	}
	141
	142	static void vhost_test_stop(struct vhost_test n, void *privatep)
	143	{
	144	*privatep = vhost_test_stop_vq(n, n->vqs + VHOST_TEST_VQ);
	145	}
	146
	147	static void vhost_test_flush_vq(struct vhost_test *n, int index)
	148	{
09a34c84	149	vhost_poll_flush(&n->vqs[index].poll);
71ccc212 MT	150	}
	151
	152	static void vhost_test_flush(struct vhost_test *n)
	153	{
	154	vhost_test_flush_vq(n, VHOST_TEST_VQ);
	155	}
	156
	157	static int vhost_test_release(struct inode inode, struct file f)
	158	{
	159	struct vhost_test *n = f->private_data;
	160	void *private;
	161
	162	vhost_test_stop(n, &private);
	163	vhost_test_flush(n);
245cdd9f	164	vhost_dev_stop(&n->dev);
f6f93f75	165	vhost_dev_cleanup(&n->dev);
71ccc212 MT	166	/* We do an extra flush before freeing memory,
	167	* since jobs can re-queue themselves. */
	168	vhost_test_flush(n);
	169	kfree(n);
	170	return 0;
	171	}
	172
	173	static long vhost_test_run(struct vhost_test *n, int test)
	174	{
	175	void priv, oldpriv;
	176	struct vhost_virtqueue *vq;
	177	int r, index;
	178
	179	if (test < 0 \|\| test > 1)
	180	return -EINVAL;
	181
	182	mutex_lock(&n->dev.mutex);
	183	r = vhost_dev_check_owner(&n->dev);
	184	if (r)
	185	goto err;
	186
	187	for (index = 0; index < n->dev.nvqs; ++index) {
	188	/* Verify that ring has been setup correctly. */
	189	if (!vhost_vq_access_ok(&n->vqs[index])) {
	190	r = -EFAULT;
	191	goto err;
	192	}
	193	}
	194
	195	for (index = 0; index < n->dev.nvqs; ++index) {
	196	vq = n->vqs + index;
	197	mutex_lock(&vq->mutex);
	198	priv = test ? n : NULL;
	199
	200	/* start polling new socket */
247643f8 EP	201	oldpriv = vhost_vq_get_backend(vq);
247643f8 EP	202	vhost_vq_set_backend(vq, priv);
71ccc212	203
80f7d030	204	r = vhost_vq_init_access(&n->vqs[index]);
f59281da	205
71ccc212 MT	206	mutex_unlock(&vq->mutex);
71ccc212 MT	207
f59281da JW	208	if (r)
	209	goto err;
	210
71ccc212 MT	211	if (oldpriv) {
	212	vhost_test_flush_vq(n, index);
	213	}
	214	}
	215
	216	mutex_unlock(&n->dev.mutex);
	217	return 0;
	218
	219	err:
	220	mutex_unlock(&n->dev.mutex);
	221	return r;
	222	}
	223
	224	static long vhost_test_reset_owner(struct vhost_test *n)
	225	{
	226	void *priv = NULL;
	227	long err;
3302363a	228	struct vhost_iotlb *umem;
150b9e51	229
71ccc212 MT	230	mutex_lock(&n->dev.mutex);
	231	err = vhost_dev_check_owner(&n->dev);
	232	if (err)
	233	goto done;
446374d7 MT	234	umem = vhost_dev_reset_owner_prepare();
446374d7 MT	235	if (!umem) {
150b9e51 MT	236	err = -ENOMEM;
	237	goto done;
	238	}
71ccc212 MT	239	vhost_test_stop(n, &priv);
71ccc212 MT	240	vhost_test_flush(n);
245cdd9f	241	vhost_dev_stop(&n->dev);
446374d7	242	vhost_dev_reset_owner(&n->dev, umem);
71ccc212 MT	243	done:
	244	mutex_unlock(&n->dev.mutex);
	245	return err;
	246	}
	247
	248	static int vhost_test_set_features(struct vhost_test *n, u64 features)
	249	{
ea16c514 MT	250	struct vhost_virtqueue *vq;
ea16c514 MT	251
71ccc212 MT	252	mutex_lock(&n->dev.mutex);
	253	if ((features & (1 << VHOST_F_LOG_ALL)) &&
	254	!vhost_log_access_ok(&n->dev)) {
	255	mutex_unlock(&n->dev.mutex);
	256	return -EFAULT;
	257	}
ea16c514 MT	258	vq = &n->vqs[VHOST_TEST_VQ];
	259	mutex_lock(&vq->mutex);
	260	vq->acked_features = features;
	261	mutex_unlock(&vq->mutex);
71ccc212 MT	262	mutex_unlock(&n->dev.mutex);
	263	return 0;
	264	}
	265
	266	static long vhost_test_ioctl(struct file *f, unsigned int ioctl,
	267	unsigned long arg)
	268	{
	269	struct vhost_test *n = f->private_data;
	270	void __user argp = (void __user )arg;
	271	u64 __user *featurep = argp;
	272	int test;
	273	u64 features;
	274	int r;
	275	switch (ioctl) {
	276	case VHOST_TEST_RUN:
	277	if (copy_from_user(&test, argp, sizeof test))
	278	return -EFAULT;
	279	return vhost_test_run(n, test);
	280	case VHOST_GET_FEATURES:
09a34c84	281	features = VHOST_FEATURES;
71ccc212 MT	282	if (copy_to_user(featurep, &features, sizeof features))
	283	return -EFAULT;
	284	return 0;
	285	case VHOST_SET_FEATURES:
4e9fa50c	286	printk(KERN_ERR "1\n");
71ccc212 MT	287	if (copy_from_user(&features, featurep, sizeof features))
71ccc212 MT	288	return -EFAULT;
4e9fa50c	289	printk(KERN_ERR "2\n");
09a34c84	290	if (features & ~VHOST_FEATURES)
71ccc212	291	return -EOPNOTSUPP;
4e9fa50c	292	printk(KERN_ERR "3\n");
71ccc212 MT	293	return vhost_test_set_features(n, features);
	294	case VHOST_RESET_OWNER:
	295	return vhost_test_reset_owner(n);
	296	default:
	297	mutex_lock(&n->dev.mutex);
73640c99 MT	298	r = vhost_dev_ioctl(&n->dev, ioctl, argp);
	299	if (r == -ENOIOCTLCMD)
	300	r = vhost_vring_ioctl(&n->dev, ioctl, argp);
71ccc212 MT	301	vhost_test_flush(n);
	302	mutex_unlock(&n->dev.mutex);
	303	return r;
	304	}
	305	}
	306
71ccc212 MT	307	static const struct file_operations vhost_test_fops = {
	308	.owner = THIS_MODULE,
	309	.release = vhost_test_release,
	310	.unlocked_ioctl = vhost_test_ioctl,
407e9ef7	311	.compat_ioctl = compat_ptr_ioctl,
71ccc212 MT	312	.open = vhost_test_open,
	313	.llseek = noop_llseek,
	314	};
	315
	316	static struct miscdevice vhost_test_misc = {
	317	MISC_DYNAMIC_MINOR,
	318	"vhost-test",
	319	&vhost_test_fops,
	320	};
ca75d601	321	module_misc_device(vhost_test_misc);
71ccc212 MT	322
	323	MODULE_VERSION("0.0.1");
	324	MODULE_LICENSE("GPL v2");
	325	MODULE_AUTHOR("Michael S. Tsirkin");
	326	MODULE_DESCRIPTION("Host kernel side for virtio simulator");