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