1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3 * Helpers for the host side of a virtio ring.
4 *
5 * Since these may be in userspace, we use (inline) accessors.
6 */
7 #include <linux/compiler.h>
8 #include <linux/module.h>
9 #include <linux/vringh.h>
10 #include <linux/virtio_ring.h>
11 #include <linux/kernel.h>
12 #include <linux/ratelimit.h>
13 #include <linux/uaccess.h>
14 #include <linux/slab.h>
15 #include <linux/export.h>
16 #if IS_REACHABLE(CONFIG_VHOST_IOTLB)
17 #include <linux/bvec.h>
18 #include <linux/highmem.h>
19 #include <linux/vhost_iotlb.h>
20 #endif
21 #include <uapi/linux/virtio_config.h>
22
vringh_bad(const char * fmt,...)23 static __printf(1,2) __cold void vringh_bad(const char *fmt, ...)
24 {
25 static DEFINE_RATELIMIT_STATE(vringh_rs,
26 DEFAULT_RATELIMIT_INTERVAL,
27 DEFAULT_RATELIMIT_BURST);
28 if (__ratelimit(&vringh_rs)) {
29 va_list ap;
30 va_start(ap, fmt);
31 printk(KERN_NOTICE "vringh:");
32 vprintk(fmt, ap);
33 va_end(ap);
34 }
35 }
36
37 /* Returns vring->num if empty, -ve on error. */
__vringh_get_head(const struct vringh * vrh,int (* getu16)(const struct vringh * vrh,u16 * val,const __virtio16 * p),u16 * last_avail_idx)38 static inline int __vringh_get_head(const struct vringh *vrh,
39 int (*getu16)(const struct vringh *vrh,
40 u16 *val, const __virtio16 *p),
41 u16 *last_avail_idx)
42 {
43 u16 avail_idx, i, head;
44 int err;
45
46 err = getu16(vrh, &avail_idx, &vrh->vring.avail->idx);
47 if (err) {
48 vringh_bad("Failed to access avail idx at %p",
49 &vrh->vring.avail->idx);
50 return err;
51 }
52
53 if (*last_avail_idx == avail_idx)
54 return vrh->vring.num;
55
56 /* Only get avail ring entries after they have been exposed by guest. */
57 virtio_rmb(vrh->weak_barriers);
58
59 i = *last_avail_idx & (vrh->vring.num - 1);
60
61 err = getu16(vrh, &head, &vrh->vring.avail->ring[i]);
62 if (err) {
63 vringh_bad("Failed to read head: idx %d address %p",
64 *last_avail_idx, &vrh->vring.avail->ring[i]);
65 return err;
66 }
67
68 if (head >= vrh->vring.num) {
69 vringh_bad("Guest says index %u > %u is available",
70 head, vrh->vring.num);
71 return -EINVAL;
72 }
73
74 (*last_avail_idx)++;
75 return head;
76 }
77
78 /**
79 * vringh_kiov_advance - skip bytes from vring_kiov
80 * @iov: an iov passed to vringh_getdesc_*() (updated as we consume)
81 * @len: the maximum length to advance
82 */
vringh_kiov_advance(struct vringh_kiov * iov,size_t len)83 void vringh_kiov_advance(struct vringh_kiov *iov, size_t len)
84 {
85 while (len && iov->i < iov->used) {
86 size_t partlen = min(iov->iov[iov->i].iov_len, len);
87
88 iov->consumed += partlen;
89 iov->iov[iov->i].iov_len -= partlen;
90 iov->iov[iov->i].iov_base += partlen;
91
92 if (!iov->iov[iov->i].iov_len) {
93 /* Fix up old iov element then increment. */
94 iov->iov[iov->i].iov_len = iov->consumed;
95 iov->iov[iov->i].iov_base -= iov->consumed;
96
97 iov->consumed = 0;
98 iov->i++;
99 }
100
101 len -= partlen;
102 }
103 }
104 EXPORT_SYMBOL(vringh_kiov_advance);
105
106 /* Copy some bytes to/from the iovec. Returns num copied. */
vringh_iov_xfer(struct vringh * vrh,struct vringh_kiov * iov,void * ptr,size_t len,int (* xfer)(const struct vringh * vrh,void * addr,void * ptr,size_t len))107 static inline ssize_t vringh_iov_xfer(struct vringh *vrh,
108 struct vringh_kiov *iov,
109 void *ptr, size_t len,
110 int (*xfer)(const struct vringh *vrh,
111 void *addr, void *ptr,
112 size_t len))
113 {
114 int err, done = 0;
115
116 while (len && iov->i < iov->used) {
117 size_t partlen;
118
119 partlen = min(iov->iov[iov->i].iov_len, len);
120 err = xfer(vrh, iov->iov[iov->i].iov_base, ptr, partlen);
121 if (err)
122 return err;
123 done += partlen;
124 len -= partlen;
125 ptr += partlen;
126 iov->consumed += partlen;
127 iov->iov[iov->i].iov_len -= partlen;
128 iov->iov[iov->i].iov_base += partlen;
129
130 if (!iov->iov[iov->i].iov_len) {
131 /* Fix up old iov element then increment. */
132 iov->iov[iov->i].iov_len = iov->consumed;
133 iov->iov[iov->i].iov_base -= iov->consumed;
134
135 iov->consumed = 0;
136 iov->i++;
137 }
138 }
139 return done;
140 }
141
142 /* May reduce *len if range is shorter. */
range_check(struct vringh * vrh,u64 addr,size_t * len,struct vringh_range * range,bool (* getrange)(struct vringh *,u64,struct vringh_range *))143 static inline bool range_check(struct vringh *vrh, u64 addr, size_t *len,
144 struct vringh_range *range,
145 bool (*getrange)(struct vringh *,
146 u64, struct vringh_range *))
147 {
148 if (addr < range->start || addr > range->end_incl) {
149 if (!getrange(vrh, addr, range))
150 return false;
151 }
152 BUG_ON(addr < range->start || addr > range->end_incl);
153
154 /* To end of memory? */
155 if (unlikely(addr + *len == 0)) {
156 if (range->end_incl == -1ULL)
157 return true;
158 goto truncate;
159 }
160
161 /* Otherwise, don't wrap. */
162 if (addr + *len < addr) {
163 vringh_bad("Wrapping descriptor %zu@0x%llx",
164 *len, (unsigned long long)addr);
165 return false;
166 }
167
168 if (unlikely(addr + *len - 1 > range->end_incl))
169 goto truncate;
170 return true;
171
172 truncate:
173 *len = range->end_incl + 1 - addr;
174 return true;
175 }
176
no_range_check(struct vringh * vrh,u64 addr,size_t * len,struct vringh_range * range,bool (* getrange)(struct vringh *,u64,struct vringh_range *))177 static inline bool no_range_check(struct vringh *vrh, u64 addr, size_t *len,
178 struct vringh_range *range,
179 bool (*getrange)(struct vringh *,
180 u64, struct vringh_range *))
181 {
182 return true;
183 }
184
185 /* No reason for this code to be inline. */
move_to_indirect(const struct vringh * vrh,int * up_next,u16 * i,void * addr,const struct vring_desc * desc,struct vring_desc ** descs,int * desc_max)186 static int move_to_indirect(const struct vringh *vrh,
187 int *up_next, u16 *i, void *addr,
188 const struct vring_desc *desc,
189 struct vring_desc **descs, int *desc_max)
190 {
191 u32 len;
192
193 /* Indirect tables can't have indirect. */
194 if (*up_next != -1) {
195 vringh_bad("Multilevel indirect %u->%u", *up_next, *i);
196 return -EINVAL;
197 }
198
199 len = vringh32_to_cpu(vrh, desc->len);
200 if (unlikely(len % sizeof(struct vring_desc))) {
201 vringh_bad("Strange indirect len %u", desc->len);
202 return -EINVAL;
203 }
204
205 /* We will check this when we follow it! */
206 if (desc->flags & cpu_to_vringh16(vrh, VRING_DESC_F_NEXT))
207 *up_next = vringh16_to_cpu(vrh, desc->next);
208 else
209 *up_next = -2;
210 *descs = addr;
211 *desc_max = len / sizeof(struct vring_desc);
212
213 /* Now, start at the first indirect. */
214 *i = 0;
215 return 0;
216 }
217
resize_iovec(struct vringh_kiov * iov,gfp_t gfp)218 static int resize_iovec(struct vringh_kiov *iov, gfp_t gfp)
219 {
220 struct kvec *new;
221 unsigned int flag, new_num = (iov->max_num & ~VRINGH_IOV_ALLOCATED) * 2;
222
223 if (new_num < 8)
224 new_num = 8;
225
226 flag = (iov->max_num & VRINGH_IOV_ALLOCATED);
227 if (flag)
228 new = krealloc_array(iov->iov, new_num,
229 sizeof(struct iovec), gfp);
230 else {
231 new = kmalloc_array(new_num, sizeof(struct iovec), gfp);
232 if (new) {
233 memcpy(new, iov->iov,
234 iov->max_num * sizeof(struct iovec));
235 flag = VRINGH_IOV_ALLOCATED;
236 }
237 }
238 if (!new)
239 return -ENOMEM;
240 iov->iov = new;
241 iov->max_num = (new_num | flag);
242 return 0;
243 }
244
return_from_indirect(const struct vringh * vrh,int * up_next,struct vring_desc ** descs,int * desc_max)245 static u16 __cold return_from_indirect(const struct vringh *vrh, int *up_next,
246 struct vring_desc **descs, int *desc_max)
247 {
248 u16 i = *up_next;
249
250 *up_next = -1;
251 *descs = vrh->vring.desc;
252 *desc_max = vrh->vring.num;
253 return i;
254 }
255
slow_copy(struct vringh * vrh,void * dst,const void * src,bool (* rcheck)(struct vringh * vrh,u64 addr,size_t * len,struct vringh_range * range,bool (* getrange)(struct vringh * vrh,u64,struct vringh_range *)),bool (* getrange)(struct vringh * vrh,u64 addr,struct vringh_range * r),struct vringh_range * range,int (* copy)(const struct vringh * vrh,void * dst,const void * src,size_t len))256 static int slow_copy(struct vringh *vrh, void *dst, const void *src,
257 bool (*rcheck)(struct vringh *vrh, u64 addr, size_t *len,
258 struct vringh_range *range,
259 bool (*getrange)(struct vringh *vrh,
260 u64,
261 struct vringh_range *)),
262 bool (*getrange)(struct vringh *vrh,
263 u64 addr,
264 struct vringh_range *r),
265 struct vringh_range *range,
266 int (*copy)(const struct vringh *vrh,
267 void *dst, const void *src, size_t len))
268 {
269 size_t part, len = sizeof(struct vring_desc);
270
271 do {
272 u64 addr;
273 int err;
274
275 part = len;
276 addr = (u64)(unsigned long)src - range->offset;
277
278 if (!rcheck(vrh, addr, &part, range, getrange))
279 return -EINVAL;
280
281 err = copy(vrh, dst, src, part);
282 if (err)
283 return err;
284
285 dst += part;
286 src += part;
287 len -= part;
288 } while (len);
289 return 0;
290 }
291
292 static inline int
__vringh_iov(struct vringh * vrh,u16 i,struct vringh_kiov * riov,struct vringh_kiov * wiov,bool (* rcheck)(struct vringh * vrh,u64 addr,size_t * len,struct vringh_range * range,bool (* getrange)(struct vringh *,u64,struct vringh_range *)),bool (* getrange)(struct vringh *,u64,struct vringh_range *),gfp_t gfp,int (* copy)(const struct vringh * vrh,void * dst,const void * src,size_t len))293 __vringh_iov(struct vringh *vrh, u16 i,
294 struct vringh_kiov *riov,
295 struct vringh_kiov *wiov,
296 bool (*rcheck)(struct vringh *vrh, u64 addr, size_t *len,
297 struct vringh_range *range,
298 bool (*getrange)(struct vringh *, u64,
299 struct vringh_range *)),
300 bool (*getrange)(struct vringh *, u64, struct vringh_range *),
301 gfp_t gfp,
302 int (*copy)(const struct vringh *vrh,
303 void *dst, const void *src, size_t len))
304 {
305 int err, count = 0, indirect_count = 0, up_next, desc_max;
306 struct vring_desc desc, *descs;
307 struct vringh_range range = { -1ULL, 0 }, slowrange;
308 bool slow = false;
309
310 /* We start traversing vring's descriptor table. */
311 descs = vrh->vring.desc;
312 desc_max = vrh->vring.num;
313 up_next = -1;
314
315 /* You must want something! */
316 if (WARN_ON(!riov && !wiov))
317 return -EINVAL;
318
319 if (riov)
320 riov->i = riov->used = riov->consumed = 0;
321 if (wiov)
322 wiov->i = wiov->used = wiov->consumed = 0;
323
324 for (;;) {
325 void *addr;
326 struct vringh_kiov *iov;
327 size_t len;
328
329 if (unlikely(slow))
330 err = slow_copy(vrh, &desc, &descs[i], rcheck, getrange,
331 &slowrange, copy);
332 else
333 err = copy(vrh, &desc, &descs[i], sizeof(desc));
334 if (unlikely(err))
335 goto fail;
336
337 if (unlikely(desc.flags &
338 cpu_to_vringh16(vrh, VRING_DESC_F_INDIRECT))) {
339 u64 a = vringh64_to_cpu(vrh, desc.addr);
340
341 /* Make sure it's OK, and get offset. */
342 len = vringh32_to_cpu(vrh, desc.len);
343 if (!rcheck(vrh, a, &len, &range, getrange)) {
344 err = -EINVAL;
345 goto fail;
346 }
347
348 if (unlikely(len != vringh32_to_cpu(vrh, desc.len))) {
349 slow = true;
350 /* We need to save this range to use offset */
351 slowrange = range;
352 }
353
354 addr = (void *)(long)(a + range.offset);
355 err = move_to_indirect(vrh, &up_next, &i, addr, &desc,
356 &descs, &desc_max);
357 if (err)
358 goto fail;
359 continue;
360 }
361
362 if (up_next == -1)
363 count++;
364 else
365 indirect_count++;
366
367 if (count > vrh->vring.num || indirect_count > desc_max) {
368 vringh_bad("Descriptor loop in %p", descs);
369 err = -ELOOP;
370 goto fail;
371 }
372
373 if (desc.flags & cpu_to_vringh16(vrh, VRING_DESC_F_WRITE))
374 iov = wiov;
375 else {
376 iov = riov;
377 if (unlikely(wiov && wiov->used)) {
378 vringh_bad("Readable desc %p after writable",
379 &descs[i]);
380 err = -EINVAL;
381 goto fail;
382 }
383 }
384
385 if (!iov) {
386 vringh_bad("Unexpected %s desc",
387 !wiov ? "writable" : "readable");
388 err = -EPROTO;
389 goto fail;
390 }
391
392 again:
393 /* Make sure it's OK, and get offset. */
394 len = vringh32_to_cpu(vrh, desc.len);
395 if (!rcheck(vrh, vringh64_to_cpu(vrh, desc.addr), &len, &range,
396 getrange)) {
397 err = -EINVAL;
398 goto fail;
399 }
400 addr = (void *)(unsigned long)(vringh64_to_cpu(vrh, desc.addr) +
401 range.offset);
402
403 if (unlikely(iov->used == (iov->max_num & ~VRINGH_IOV_ALLOCATED))) {
404 err = resize_iovec(iov, gfp);
405 if (err)
406 goto fail;
407 }
408
409 iov->iov[iov->used].iov_base = addr;
410 iov->iov[iov->used].iov_len = len;
411 iov->used++;
412
413 if (unlikely(len != vringh32_to_cpu(vrh, desc.len))) {
414 desc.len = cpu_to_vringh32(vrh,
415 vringh32_to_cpu(vrh, desc.len) - len);
416 desc.addr = cpu_to_vringh64(vrh,
417 vringh64_to_cpu(vrh, desc.addr) + len);
418 goto again;
419 }
420
421 if (desc.flags & cpu_to_vringh16(vrh, VRING_DESC_F_NEXT)) {
422 i = vringh16_to_cpu(vrh, desc.next);
423 } else {
424 /* Just in case we need to finish traversing above. */
425 if (unlikely(up_next > 0)) {
426 i = return_from_indirect(vrh, &up_next,
427 &descs, &desc_max);
428 slow = false;
429 indirect_count = 0;
430 } else
431 break;
432 }
433
434 if (i >= desc_max) {
435 vringh_bad("Chained index %u > %u", i, desc_max);
436 err = -EINVAL;
437 goto fail;
438 }
439 }
440
441 return 0;
442
443 fail:
444 return err;
445 }
446
__vringh_complete(struct vringh * vrh,const struct vring_used_elem * used,unsigned int num_used,int (* putu16)(const struct vringh * vrh,__virtio16 * p,u16 val),int (* putused)(const struct vringh * vrh,struct vring_used_elem * dst,const struct vring_used_elem * src,unsigned num))447 static inline int __vringh_complete(struct vringh *vrh,
448 const struct vring_used_elem *used,
449 unsigned int num_used,
450 int (*putu16)(const struct vringh *vrh,
451 __virtio16 *p, u16 val),
452 int (*putused)(const struct vringh *vrh,
453 struct vring_used_elem *dst,
454 const struct vring_used_elem
455 *src, unsigned num))
456 {
457 struct vring_used *used_ring;
458 int err;
459 u16 used_idx, off;
460
461 used_ring = vrh->vring.used;
462 used_idx = vrh->last_used_idx + vrh->completed;
463
464 off = used_idx % vrh->vring.num;
465
466 /* Compiler knows num_used == 1 sometimes, hence extra check */
467 if (num_used > 1 && unlikely(off + num_used >= vrh->vring.num)) {
468 u16 part = vrh->vring.num - off;
469 err = putused(vrh, &used_ring->ring[off], used, part);
470 if (!err)
471 err = putused(vrh, &used_ring->ring[0], used + part,
472 num_used - part);
473 } else
474 err = putused(vrh, &used_ring->ring[off], used, num_used);
475
476 if (err) {
477 vringh_bad("Failed to write %u used entries %u at %p",
478 num_used, off, &used_ring->ring[off]);
479 return err;
480 }
481
482 /* Make sure buffer is written before we update index. */
483 virtio_wmb(vrh->weak_barriers);
484
485 err = putu16(vrh, &vrh->vring.used->idx, used_idx + num_used);
486 if (err) {
487 vringh_bad("Failed to update used index at %p",
488 &vrh->vring.used->idx);
489 return err;
490 }
491
492 vrh->completed += num_used;
493 return 0;
494 }
495
496
__vringh_need_notify(struct vringh * vrh,int (* getu16)(const struct vringh * vrh,u16 * val,const __virtio16 * p))497 static inline int __vringh_need_notify(struct vringh *vrh,
498 int (*getu16)(const struct vringh *vrh,
499 u16 *val,
500 const __virtio16 *p))
501 {
502 bool notify;
503 u16 used_event;
504 int err;
505
506 /* Flush out used index update. This is paired with the
507 * barrier that the Guest executes when enabling
508 * interrupts. */
509 virtio_mb(vrh->weak_barriers);
510
511 /* Old-style, without event indices. */
512 if (!vrh->event_indices) {
513 u16 flags;
514 err = getu16(vrh, &flags, &vrh->vring.avail->flags);
515 if (err) {
516 vringh_bad("Failed to get flags at %p",
517 &vrh->vring.avail->flags);
518 return err;
519 }
520 return (!(flags & VRING_AVAIL_F_NO_INTERRUPT));
521 }
522
523 /* Modern: we know when other side wants to know. */
524 err = getu16(vrh, &used_event, &vring_used_event(&vrh->vring));
525 if (err) {
526 vringh_bad("Failed to get used event idx at %p",
527 &vring_used_event(&vrh->vring));
528 return err;
529 }
530
531 /* Just in case we added so many that we wrap. */
532 if (unlikely(vrh->completed > 0xffff))
533 notify = true;
534 else
535 notify = vring_need_event(used_event,
536 vrh->last_used_idx + vrh->completed,
537 vrh->last_used_idx);
538
539 vrh->last_used_idx += vrh->completed;
540 vrh->completed = 0;
541 return notify;
542 }
543
__vringh_notify_enable(struct vringh * vrh,int (* getu16)(const struct vringh * vrh,u16 * val,const __virtio16 * p),int (* putu16)(const struct vringh * vrh,__virtio16 * p,u16 val))544 static inline bool __vringh_notify_enable(struct vringh *vrh,
545 int (*getu16)(const struct vringh *vrh,
546 u16 *val, const __virtio16 *p),
547 int (*putu16)(const struct vringh *vrh,
548 __virtio16 *p, u16 val))
549 {
550 u16 avail;
551
552 if (!vrh->event_indices) {
553 /* Old-school; update flags. */
554 if (putu16(vrh, &vrh->vring.used->flags, 0) != 0) {
555 vringh_bad("Clearing used flags %p",
556 &vrh->vring.used->flags);
557 return true;
558 }
559 } else {
560 if (putu16(vrh, &vring_avail_event(&vrh->vring),
561 vrh->last_avail_idx) != 0) {
562 vringh_bad("Updating avail event index %p",
563 &vring_avail_event(&vrh->vring));
564 return true;
565 }
566 }
567
568 /* They could have slipped one in as we were doing that: make
569 * sure it's written, then check again. */
570 virtio_mb(vrh->weak_barriers);
571
572 if (getu16(vrh, &avail, &vrh->vring.avail->idx) != 0) {
573 vringh_bad("Failed to check avail idx at %p",
574 &vrh->vring.avail->idx);
575 return true;
576 }
577
578 /* This is unlikely, so we just leave notifications enabled
579 * (if we're using event_indices, we'll only get one
580 * notification anyway). */
581 return avail == vrh->last_avail_idx;
582 }
583
__vringh_notify_disable(struct vringh * vrh,int (* putu16)(const struct vringh * vrh,__virtio16 * p,u16 val))584 static inline void __vringh_notify_disable(struct vringh *vrh,
585 int (*putu16)(const struct vringh *vrh,
586 __virtio16 *p, u16 val))
587 {
588 if (!vrh->event_indices) {
589 /* Old-school; update flags. */
590 if (putu16(vrh, &vrh->vring.used->flags,
591 VRING_USED_F_NO_NOTIFY)) {
592 vringh_bad("Setting used flags %p",
593 &vrh->vring.used->flags);
594 }
595 }
596 }
597
598 /* Userspace access helpers: in this case, addresses are really userspace. */
getu16_user(const struct vringh * vrh,u16 * val,const __virtio16 * p)599 static inline int getu16_user(const struct vringh *vrh, u16 *val, const __virtio16 *p)
600 {
601 __virtio16 v = 0;
602 int rc = get_user(v, (__force __virtio16 __user *)p);
603 *val = vringh16_to_cpu(vrh, v);
604 return rc;
605 }
606
putu16_user(const struct vringh * vrh,__virtio16 * p,u16 val)607 static inline int putu16_user(const struct vringh *vrh, __virtio16 *p, u16 val)
608 {
609 __virtio16 v = cpu_to_vringh16(vrh, val);
610 return put_user(v, (__force __virtio16 __user *)p);
611 }
612
copydesc_user(const struct vringh * vrh,void * dst,const void * src,size_t len)613 static inline int copydesc_user(const struct vringh *vrh,
614 void *dst, const void *src, size_t len)
615 {
616 return copy_from_user(dst, (__force void __user *)src, len) ?
617 -EFAULT : 0;
618 }
619
putused_user(const struct vringh * vrh,struct vring_used_elem * dst,const struct vring_used_elem * src,unsigned int num)620 static inline int putused_user(const struct vringh *vrh,
621 struct vring_used_elem *dst,
622 const struct vring_used_elem *src,
623 unsigned int num)
624 {
625 return copy_to_user((__force void __user *)dst, src,
626 sizeof(*dst) * num) ? -EFAULT : 0;
627 }
628
xfer_from_user(const struct vringh * vrh,void * src,void * dst,size_t len)629 static inline int xfer_from_user(const struct vringh *vrh, void *src,
630 void *dst, size_t len)
631 {
632 return copy_from_user(dst, (__force void __user *)src, len) ?
633 -EFAULT : 0;
634 }
635
xfer_to_user(const struct vringh * vrh,void * dst,void * src,size_t len)636 static inline int xfer_to_user(const struct vringh *vrh,
637 void *dst, void *src, size_t len)
638 {
639 return copy_to_user((__force void __user *)dst, src, len) ?
640 -EFAULT : 0;
641 }
642
643 /**
644 * vringh_init_user - initialize a vringh for a userspace vring.
645 * @vrh: the vringh to initialize.
646 * @features: the feature bits for this ring.
647 * @num: the number of elements.
648 * @weak_barriers: true if we only need memory barriers, not I/O.
649 * @desc: the userspace descriptor pointer.
650 * @avail: the userspace avail pointer.
651 * @used: the userspace used pointer.
652 *
653 * Returns an error if num is invalid: you should check pointers
654 * yourself!
655 */
vringh_init_user(struct vringh * vrh,u64 features,unsigned int num,bool weak_barriers,vring_desc_t __user * desc,vring_avail_t __user * avail,vring_used_t __user * used)656 int vringh_init_user(struct vringh *vrh, u64 features,
657 unsigned int num, bool weak_barriers,
658 vring_desc_t __user *desc,
659 vring_avail_t __user *avail,
660 vring_used_t __user *used)
661 {
662 /* Sane power of 2 please! */
663 if (!num || num > 0xffff || (num & (num - 1))) {
664 vringh_bad("Bad ring size %u", num);
665 return -EINVAL;
666 }
667
668 vrh->little_endian = (features & (1ULL << VIRTIO_F_VERSION_1));
669 vrh->event_indices = (features & (1 << VIRTIO_RING_F_EVENT_IDX));
670 vrh->weak_barriers = weak_barriers;
671 vrh->completed = 0;
672 vrh->last_avail_idx = 0;
673 vrh->last_used_idx = 0;
674 vrh->vring.num = num;
675 /* vring expects kernel addresses, but only used via accessors. */
676 vrh->vring.desc = (__force struct vring_desc *)desc;
677 vrh->vring.avail = (__force struct vring_avail *)avail;
678 vrh->vring.used = (__force struct vring_used *)used;
679 return 0;
680 }
681 EXPORT_SYMBOL(vringh_init_user);
682
683 /**
684 * vringh_getdesc_user - get next available descriptor from userspace ring.
685 * @vrh: the userspace vring.
686 * @riov: where to put the readable descriptors (or NULL)
687 * @wiov: where to put the writable descriptors (or NULL)
688 * @getrange: function to call to check ranges.
689 * @head: head index we received, for passing to vringh_complete_user().
690 *
691 * Returns 0 if there was no descriptor, 1 if there was, or -errno.
692 *
693 * Note that on error return, you can tell the difference between an
694 * invalid ring and a single invalid descriptor: in the former case,
695 * *head will be vrh->vring.num. You may be able to ignore an invalid
696 * descriptor, but there's not much you can do with an invalid ring.
697 *
698 * Note that you can reuse riov and wiov with subsequent calls. Content is
699 * overwritten and memory reallocated if more space is needed.
700 * When you don't have to use riov and wiov anymore, you should clean up them
701 * calling vringh_iov_cleanup() to release the memory, even on error!
702 */
vringh_getdesc_user(struct vringh * vrh,struct vringh_iov * riov,struct vringh_iov * wiov,bool (* getrange)(struct vringh * vrh,u64 addr,struct vringh_range * r),u16 * head)703 int vringh_getdesc_user(struct vringh *vrh,
704 struct vringh_iov *riov,
705 struct vringh_iov *wiov,
706 bool (*getrange)(struct vringh *vrh,
707 u64 addr, struct vringh_range *r),
708 u16 *head)
709 {
710 int err;
711
712 *head = vrh->vring.num;
713 err = __vringh_get_head(vrh, getu16_user, &vrh->last_avail_idx);
714 if (err < 0)
715 return err;
716
717 /* Empty... */
718 if (err == vrh->vring.num)
719 return 0;
720
721 /* We need the layouts to be the identical for this to work */
722 BUILD_BUG_ON(sizeof(struct vringh_kiov) != sizeof(struct vringh_iov));
723 BUILD_BUG_ON(offsetof(struct vringh_kiov, iov) !=
724 offsetof(struct vringh_iov, iov));
725 BUILD_BUG_ON(offsetof(struct vringh_kiov, i) !=
726 offsetof(struct vringh_iov, i));
727 BUILD_BUG_ON(offsetof(struct vringh_kiov, used) !=
728 offsetof(struct vringh_iov, used));
729 BUILD_BUG_ON(offsetof(struct vringh_kiov, max_num) !=
730 offsetof(struct vringh_iov, max_num));
731 BUILD_BUG_ON(sizeof(struct iovec) != sizeof(struct kvec));
732 BUILD_BUG_ON(offsetof(struct iovec, iov_base) !=
733 offsetof(struct kvec, iov_base));
734 BUILD_BUG_ON(offsetof(struct iovec, iov_len) !=
735 offsetof(struct kvec, iov_len));
736 BUILD_BUG_ON(sizeof(((struct iovec *)NULL)->iov_base)
737 != sizeof(((struct kvec *)NULL)->iov_base));
738 BUILD_BUG_ON(sizeof(((struct iovec *)NULL)->iov_len)
739 != sizeof(((struct kvec *)NULL)->iov_len));
740
741 *head = err;
742 err = __vringh_iov(vrh, *head, (struct vringh_kiov *)riov,
743 (struct vringh_kiov *)wiov,
744 range_check, getrange, GFP_KERNEL, copydesc_user);
745 if (err)
746 return err;
747
748 return 1;
749 }
750 EXPORT_SYMBOL(vringh_getdesc_user);
751
752 /**
753 * vringh_iov_pull_user - copy bytes from vring_iov.
754 * @riov: the riov as passed to vringh_getdesc_user() (updated as we consume)
755 * @dst: the place to copy.
756 * @len: the maximum length to copy.
757 *
758 * Returns the bytes copied <= len or a negative errno.
759 */
vringh_iov_pull_user(struct vringh_iov * riov,void * dst,size_t len)760 ssize_t vringh_iov_pull_user(struct vringh_iov *riov, void *dst, size_t len)
761 {
762 return vringh_iov_xfer(NULL, (struct vringh_kiov *)riov,
763 dst, len, xfer_from_user);
764 }
765 EXPORT_SYMBOL(vringh_iov_pull_user);
766
767 /**
768 * vringh_iov_push_user - copy bytes into vring_iov.
769 * @wiov: the wiov as passed to vringh_getdesc_user() (updated as we consume)
770 * @src: the place to copy from.
771 * @len: the maximum length to copy.
772 *
773 * Returns the bytes copied <= len or a negative errno.
774 */
vringh_iov_push_user(struct vringh_iov * wiov,const void * src,size_t len)775 ssize_t vringh_iov_push_user(struct vringh_iov *wiov,
776 const void *src, size_t len)
777 {
778 return vringh_iov_xfer(NULL, (struct vringh_kiov *)wiov,
779 (void *)src, len, xfer_to_user);
780 }
781 EXPORT_SYMBOL(vringh_iov_push_user);
782
783 /**
784 * vringh_abandon_user - we've decided not to handle the descriptor(s).
785 * @vrh: the vring.
786 * @num: the number of descriptors to put back (ie. num
787 * vringh_get_user() to undo).
788 *
789 * The next vringh_get_user() will return the old descriptor(s) again.
790 */
vringh_abandon_user(struct vringh * vrh,unsigned int num)791 void vringh_abandon_user(struct vringh *vrh, unsigned int num)
792 {
793 /* We only update vring_avail_event(vr) when we want to be notified,
794 * so we haven't changed that yet. */
795 vrh->last_avail_idx -= num;
796 }
797 EXPORT_SYMBOL(vringh_abandon_user);
798
799 /**
800 * vringh_complete_user - we've finished with descriptor, publish it.
801 * @vrh: the vring.
802 * @head: the head as filled in by vringh_getdesc_user.
803 * @len: the length of data we have written.
804 *
805 * You should check vringh_need_notify_user() after one or more calls
806 * to this function.
807 */
vringh_complete_user(struct vringh * vrh,u16 head,u32 len)808 int vringh_complete_user(struct vringh *vrh, u16 head, u32 len)
809 {
810 struct vring_used_elem used;
811
812 used.id = cpu_to_vringh32(vrh, head);
813 used.len = cpu_to_vringh32(vrh, len);
814 return __vringh_complete(vrh, &used, 1, putu16_user, putused_user);
815 }
816 EXPORT_SYMBOL(vringh_complete_user);
817
818 /**
819 * vringh_complete_multi_user - we've finished with many descriptors.
820 * @vrh: the vring.
821 * @used: the head, length pairs.
822 * @num_used: the number of used elements.
823 *
824 * You should check vringh_need_notify_user() after one or more calls
825 * to this function.
826 */
vringh_complete_multi_user(struct vringh * vrh,const struct vring_used_elem used[],unsigned num_used)827 int vringh_complete_multi_user(struct vringh *vrh,
828 const struct vring_used_elem used[],
829 unsigned num_used)
830 {
831 return __vringh_complete(vrh, used, num_used,
832 putu16_user, putused_user);
833 }
834 EXPORT_SYMBOL(vringh_complete_multi_user);
835
836 /**
837 * vringh_notify_enable_user - we want to know if something changes.
838 * @vrh: the vring.
839 *
840 * This always enables notifications, but returns false if there are
841 * now more buffers available in the vring.
842 */
vringh_notify_enable_user(struct vringh * vrh)843 bool vringh_notify_enable_user(struct vringh *vrh)
844 {
845 return __vringh_notify_enable(vrh, getu16_user, putu16_user);
846 }
847 EXPORT_SYMBOL(vringh_notify_enable_user);
848
849 /**
850 * vringh_notify_disable_user - don't tell us if something changes.
851 * @vrh: the vring.
852 *
853 * This is our normal running state: we disable and then only enable when
854 * we're going to sleep.
855 */
vringh_notify_disable_user(struct vringh * vrh)856 void vringh_notify_disable_user(struct vringh *vrh)
857 {
858 __vringh_notify_disable(vrh, putu16_user);
859 }
860 EXPORT_SYMBOL(vringh_notify_disable_user);
861
862 /**
863 * vringh_need_notify_user - must we tell the other side about used buffers?
864 * @vrh: the vring we've called vringh_complete_user() on.
865 *
866 * Returns -errno or 0 if we don't need to tell the other side, 1 if we do.
867 */
vringh_need_notify_user(struct vringh * vrh)868 int vringh_need_notify_user(struct vringh *vrh)
869 {
870 return __vringh_need_notify(vrh, getu16_user);
871 }
872 EXPORT_SYMBOL(vringh_need_notify_user);
873
874 /* Kernelspace access helpers. */
getu16_kern(const struct vringh * vrh,u16 * val,const __virtio16 * p)875 static inline int getu16_kern(const struct vringh *vrh,
876 u16 *val, const __virtio16 *p)
877 {
878 *val = vringh16_to_cpu(vrh, READ_ONCE(*p));
879 return 0;
880 }
881
putu16_kern(const struct vringh * vrh,__virtio16 * p,u16 val)882 static inline int putu16_kern(const struct vringh *vrh, __virtio16 *p, u16 val)
883 {
884 WRITE_ONCE(*p, cpu_to_vringh16(vrh, val));
885 return 0;
886 }
887
copydesc_kern(const struct vringh * vrh,void * dst,const void * src,size_t len)888 static inline int copydesc_kern(const struct vringh *vrh,
889 void *dst, const void *src, size_t len)
890 {
891 memcpy(dst, src, len);
892 return 0;
893 }
894
putused_kern(const struct vringh * vrh,struct vring_used_elem * dst,const struct vring_used_elem * src,unsigned int num)895 static inline int putused_kern(const struct vringh *vrh,
896 struct vring_used_elem *dst,
897 const struct vring_used_elem *src,
898 unsigned int num)
899 {
900 memcpy(dst, src, num * sizeof(*dst));
901 return 0;
902 }
903
xfer_kern(const struct vringh * vrh,void * src,void * dst,size_t len)904 static inline int xfer_kern(const struct vringh *vrh, void *src,
905 void *dst, size_t len)
906 {
907 memcpy(dst, src, len);
908 return 0;
909 }
910
kern_xfer(const struct vringh * vrh,void * dst,void * src,size_t len)911 static inline int kern_xfer(const struct vringh *vrh, void *dst,
912 void *src, size_t len)
913 {
914 memcpy(dst, src, len);
915 return 0;
916 }
917
918 /**
919 * vringh_init_kern - initialize a vringh for a kernelspace vring.
920 * @vrh: the vringh to initialize.
921 * @features: the feature bits for this ring.
922 * @num: the number of elements.
923 * @weak_barriers: true if we only need memory barriers, not I/O.
924 * @desc: the userspace descriptor pointer.
925 * @avail: the userspace avail pointer.
926 * @used: the userspace used pointer.
927 *
928 * Returns an error if num is invalid.
929 */
vringh_init_kern(struct vringh * vrh,u64 features,unsigned int num,bool weak_barriers,struct vring_desc * desc,struct vring_avail * avail,struct vring_used * used)930 int vringh_init_kern(struct vringh *vrh, u64 features,
931 unsigned int num, bool weak_barriers,
932 struct vring_desc *desc,
933 struct vring_avail *avail,
934 struct vring_used *used)
935 {
936 /* Sane power of 2 please! */
937 if (!num || num > 0xffff || (num & (num - 1))) {
938 vringh_bad("Bad ring size %u", num);
939 return -EINVAL;
940 }
941
942 vrh->little_endian = (features & (1ULL << VIRTIO_F_VERSION_1));
943 vrh->event_indices = (features & (1 << VIRTIO_RING_F_EVENT_IDX));
944 vrh->weak_barriers = weak_barriers;
945 vrh->completed = 0;
946 vrh->last_avail_idx = 0;
947 vrh->last_used_idx = 0;
948 vrh->vring.num = num;
949 vrh->vring.desc = desc;
950 vrh->vring.avail = avail;
951 vrh->vring.used = used;
952 return 0;
953 }
954 EXPORT_SYMBOL(vringh_init_kern);
955
956 /**
957 * vringh_getdesc_kern - get next available descriptor from kernelspace ring.
958 * @vrh: the kernelspace vring.
959 * @riov: where to put the readable descriptors (or NULL)
960 * @wiov: where to put the writable descriptors (or NULL)
961 * @head: head index we received, for passing to vringh_complete_kern().
962 * @gfp: flags for allocating larger riov/wiov.
963 *
964 * Returns 0 if there was no descriptor, 1 if there was, or -errno.
965 *
966 * Note that on error return, you can tell the difference between an
967 * invalid ring and a single invalid descriptor: in the former case,
968 * *head will be vrh->vring.num. You may be able to ignore an invalid
969 * descriptor, but there's not much you can do with an invalid ring.
970 *
971 * Note that you can reuse riov and wiov with subsequent calls. Content is
972 * overwritten and memory reallocated if more space is needed.
973 * When you don't have to use riov and wiov anymore, you should clean up them
974 * calling vringh_kiov_cleanup() to release the memory, even on error!
975 */
vringh_getdesc_kern(struct vringh * vrh,struct vringh_kiov * riov,struct vringh_kiov * wiov,u16 * head,gfp_t gfp)976 int vringh_getdesc_kern(struct vringh *vrh,
977 struct vringh_kiov *riov,
978 struct vringh_kiov *wiov,
979 u16 *head,
980 gfp_t gfp)
981 {
982 int err;
983
984 err = __vringh_get_head(vrh, getu16_kern, &vrh->last_avail_idx);
985 if (err < 0)
986 return err;
987
988 /* Empty... */
989 if (err == vrh->vring.num)
990 return 0;
991
992 *head = err;
993 err = __vringh_iov(vrh, *head, riov, wiov, no_range_check, NULL,
994 gfp, copydesc_kern);
995 if (err)
996 return err;
997
998 return 1;
999 }
1000 EXPORT_SYMBOL(vringh_getdesc_kern);
1001
1002 /**
1003 * vringh_iov_pull_kern - copy bytes from vring_iov.
1004 * @riov: the riov as passed to vringh_getdesc_kern() (updated as we consume)
1005 * @dst: the place to copy.
1006 * @len: the maximum length to copy.
1007 *
1008 * Returns the bytes copied <= len or a negative errno.
1009 */
vringh_iov_pull_kern(struct vringh_kiov * riov,void * dst,size_t len)1010 ssize_t vringh_iov_pull_kern(struct vringh_kiov *riov, void *dst, size_t len)
1011 {
1012 return vringh_iov_xfer(NULL, riov, dst, len, xfer_kern);
1013 }
1014 EXPORT_SYMBOL(vringh_iov_pull_kern);
1015
1016 /**
1017 * vringh_iov_push_kern - copy bytes into vring_iov.
1018 * @wiov: the wiov as passed to vringh_getdesc_kern() (updated as we consume)
1019 * @src: the place to copy from.
1020 * @len: the maximum length to copy.
1021 *
1022 * Returns the bytes copied <= len or a negative errno.
1023 */
vringh_iov_push_kern(struct vringh_kiov * wiov,const void * src,size_t len)1024 ssize_t vringh_iov_push_kern(struct vringh_kiov *wiov,
1025 const void *src, size_t len)
1026 {
1027 return vringh_iov_xfer(NULL, wiov, (void *)src, len, kern_xfer);
1028 }
1029 EXPORT_SYMBOL(vringh_iov_push_kern);
1030
1031 /**
1032 * vringh_abandon_kern - we've decided not to handle the descriptor(s).
1033 * @vrh: the vring.
1034 * @num: the number of descriptors to put back (ie. num
1035 * vringh_get_kern() to undo).
1036 *
1037 * The next vringh_get_kern() will return the old descriptor(s) again.
1038 */
vringh_abandon_kern(struct vringh * vrh,unsigned int num)1039 void vringh_abandon_kern(struct vringh *vrh, unsigned int num)
1040 {
1041 /* We only update vring_avail_event(vr) when we want to be notified,
1042 * so we haven't changed that yet. */
1043 vrh->last_avail_idx -= num;
1044 }
1045 EXPORT_SYMBOL(vringh_abandon_kern);
1046
1047 /**
1048 * vringh_complete_kern - we've finished with descriptor, publish it.
1049 * @vrh: the vring.
1050 * @head: the head as filled in by vringh_getdesc_kern.
1051 * @len: the length of data we have written.
1052 *
1053 * You should check vringh_need_notify_kern() after one or more calls
1054 * to this function.
1055 */
vringh_complete_kern(struct vringh * vrh,u16 head,u32 len)1056 int vringh_complete_kern(struct vringh *vrh, u16 head, u32 len)
1057 {
1058 struct vring_used_elem used;
1059
1060 used.id = cpu_to_vringh32(vrh, head);
1061 used.len = cpu_to_vringh32(vrh, len);
1062
1063 return __vringh_complete(vrh, &used, 1, putu16_kern, putused_kern);
1064 }
1065 EXPORT_SYMBOL(vringh_complete_kern);
1066
1067 /**
1068 * vringh_notify_enable_kern - we want to know if something changes.
1069 * @vrh: the vring.
1070 *
1071 * This always enables notifications, but returns false if there are
1072 * now more buffers available in the vring.
1073 */
vringh_notify_enable_kern(struct vringh * vrh)1074 bool vringh_notify_enable_kern(struct vringh *vrh)
1075 {
1076 return __vringh_notify_enable(vrh, getu16_kern, putu16_kern);
1077 }
1078 EXPORT_SYMBOL(vringh_notify_enable_kern);
1079
1080 /**
1081 * vringh_notify_disable_kern - don't tell us if something changes.
1082 * @vrh: the vring.
1083 *
1084 * This is our normal running state: we disable and then only enable when
1085 * we're going to sleep.
1086 */
vringh_notify_disable_kern(struct vringh * vrh)1087 void vringh_notify_disable_kern(struct vringh *vrh)
1088 {
1089 __vringh_notify_disable(vrh, putu16_kern);
1090 }
1091 EXPORT_SYMBOL(vringh_notify_disable_kern);
1092
1093 /**
1094 * vringh_need_notify_kern - must we tell the other side about used buffers?
1095 * @vrh: the vring we've called vringh_complete_kern() on.
1096 *
1097 * Returns -errno or 0 if we don't need to tell the other side, 1 if we do.
1098 */
vringh_need_notify_kern(struct vringh * vrh)1099 int vringh_need_notify_kern(struct vringh *vrh)
1100 {
1101 return __vringh_need_notify(vrh, getu16_kern);
1102 }
1103 EXPORT_SYMBOL(vringh_need_notify_kern);
1104
1105 #if IS_REACHABLE(CONFIG_VHOST_IOTLB)
1106
1107 struct iotlb_vec {
1108 union {
1109 struct iovec *iovec;
1110 struct bio_vec *bvec;
1111 } iov;
1112 size_t count;
1113 };
1114
iotlb_translate(const struct vringh * vrh,u64 addr,u64 len,u64 * translated,struct iotlb_vec * ivec,u32 perm)1115 static int iotlb_translate(const struct vringh *vrh,
1116 u64 addr, u64 len, u64 *translated,
1117 struct iotlb_vec *ivec, u32 perm)
1118 {
1119 struct vhost_iotlb_map *map;
1120 struct vhost_iotlb *iotlb = vrh->iotlb;
1121 int ret = 0;
1122 u64 s = 0, last = addr + len - 1;
1123
1124 spin_lock(vrh->iotlb_lock);
1125
1126 while (len > s) {
1127 uintptr_t io_addr;
1128 size_t io_len;
1129 u64 size;
1130
1131 if (unlikely(ret >= ivec->count)) {
1132 ret = -ENOBUFS;
1133 break;
1134 }
1135
1136 map = vhost_iotlb_itree_first(iotlb, addr, last);
1137 if (!map || map->start > addr) {
1138 ret = -EINVAL;
1139 break;
1140 } else if (!(map->perm & perm)) {
1141 ret = -EPERM;
1142 break;
1143 }
1144
1145 size = map->size - addr + map->start;
1146 io_len = min(len - s, size);
1147 io_addr = map->addr - map->start + addr;
1148
1149 if (vrh->use_va) {
1150 struct iovec *iovec = ivec->iov.iovec;
1151
1152 iovec[ret].iov_len = io_len;
1153 iovec[ret].iov_base = (void __user *)io_addr;
1154 } else {
1155 u64 pfn = io_addr >> PAGE_SHIFT;
1156 struct bio_vec *bvec = ivec->iov.bvec;
1157
1158 bvec_set_page(&bvec[ret], pfn_to_page(pfn), io_len,
1159 io_addr & (PAGE_SIZE - 1));
1160 }
1161
1162 s += size;
1163 addr += size;
1164 ++ret;
1165 }
1166
1167 spin_unlock(vrh->iotlb_lock);
1168
1169 if (translated)
1170 *translated = min(len, s);
1171
1172 return ret;
1173 }
1174
1175 #define IOTLB_IOV_STRIDE 16
1176
copy_from_iotlb(const struct vringh * vrh,void * dst,void * src,size_t len)1177 static inline int copy_from_iotlb(const struct vringh *vrh, void *dst,
1178 void *src, size_t len)
1179 {
1180 struct iotlb_vec ivec;
1181 union {
1182 struct iovec iovec[IOTLB_IOV_STRIDE];
1183 struct bio_vec bvec[IOTLB_IOV_STRIDE];
1184 } iov;
1185 u64 total_translated = 0;
1186
1187 ivec.iov.iovec = iov.iovec;
1188 ivec.count = IOTLB_IOV_STRIDE;
1189
1190 while (total_translated < len) {
1191 struct iov_iter iter;
1192 u64 translated;
1193 int ret;
1194
1195 ret = iotlb_translate(vrh, (u64)(uintptr_t)src,
1196 len - total_translated, &translated,
1197 &ivec, VHOST_MAP_RO);
1198 if (ret == -ENOBUFS)
1199 ret = IOTLB_IOV_STRIDE;
1200 else if (ret < 0)
1201 return ret;
1202
1203 if (vrh->use_va) {
1204 iov_iter_init(&iter, ITER_SOURCE, ivec.iov.iovec, ret,
1205 translated);
1206 } else {
1207 iov_iter_bvec(&iter, ITER_SOURCE, ivec.iov.bvec, ret,
1208 translated);
1209 }
1210
1211 ret = copy_from_iter(dst, translated, &iter);
1212 if (ret < 0)
1213 return ret;
1214
1215 src += translated;
1216 dst += translated;
1217 total_translated += translated;
1218 }
1219
1220 return total_translated;
1221 }
1222
copy_to_iotlb(const struct vringh * vrh,void * dst,void * src,size_t len)1223 static inline int copy_to_iotlb(const struct vringh *vrh, void *dst,
1224 void *src, size_t len)
1225 {
1226 struct iotlb_vec ivec;
1227 union {
1228 struct iovec iovec[IOTLB_IOV_STRIDE];
1229 struct bio_vec bvec[IOTLB_IOV_STRIDE];
1230 } iov;
1231 u64 total_translated = 0;
1232
1233 ivec.iov.iovec = iov.iovec;
1234 ivec.count = IOTLB_IOV_STRIDE;
1235
1236 while (total_translated < len) {
1237 struct iov_iter iter;
1238 u64 translated;
1239 int ret;
1240
1241 ret = iotlb_translate(vrh, (u64)(uintptr_t)dst,
1242 len - total_translated, &translated,
1243 &ivec, VHOST_MAP_WO);
1244 if (ret == -ENOBUFS)
1245 ret = IOTLB_IOV_STRIDE;
1246 else if (ret < 0)
1247 return ret;
1248
1249 if (vrh->use_va) {
1250 iov_iter_init(&iter, ITER_DEST, ivec.iov.iovec, ret,
1251 translated);
1252 } else {
1253 iov_iter_bvec(&iter, ITER_DEST, ivec.iov.bvec, ret,
1254 translated);
1255 }
1256
1257 ret = copy_to_iter(src, translated, &iter);
1258 if (ret < 0)
1259 return ret;
1260
1261 src += translated;
1262 dst += translated;
1263 total_translated += translated;
1264 }
1265
1266 return total_translated;
1267 }
1268
getu16_iotlb(const struct vringh * vrh,u16 * val,const __virtio16 * p)1269 static inline int getu16_iotlb(const struct vringh *vrh,
1270 u16 *val, const __virtio16 *p)
1271 {
1272 struct iotlb_vec ivec;
1273 union {
1274 struct iovec iovec[1];
1275 struct bio_vec bvec[1];
1276 } iov;
1277 __virtio16 tmp;
1278 int ret;
1279
1280 ivec.iov.iovec = iov.iovec;
1281 ivec.count = 1;
1282
1283 /* Atomic read is needed for getu16 */
1284 ret = iotlb_translate(vrh, (u64)(uintptr_t)p, sizeof(*p),
1285 NULL, &ivec, VHOST_MAP_RO);
1286 if (ret < 0)
1287 return ret;
1288
1289 if (vrh->use_va) {
1290 ret = __get_user(tmp, (__virtio16 __user *)ivec.iov.iovec[0].iov_base);
1291 if (ret)
1292 return ret;
1293 } else {
1294 void *kaddr = kmap_local_page(ivec.iov.bvec[0].bv_page);
1295 void *from = kaddr + ivec.iov.bvec[0].bv_offset;
1296
1297 tmp = READ_ONCE(*(__virtio16 *)from);
1298 kunmap_local(kaddr);
1299 }
1300
1301 *val = vringh16_to_cpu(vrh, tmp);
1302
1303 return 0;
1304 }
1305
putu16_iotlb(const struct vringh * vrh,__virtio16 * p,u16 val)1306 static inline int putu16_iotlb(const struct vringh *vrh,
1307 __virtio16 *p, u16 val)
1308 {
1309 struct iotlb_vec ivec;
1310 union {
1311 struct iovec iovec;
1312 struct bio_vec bvec;
1313 } iov;
1314 __virtio16 tmp;
1315 int ret;
1316
1317 ivec.iov.iovec = &iov.iovec;
1318 ivec.count = 1;
1319
1320 /* Atomic write is needed for putu16 */
1321 ret = iotlb_translate(vrh, (u64)(uintptr_t)p, sizeof(*p),
1322 NULL, &ivec, VHOST_MAP_RO);
1323 if (ret < 0)
1324 return ret;
1325
1326 tmp = cpu_to_vringh16(vrh, val);
1327
1328 if (vrh->use_va) {
1329 ret = __put_user(tmp, (__virtio16 __user *)ivec.iov.iovec[0].iov_base);
1330 if (ret)
1331 return ret;
1332 } else {
1333 void *kaddr = kmap_local_page(ivec.iov.bvec[0].bv_page);
1334 void *to = kaddr + ivec.iov.bvec[0].bv_offset;
1335
1336 WRITE_ONCE(*(__virtio16 *)to, tmp);
1337 kunmap_local(kaddr);
1338 }
1339
1340 return 0;
1341 }
1342
copydesc_iotlb(const struct vringh * vrh,void * dst,const void * src,size_t len)1343 static inline int copydesc_iotlb(const struct vringh *vrh,
1344 void *dst, const void *src, size_t len)
1345 {
1346 int ret;
1347
1348 ret = copy_from_iotlb(vrh, dst, (void *)src, len);
1349 if (ret != len)
1350 return -EFAULT;
1351
1352 return 0;
1353 }
1354
xfer_from_iotlb(const struct vringh * vrh,void * src,void * dst,size_t len)1355 static inline int xfer_from_iotlb(const struct vringh *vrh, void *src,
1356 void *dst, size_t len)
1357 {
1358 int ret;
1359
1360 ret = copy_from_iotlb(vrh, dst, src, len);
1361 if (ret != len)
1362 return -EFAULT;
1363
1364 return 0;
1365 }
1366
xfer_to_iotlb(const struct vringh * vrh,void * dst,void * src,size_t len)1367 static inline int xfer_to_iotlb(const struct vringh *vrh,
1368 void *dst, void *src, size_t len)
1369 {
1370 int ret;
1371
1372 ret = copy_to_iotlb(vrh, dst, src, len);
1373 if (ret != len)
1374 return -EFAULT;
1375
1376 return 0;
1377 }
1378
putused_iotlb(const struct vringh * vrh,struct vring_used_elem * dst,const struct vring_used_elem * src,unsigned int num)1379 static inline int putused_iotlb(const struct vringh *vrh,
1380 struct vring_used_elem *dst,
1381 const struct vring_used_elem *src,
1382 unsigned int num)
1383 {
1384 int size = num * sizeof(*dst);
1385 int ret;
1386
1387 ret = copy_to_iotlb(vrh, dst, (void *)src, num * sizeof(*dst));
1388 if (ret != size)
1389 return -EFAULT;
1390
1391 return 0;
1392 }
1393
1394 /**
1395 * vringh_init_iotlb - initialize a vringh for a ring with IOTLB.
1396 * @vrh: the vringh to initialize.
1397 * @features: the feature bits for this ring.
1398 * @num: the number of elements.
1399 * @weak_barriers: true if we only need memory barriers, not I/O.
1400 * @desc: the userspace descriptor pointer.
1401 * @avail: the userspace avail pointer.
1402 * @used: the userspace used pointer.
1403 *
1404 * Returns an error if num is invalid.
1405 */
vringh_init_iotlb(struct vringh * vrh,u64 features,unsigned int num,bool weak_barriers,struct vring_desc * desc,struct vring_avail * avail,struct vring_used * used)1406 int vringh_init_iotlb(struct vringh *vrh, u64 features,
1407 unsigned int num, bool weak_barriers,
1408 struct vring_desc *desc,
1409 struct vring_avail *avail,
1410 struct vring_used *used)
1411 {
1412 vrh->use_va = false;
1413
1414 return vringh_init_kern(vrh, features, num, weak_barriers,
1415 desc, avail, used);
1416 }
1417 EXPORT_SYMBOL(vringh_init_iotlb);
1418
1419 /**
1420 * vringh_init_iotlb_va - initialize a vringh for a ring with IOTLB containing
1421 * user VA.
1422 * @vrh: the vringh to initialize.
1423 * @features: the feature bits for this ring.
1424 * @num: the number of elements.
1425 * @weak_barriers: true if we only need memory barriers, not I/O.
1426 * @desc: the userspace descriptor pointer.
1427 * @avail: the userspace avail pointer.
1428 * @used: the userspace used pointer.
1429 *
1430 * Returns an error if num is invalid.
1431 */
vringh_init_iotlb_va(struct vringh * vrh,u64 features,unsigned int num,bool weak_barriers,struct vring_desc * desc,struct vring_avail * avail,struct vring_used * used)1432 int vringh_init_iotlb_va(struct vringh *vrh, u64 features,
1433 unsigned int num, bool weak_barriers,
1434 struct vring_desc *desc,
1435 struct vring_avail *avail,
1436 struct vring_used *used)
1437 {
1438 vrh->use_va = true;
1439
1440 return vringh_init_kern(vrh, features, num, weak_barriers,
1441 desc, avail, used);
1442 }
1443 EXPORT_SYMBOL(vringh_init_iotlb_va);
1444
1445 /**
1446 * vringh_set_iotlb - initialize a vringh for a ring with IOTLB.
1447 * @vrh: the vring
1448 * @iotlb: iotlb associated with this vring
1449 * @iotlb_lock: spinlock to synchronize the iotlb accesses
1450 */
vringh_set_iotlb(struct vringh * vrh,struct vhost_iotlb * iotlb,spinlock_t * iotlb_lock)1451 void vringh_set_iotlb(struct vringh *vrh, struct vhost_iotlb *iotlb,
1452 spinlock_t *iotlb_lock)
1453 {
1454 vrh->iotlb = iotlb;
1455 vrh->iotlb_lock = iotlb_lock;
1456 }
1457 EXPORT_SYMBOL(vringh_set_iotlb);
1458
1459 /**
1460 * vringh_getdesc_iotlb - get next available descriptor from ring with
1461 * IOTLB.
1462 * @vrh: the kernelspace vring.
1463 * @riov: where to put the readable descriptors (or NULL)
1464 * @wiov: where to put the writable descriptors (or NULL)
1465 * @head: head index we received, for passing to vringh_complete_iotlb().
1466 * @gfp: flags for allocating larger riov/wiov.
1467 *
1468 * Returns 0 if there was no descriptor, 1 if there was, or -errno.
1469 *
1470 * Note that on error return, you can tell the difference between an
1471 * invalid ring and a single invalid descriptor: in the former case,
1472 * *head will be vrh->vring.num. You may be able to ignore an invalid
1473 * descriptor, but there's not much you can do with an invalid ring.
1474 *
1475 * Note that you can reuse riov and wiov with subsequent calls. Content is
1476 * overwritten and memory reallocated if more space is needed.
1477 * When you don't have to use riov and wiov anymore, you should clean up them
1478 * calling vringh_kiov_cleanup() to release the memory, even on error!
1479 */
vringh_getdesc_iotlb(struct vringh * vrh,struct vringh_kiov * riov,struct vringh_kiov * wiov,u16 * head,gfp_t gfp)1480 int vringh_getdesc_iotlb(struct vringh *vrh,
1481 struct vringh_kiov *riov,
1482 struct vringh_kiov *wiov,
1483 u16 *head,
1484 gfp_t gfp)
1485 {
1486 int err;
1487
1488 err = __vringh_get_head(vrh, getu16_iotlb, &vrh->last_avail_idx);
1489 if (err < 0)
1490 return err;
1491
1492 /* Empty... */
1493 if (err == vrh->vring.num)
1494 return 0;
1495
1496 *head = err;
1497 err = __vringh_iov(vrh, *head, riov, wiov, no_range_check, NULL,
1498 gfp, copydesc_iotlb);
1499 if (err)
1500 return err;
1501
1502 return 1;
1503 }
1504 EXPORT_SYMBOL(vringh_getdesc_iotlb);
1505
1506 /**
1507 * vringh_iov_pull_iotlb - copy bytes from vring_iov.
1508 * @vrh: the vring.
1509 * @riov: the riov as passed to vringh_getdesc_iotlb() (updated as we consume)
1510 * @dst: the place to copy.
1511 * @len: the maximum length to copy.
1512 *
1513 * Returns the bytes copied <= len or a negative errno.
1514 */
vringh_iov_pull_iotlb(struct vringh * vrh,struct vringh_kiov * riov,void * dst,size_t len)1515 ssize_t vringh_iov_pull_iotlb(struct vringh *vrh,
1516 struct vringh_kiov *riov,
1517 void *dst, size_t len)
1518 {
1519 return vringh_iov_xfer(vrh, riov, dst, len, xfer_from_iotlb);
1520 }
1521 EXPORT_SYMBOL(vringh_iov_pull_iotlb);
1522
1523 /**
1524 * vringh_iov_push_iotlb - copy bytes into vring_iov.
1525 * @vrh: the vring.
1526 * @wiov: the wiov as passed to vringh_getdesc_iotlb() (updated as we consume)
1527 * @src: the place to copy from.
1528 * @len: the maximum length to copy.
1529 *
1530 * Returns the bytes copied <= len or a negative errno.
1531 */
vringh_iov_push_iotlb(struct vringh * vrh,struct vringh_kiov * wiov,const void * src,size_t len)1532 ssize_t vringh_iov_push_iotlb(struct vringh *vrh,
1533 struct vringh_kiov *wiov,
1534 const void *src, size_t len)
1535 {
1536 return vringh_iov_xfer(vrh, wiov, (void *)src, len, xfer_to_iotlb);
1537 }
1538 EXPORT_SYMBOL(vringh_iov_push_iotlb);
1539
1540 /**
1541 * vringh_abandon_iotlb - we've decided not to handle the descriptor(s).
1542 * @vrh: the vring.
1543 * @num: the number of descriptors to put back (ie. num
1544 * vringh_get_iotlb() to undo).
1545 *
1546 * The next vringh_get_iotlb() will return the old descriptor(s) again.
1547 */
vringh_abandon_iotlb(struct vringh * vrh,unsigned int num)1548 void vringh_abandon_iotlb(struct vringh *vrh, unsigned int num)
1549 {
1550 /* We only update vring_avail_event(vr) when we want to be notified,
1551 * so we haven't changed that yet.
1552 */
1553 vrh->last_avail_idx -= num;
1554 }
1555 EXPORT_SYMBOL(vringh_abandon_iotlb);
1556
1557 /**
1558 * vringh_complete_iotlb - we've finished with descriptor, publish it.
1559 * @vrh: the vring.
1560 * @head: the head as filled in by vringh_getdesc_iotlb.
1561 * @len: the length of data we have written.
1562 *
1563 * You should check vringh_need_notify_iotlb() after one or more calls
1564 * to this function.
1565 */
vringh_complete_iotlb(struct vringh * vrh,u16 head,u32 len)1566 int vringh_complete_iotlb(struct vringh *vrh, u16 head, u32 len)
1567 {
1568 struct vring_used_elem used;
1569
1570 used.id = cpu_to_vringh32(vrh, head);
1571 used.len = cpu_to_vringh32(vrh, len);
1572
1573 return __vringh_complete(vrh, &used, 1, putu16_iotlb, putused_iotlb);
1574 }
1575 EXPORT_SYMBOL(vringh_complete_iotlb);
1576
1577 /**
1578 * vringh_notify_enable_iotlb - we want to know if something changes.
1579 * @vrh: the vring.
1580 *
1581 * This always enables notifications, but returns false if there are
1582 * now more buffers available in the vring.
1583 */
vringh_notify_enable_iotlb(struct vringh * vrh)1584 bool vringh_notify_enable_iotlb(struct vringh *vrh)
1585 {
1586 return __vringh_notify_enable(vrh, getu16_iotlb, putu16_iotlb);
1587 }
1588 EXPORT_SYMBOL(vringh_notify_enable_iotlb);
1589
1590 /**
1591 * vringh_notify_disable_iotlb - don't tell us if something changes.
1592 * @vrh: the vring.
1593 *
1594 * This is our normal running state: we disable and then only enable when
1595 * we're going to sleep.
1596 */
vringh_notify_disable_iotlb(struct vringh * vrh)1597 void vringh_notify_disable_iotlb(struct vringh *vrh)
1598 {
1599 __vringh_notify_disable(vrh, putu16_iotlb);
1600 }
1601 EXPORT_SYMBOL(vringh_notify_disable_iotlb);
1602
1603 /**
1604 * vringh_need_notify_iotlb - must we tell the other side about used buffers?
1605 * @vrh: the vring we've called vringh_complete_iotlb() on.
1606 *
1607 * Returns -errno or 0 if we don't need to tell the other side, 1 if we do.
1608 */
vringh_need_notify_iotlb(struct vringh * vrh)1609 int vringh_need_notify_iotlb(struct vringh *vrh)
1610 {
1611 return __vringh_need_notify(vrh, getu16_iotlb);
1612 }
1613 EXPORT_SYMBOL(vringh_need_notify_iotlb);
1614
1615 #endif
1616
1617 MODULE_LICENSE("GPL");
1618