• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /* Virtio ring implementation.
3  *
4  *  Copyright 2007 Rusty Russell IBM Corporation
5  */
6 #include <linux/virtio.h>
7 #include <linux/virtio_ring.h>
8 #include <linux/virtio_config.h>
9 #include <linux/device.h>
10 #include <linux/slab.h>
11 #include <linux/module.h>
12 #include <linux/hrtimer.h>
13 #include <linux/dma-mapping.h>
14 #include <xen/xen.h>
15 
16 #ifdef DEBUG
17 /* For development, we want to crash whenever the ring is screwed. */
18 #define BAD_RING(_vq, fmt, args...)				\
19 	do {							\
20 		dev_err(&(_vq)->vq.vdev->dev,			\
21 			"%s:"fmt, (_vq)->vq.name, ##args);	\
22 		BUG();						\
23 	} while (0)
24 /* Caller is supposed to guarantee no reentry. */
25 #define START_USE(_vq)						\
26 	do {							\
27 		if ((_vq)->in_use)				\
28 			panic("%s:in_use = %i\n",		\
29 			      (_vq)->vq.name, (_vq)->in_use);	\
30 		(_vq)->in_use = __LINE__;			\
31 	} while (0)
32 #define END_USE(_vq) \
33 	do { BUG_ON(!(_vq)->in_use); (_vq)->in_use = 0; } while(0)
34 #define LAST_ADD_TIME_UPDATE(_vq)				\
35 	do {							\
36 		ktime_t now = ktime_get();			\
37 								\
38 		/* No kick or get, with .1 second between?  Warn. */ \
39 		if ((_vq)->last_add_time_valid)			\
40 			WARN_ON(ktime_to_ms(ktime_sub(now,	\
41 				(_vq)->last_add_time)) > 100);	\
42 		(_vq)->last_add_time = now;			\
43 		(_vq)->last_add_time_valid = true;		\
44 	} while (0)
45 #define LAST_ADD_TIME_CHECK(_vq)				\
46 	do {							\
47 		if ((_vq)->last_add_time_valid) {		\
48 			WARN_ON(ktime_to_ms(ktime_sub(ktime_get(), \
49 				      (_vq)->last_add_time)) > 100); \
50 		}						\
51 	} while (0)
52 #define LAST_ADD_TIME_INVALID(_vq)				\
53 	((_vq)->last_add_time_valid = false)
54 #else
55 #define BAD_RING(_vq, fmt, args...)				\
56 	do {							\
57 		dev_err(&_vq->vq.vdev->dev,			\
58 			"%s:"fmt, (_vq)->vq.name, ##args);	\
59 		(_vq)->broken = true;				\
60 	} while (0)
61 #define START_USE(vq)
62 #define END_USE(vq)
63 #define LAST_ADD_TIME_UPDATE(vq)
64 #define LAST_ADD_TIME_CHECK(vq)
65 #define LAST_ADD_TIME_INVALID(vq)
66 #endif
67 
68 struct vring_desc_state_split {
69 	void *data;			/* Data for callback. */
70 	struct vring_desc *indir_desc;	/* Indirect descriptor, if any. */
71 };
72 
73 struct vring_desc_state_packed {
74 	void *data;			/* Data for callback. */
75 	struct vring_packed_desc *indir_desc; /* Indirect descriptor, if any. */
76 	u16 num;			/* Descriptor list length. */
77 	u16 next;			/* The next desc state in a list. */
78 	u16 last;			/* The last desc state in a list. */
79 };
80 
81 struct vring_desc_extra_packed {
82 	dma_addr_t addr;		/* Buffer DMA addr. */
83 	u32 len;			/* Buffer length. */
84 	u16 flags;			/* Descriptor flags. */
85 };
86 
87 struct vring_virtqueue {
88 	struct virtqueue vq;
89 
90 	/* Is this a packed ring? */
91 	bool packed_ring;
92 
93 	/* Is DMA API used? */
94 	bool use_dma_api;
95 
96 	/* Can we use weak barriers? */
97 	bool weak_barriers;
98 
99 	/* Other side has made a mess, don't try any more. */
100 	bool broken;
101 
102 	/* Host supports indirect buffers */
103 	bool indirect;
104 
105 	/* Host publishes avail event idx */
106 	bool event;
107 
108 	/* Head of free buffer list. */
109 	unsigned int free_head;
110 	/* Number we've added since last sync. */
111 	unsigned int num_added;
112 
113 	/* Last used index we've seen. */
114 	u16 last_used_idx;
115 
116 	union {
117 		/* Available for split ring */
118 		struct {
119 			/* Actual memory layout for this queue. */
120 			struct vring vring;
121 
122 			/* Last written value to avail->flags */
123 			u16 avail_flags_shadow;
124 
125 			/*
126 			 * Last written value to avail->idx in
127 			 * guest byte order.
128 			 */
129 			u16 avail_idx_shadow;
130 
131 			/* Per-descriptor state. */
132 			struct vring_desc_state_split *desc_state;
133 
134 			/* DMA address and size information */
135 			dma_addr_t queue_dma_addr;
136 			size_t queue_size_in_bytes;
137 		} split;
138 
139 		/* Available for packed ring */
140 		struct {
141 			/* Actual memory layout for this queue. */
142 			struct {
143 				unsigned int num;
144 				struct vring_packed_desc *desc;
145 				struct vring_packed_desc_event *driver;
146 				struct vring_packed_desc_event *device;
147 			} vring;
148 
149 			/* Driver ring wrap counter. */
150 			bool avail_wrap_counter;
151 
152 			/* Device ring wrap counter. */
153 			bool used_wrap_counter;
154 
155 			/* Avail used flags. */
156 			u16 avail_used_flags;
157 
158 			/* Index of the next avail descriptor. */
159 			u16 next_avail_idx;
160 
161 			/*
162 			 * Last written value to driver->flags in
163 			 * guest byte order.
164 			 */
165 			u16 event_flags_shadow;
166 
167 			/* Per-descriptor state. */
168 			struct vring_desc_state_packed *desc_state;
169 			struct vring_desc_extra_packed *desc_extra;
170 
171 			/* DMA address and size information */
172 			dma_addr_t ring_dma_addr;
173 			dma_addr_t driver_event_dma_addr;
174 			dma_addr_t device_event_dma_addr;
175 			size_t ring_size_in_bytes;
176 			size_t event_size_in_bytes;
177 		} packed;
178 	};
179 
180 	/* How to notify other side. FIXME: commonalize hcalls! */
181 	bool (*notify)(struct virtqueue *vq);
182 
183 	/* DMA, allocation, and size information */
184 	bool we_own_ring;
185 
186 #ifdef DEBUG
187 	/* They're supposed to lock for us. */
188 	unsigned int in_use;
189 
190 	/* Figure out if their kicks are too delayed. */
191 	bool last_add_time_valid;
192 	ktime_t last_add_time;
193 #endif
194 };
195 
196 
197 /*
198  * Helpers.
199  */
200 
201 #define to_vvq(_vq) container_of(_vq, struct vring_virtqueue, vq)
202 
virtqueue_use_indirect(struct virtqueue * _vq,unsigned int total_sg)203 static inline bool virtqueue_use_indirect(struct virtqueue *_vq,
204 					  unsigned int total_sg)
205 {
206 	struct vring_virtqueue *vq = to_vvq(_vq);
207 
208 	/*
209 	 * If the host supports indirect descriptor tables, and we have multiple
210 	 * buffers, then go indirect. FIXME: tune this threshold
211 	 */
212 	return (vq->indirect && total_sg > 1 && vq->vq.num_free);
213 }
214 
215 /*
216  * Modern virtio devices have feature bits to specify whether they need a
217  * quirk and bypass the IOMMU. If not there, just use the DMA API.
218  *
219  * If there, the interaction between virtio and DMA API is messy.
220  *
221  * On most systems with virtio, physical addresses match bus addresses,
222  * and it doesn't particularly matter whether we use the DMA API.
223  *
224  * On some systems, including Xen and any system with a physical device
225  * that speaks virtio behind a physical IOMMU, we must use the DMA API
226  * for virtio DMA to work at all.
227  *
228  * On other systems, including SPARC and PPC64, virtio-pci devices are
229  * enumerated as though they are behind an IOMMU, but the virtio host
230  * ignores the IOMMU, so we must either pretend that the IOMMU isn't
231  * there or somehow map everything as the identity.
232  *
233  * For the time being, we preserve historic behavior and bypass the DMA
234  * API.
235  *
236  * TODO: install a per-device DMA ops structure that does the right thing
237  * taking into account all the above quirks, and use the DMA API
238  * unconditionally on data path.
239  */
240 
vring_use_dma_api(struct virtio_device * vdev)241 static bool vring_use_dma_api(struct virtio_device *vdev)
242 {
243 	if (!virtio_has_dma_quirk(vdev))
244 		return true;
245 
246 	/* Otherwise, we are left to guess. */
247 	/*
248 	 * In theory, it's possible to have a buggy QEMU-supposed
249 	 * emulated Q35 IOMMU and Xen enabled at the same time.  On
250 	 * such a configuration, virtio has never worked and will
251 	 * not work without an even larger kludge.  Instead, enable
252 	 * the DMA API if we're a Xen guest, which at least allows
253 	 * all of the sensible Xen configurations to work correctly.
254 	 */
255 	if (xen_domain())
256 		return true;
257 
258 	return false;
259 }
260 
virtio_max_dma_size(struct virtio_device * vdev)261 size_t virtio_max_dma_size(struct virtio_device *vdev)
262 {
263 	size_t max_segment_size = SIZE_MAX;
264 
265 	if (vring_use_dma_api(vdev))
266 		max_segment_size = dma_max_mapping_size(vdev->dev.parent);
267 
268 	return max_segment_size;
269 }
270 EXPORT_SYMBOL_GPL(virtio_max_dma_size);
271 
vring_alloc_queue(struct virtio_device * vdev,size_t size,dma_addr_t * dma_handle,gfp_t flag)272 static void *vring_alloc_queue(struct virtio_device *vdev, size_t size,
273 			      dma_addr_t *dma_handle, gfp_t flag)
274 {
275 	if (vring_use_dma_api(vdev)) {
276 		return dma_alloc_coherent(vdev->dev.parent, size,
277 					  dma_handle, flag);
278 	} else {
279 		void *queue = alloc_pages_exact(PAGE_ALIGN(size), flag);
280 
281 		if (queue) {
282 			phys_addr_t phys_addr = virt_to_phys(queue);
283 			*dma_handle = (dma_addr_t)phys_addr;
284 
285 			/*
286 			 * Sanity check: make sure we dind't truncate
287 			 * the address.  The only arches I can find that
288 			 * have 64-bit phys_addr_t but 32-bit dma_addr_t
289 			 * are certain non-highmem MIPS and x86
290 			 * configurations, but these configurations
291 			 * should never allocate physical pages above 32
292 			 * bits, so this is fine.  Just in case, throw a
293 			 * warning and abort if we end up with an
294 			 * unrepresentable address.
295 			 */
296 			if (WARN_ON_ONCE(*dma_handle != phys_addr)) {
297 				free_pages_exact(queue, PAGE_ALIGN(size));
298 				return NULL;
299 			}
300 		}
301 		return queue;
302 	}
303 }
304 
vring_free_queue(struct virtio_device * vdev,size_t size,void * queue,dma_addr_t dma_handle)305 static void vring_free_queue(struct virtio_device *vdev, size_t size,
306 			     void *queue, dma_addr_t dma_handle)
307 {
308 	if (vring_use_dma_api(vdev))
309 		dma_free_coherent(vdev->dev.parent, size, queue, dma_handle);
310 	else
311 		free_pages_exact(queue, PAGE_ALIGN(size));
312 }
313 
314 /*
315  * The DMA ops on various arches are rather gnarly right now, and
316  * making all of the arch DMA ops work on the vring device itself
317  * is a mess.  For now, we use the parent device for DMA ops.
318  */
vring_dma_dev(const struct vring_virtqueue * vq)319 static inline struct device *vring_dma_dev(const struct vring_virtqueue *vq)
320 {
321 	return vq->vq.vdev->dev.parent;
322 }
323 
324 /* Map one sg entry. */
vring_map_one_sg(const struct vring_virtqueue * vq,struct scatterlist * sg,enum dma_data_direction direction)325 static dma_addr_t vring_map_one_sg(const struct vring_virtqueue *vq,
326 				   struct scatterlist *sg,
327 				   enum dma_data_direction direction)
328 {
329 	if (!vq->use_dma_api)
330 		return (dma_addr_t)sg_phys(sg);
331 
332 	/*
333 	 * We can't use dma_map_sg, because we don't use scatterlists in
334 	 * the way it expects (we don't guarantee that the scatterlist
335 	 * will exist for the lifetime of the mapping).
336 	 */
337 	return dma_map_page(vring_dma_dev(vq),
338 			    sg_page(sg), sg->offset, sg->length,
339 			    direction);
340 }
341 
vring_map_single(const struct vring_virtqueue * vq,void * cpu_addr,size_t size,enum dma_data_direction direction)342 static dma_addr_t vring_map_single(const struct vring_virtqueue *vq,
343 				   void *cpu_addr, size_t size,
344 				   enum dma_data_direction direction)
345 {
346 	if (!vq->use_dma_api)
347 		return (dma_addr_t)virt_to_phys(cpu_addr);
348 
349 	return dma_map_single(vring_dma_dev(vq),
350 			      cpu_addr, size, direction);
351 }
352 
vring_mapping_error(const struct vring_virtqueue * vq,dma_addr_t addr)353 static int vring_mapping_error(const struct vring_virtqueue *vq,
354 			       dma_addr_t addr)
355 {
356 	if (!vq->use_dma_api)
357 		return 0;
358 
359 	return dma_mapping_error(vring_dma_dev(vq), addr);
360 }
361 
362 
363 /*
364  * Split ring specific functions - *_split().
365  */
366 
vring_unmap_one_split(const struct vring_virtqueue * vq,struct vring_desc * desc)367 static void vring_unmap_one_split(const struct vring_virtqueue *vq,
368 				  struct vring_desc *desc)
369 {
370 	u16 flags;
371 
372 	if (!vq->use_dma_api)
373 		return;
374 
375 	flags = virtio16_to_cpu(vq->vq.vdev, desc->flags);
376 
377 	if (flags & VRING_DESC_F_INDIRECT) {
378 		dma_unmap_single(vring_dma_dev(vq),
379 				 virtio64_to_cpu(vq->vq.vdev, desc->addr),
380 				 virtio32_to_cpu(vq->vq.vdev, desc->len),
381 				 (flags & VRING_DESC_F_WRITE) ?
382 				 DMA_FROM_DEVICE : DMA_TO_DEVICE);
383 	} else {
384 		dma_unmap_page(vring_dma_dev(vq),
385 			       virtio64_to_cpu(vq->vq.vdev, desc->addr),
386 			       virtio32_to_cpu(vq->vq.vdev, desc->len),
387 			       (flags & VRING_DESC_F_WRITE) ?
388 			       DMA_FROM_DEVICE : DMA_TO_DEVICE);
389 	}
390 }
391 
alloc_indirect_split(struct virtqueue * _vq,unsigned int total_sg,gfp_t gfp)392 static struct vring_desc *alloc_indirect_split(struct virtqueue *_vq,
393 					       unsigned int total_sg,
394 					       gfp_t gfp)
395 {
396 	struct vring_desc *desc;
397 	unsigned int i;
398 
399 	/*
400 	 * We require lowmem mappings for the descriptors because
401 	 * otherwise virt_to_phys will give us bogus addresses in the
402 	 * virtqueue.
403 	 */
404 	gfp &= ~__GFP_HIGHMEM;
405 
406 	desc = kmalloc_array(total_sg, sizeof(struct vring_desc), gfp);
407 	if (!desc)
408 		return NULL;
409 
410 	for (i = 0; i < total_sg; i++)
411 		desc[i].next = cpu_to_virtio16(_vq->vdev, i + 1);
412 	return desc;
413 }
414 
virtqueue_add_split(struct virtqueue * _vq,struct scatterlist * sgs[],unsigned int total_sg,unsigned int out_sgs,unsigned int in_sgs,void * data,void * ctx,gfp_t gfp)415 static inline int virtqueue_add_split(struct virtqueue *_vq,
416 				      struct scatterlist *sgs[],
417 				      unsigned int total_sg,
418 				      unsigned int out_sgs,
419 				      unsigned int in_sgs,
420 				      void *data,
421 				      void *ctx,
422 				      gfp_t gfp)
423 {
424 	struct vring_virtqueue *vq = to_vvq(_vq);
425 	struct scatterlist *sg;
426 	struct vring_desc *desc;
427 	unsigned int i, n, avail, descs_used, prev, err_idx;
428 	int head;
429 	bool indirect;
430 
431 	START_USE(vq);
432 
433 	BUG_ON(data == NULL);
434 	BUG_ON(ctx && vq->indirect);
435 
436 	if (unlikely(vq->broken)) {
437 		END_USE(vq);
438 		return -EIO;
439 	}
440 
441 	LAST_ADD_TIME_UPDATE(vq);
442 
443 	BUG_ON(total_sg == 0);
444 
445 	head = vq->free_head;
446 
447 	if (virtqueue_use_indirect(_vq, total_sg))
448 		desc = alloc_indirect_split(_vq, total_sg, gfp);
449 	else {
450 		desc = NULL;
451 		WARN_ON_ONCE(total_sg > vq->split.vring.num && !vq->indirect);
452 	}
453 
454 	if (desc) {
455 		/* Use a single buffer which doesn't continue */
456 		indirect = true;
457 		/* Set up rest to use this indirect table. */
458 		i = 0;
459 		descs_used = 1;
460 	} else {
461 		indirect = false;
462 		desc = vq->split.vring.desc;
463 		i = head;
464 		descs_used = total_sg;
465 	}
466 
467 	if (vq->vq.num_free < descs_used) {
468 		pr_debug("Can't add buf len %i - avail = %i\n",
469 			 descs_used, vq->vq.num_free);
470 		/* FIXME: for historical reasons, we force a notify here if
471 		 * there are outgoing parts to the buffer.  Presumably the
472 		 * host should service the ring ASAP. */
473 		if (out_sgs)
474 			vq->notify(&vq->vq);
475 		if (indirect)
476 			kfree(desc);
477 		END_USE(vq);
478 		return -ENOSPC;
479 	}
480 
481 	for (n = 0; n < out_sgs; n++) {
482 		for (sg = sgs[n]; sg; sg = sg_next(sg)) {
483 			dma_addr_t addr = vring_map_one_sg(vq, sg, DMA_TO_DEVICE);
484 			if (vring_mapping_error(vq, addr))
485 				goto unmap_release;
486 
487 			desc[i].flags = cpu_to_virtio16(_vq->vdev, VRING_DESC_F_NEXT);
488 			desc[i].addr = cpu_to_virtio64(_vq->vdev, addr);
489 			desc[i].len = cpu_to_virtio32(_vq->vdev, sg->length);
490 			prev = i;
491 			i = virtio16_to_cpu(_vq->vdev, desc[i].next);
492 		}
493 	}
494 	for (; n < (out_sgs + in_sgs); n++) {
495 		for (sg = sgs[n]; sg; sg = sg_next(sg)) {
496 			dma_addr_t addr = vring_map_one_sg(vq, sg, DMA_FROM_DEVICE);
497 			if (vring_mapping_error(vq, addr))
498 				goto unmap_release;
499 
500 			desc[i].flags = cpu_to_virtio16(_vq->vdev, VRING_DESC_F_NEXT | VRING_DESC_F_WRITE);
501 			desc[i].addr = cpu_to_virtio64(_vq->vdev, addr);
502 			desc[i].len = cpu_to_virtio32(_vq->vdev, sg->length);
503 			prev = i;
504 			i = virtio16_to_cpu(_vq->vdev, desc[i].next);
505 		}
506 	}
507 	/* Last one doesn't continue. */
508 	desc[prev].flags &= cpu_to_virtio16(_vq->vdev, ~VRING_DESC_F_NEXT);
509 
510 	if (indirect) {
511 		/* Now that the indirect table is filled in, map it. */
512 		dma_addr_t addr = vring_map_single(
513 			vq, desc, total_sg * sizeof(struct vring_desc),
514 			DMA_TO_DEVICE);
515 		if (vring_mapping_error(vq, addr))
516 			goto unmap_release;
517 
518 		vq->split.vring.desc[head].flags = cpu_to_virtio16(_vq->vdev,
519 				VRING_DESC_F_INDIRECT);
520 		vq->split.vring.desc[head].addr = cpu_to_virtio64(_vq->vdev,
521 				addr);
522 
523 		vq->split.vring.desc[head].len = cpu_to_virtio32(_vq->vdev,
524 				total_sg * sizeof(struct vring_desc));
525 	}
526 
527 	/* We're using some buffers from the free list. */
528 	vq->vq.num_free -= descs_used;
529 
530 	/* Update free pointer */
531 	if (indirect)
532 		vq->free_head = virtio16_to_cpu(_vq->vdev,
533 					vq->split.vring.desc[head].next);
534 	else
535 		vq->free_head = i;
536 
537 	/* Store token and indirect buffer state. */
538 	vq->split.desc_state[head].data = data;
539 	if (indirect)
540 		vq->split.desc_state[head].indir_desc = desc;
541 	else
542 		vq->split.desc_state[head].indir_desc = ctx;
543 
544 	/* Put entry in available array (but don't update avail->idx until they
545 	 * do sync). */
546 	avail = vq->split.avail_idx_shadow & (vq->split.vring.num - 1);
547 	vq->split.vring.avail->ring[avail] = cpu_to_virtio16(_vq->vdev, head);
548 
549 	/* Descriptors and available array need to be set before we expose the
550 	 * new available array entries. */
551 	virtio_wmb(vq->weak_barriers);
552 	vq->split.avail_idx_shadow++;
553 	vq->split.vring.avail->idx = cpu_to_virtio16(_vq->vdev,
554 						vq->split.avail_idx_shadow);
555 	vq->num_added++;
556 
557 	pr_debug("Added buffer head %i to %p\n", head, vq);
558 	END_USE(vq);
559 
560 	/* This is very unlikely, but theoretically possible.  Kick
561 	 * just in case. */
562 	if (unlikely(vq->num_added == (1 << 16) - 1))
563 		virtqueue_kick(_vq);
564 
565 	return 0;
566 
567 unmap_release:
568 	err_idx = i;
569 
570 	if (indirect)
571 		i = 0;
572 	else
573 		i = head;
574 
575 	for (n = 0; n < total_sg; n++) {
576 		if (i == err_idx)
577 			break;
578 		vring_unmap_one_split(vq, &desc[i]);
579 		i = virtio16_to_cpu(_vq->vdev, desc[i].next);
580 	}
581 
582 	if (indirect)
583 		kfree(desc);
584 
585 	END_USE(vq);
586 	return -ENOMEM;
587 }
588 
virtqueue_kick_prepare_split(struct virtqueue * _vq)589 static bool virtqueue_kick_prepare_split(struct virtqueue *_vq)
590 {
591 	struct vring_virtqueue *vq = to_vvq(_vq);
592 	u16 new, old;
593 	bool needs_kick;
594 
595 	START_USE(vq);
596 	/* We need to expose available array entries before checking avail
597 	 * event. */
598 	virtio_mb(vq->weak_barriers);
599 
600 	old = vq->split.avail_idx_shadow - vq->num_added;
601 	new = vq->split.avail_idx_shadow;
602 	vq->num_added = 0;
603 
604 	LAST_ADD_TIME_CHECK(vq);
605 	LAST_ADD_TIME_INVALID(vq);
606 
607 	if (vq->event) {
608 		needs_kick = vring_need_event(virtio16_to_cpu(_vq->vdev,
609 					vring_avail_event(&vq->split.vring)),
610 					      new, old);
611 	} else {
612 		needs_kick = !(vq->split.vring.used->flags &
613 					cpu_to_virtio16(_vq->vdev,
614 						VRING_USED_F_NO_NOTIFY));
615 	}
616 	END_USE(vq);
617 	return needs_kick;
618 }
619 
detach_buf_split(struct vring_virtqueue * vq,unsigned int head,void ** ctx)620 static void detach_buf_split(struct vring_virtqueue *vq, unsigned int head,
621 			     void **ctx)
622 {
623 	unsigned int i, j;
624 	__virtio16 nextflag = cpu_to_virtio16(vq->vq.vdev, VRING_DESC_F_NEXT);
625 
626 	/* Clear data ptr. */
627 	vq->split.desc_state[head].data = NULL;
628 
629 	/* Put back on free list: unmap first-level descriptors and find end */
630 	i = head;
631 
632 	while (vq->split.vring.desc[i].flags & nextflag) {
633 		vring_unmap_one_split(vq, &vq->split.vring.desc[i]);
634 		i = virtio16_to_cpu(vq->vq.vdev, vq->split.vring.desc[i].next);
635 		vq->vq.num_free++;
636 	}
637 
638 	vring_unmap_one_split(vq, &vq->split.vring.desc[i]);
639 	vq->split.vring.desc[i].next = cpu_to_virtio16(vq->vq.vdev,
640 						vq->free_head);
641 	vq->free_head = head;
642 
643 	/* Plus final descriptor */
644 	vq->vq.num_free++;
645 
646 	if (vq->indirect) {
647 		struct vring_desc *indir_desc =
648 				vq->split.desc_state[head].indir_desc;
649 		u32 len;
650 
651 		/* Free the indirect table, if any, now that it's unmapped. */
652 		if (!indir_desc)
653 			return;
654 
655 		len = virtio32_to_cpu(vq->vq.vdev,
656 				vq->split.vring.desc[head].len);
657 
658 		BUG_ON(!(vq->split.vring.desc[head].flags &
659 			 cpu_to_virtio16(vq->vq.vdev, VRING_DESC_F_INDIRECT)));
660 		BUG_ON(len == 0 || len % sizeof(struct vring_desc));
661 
662 		for (j = 0; j < len / sizeof(struct vring_desc); j++)
663 			vring_unmap_one_split(vq, &indir_desc[j]);
664 
665 		kfree(indir_desc);
666 		vq->split.desc_state[head].indir_desc = NULL;
667 	} else if (ctx) {
668 		*ctx = vq->split.desc_state[head].indir_desc;
669 	}
670 }
671 
more_used_split(const struct vring_virtqueue * vq)672 static inline bool more_used_split(const struct vring_virtqueue *vq)
673 {
674 	return vq->last_used_idx != virtio16_to_cpu(vq->vq.vdev,
675 			vq->split.vring.used->idx);
676 }
677 
virtqueue_get_buf_ctx_split(struct virtqueue * _vq,unsigned int * len,void ** ctx)678 static void *virtqueue_get_buf_ctx_split(struct virtqueue *_vq,
679 					 unsigned int *len,
680 					 void **ctx)
681 {
682 	struct vring_virtqueue *vq = to_vvq(_vq);
683 	void *ret;
684 	unsigned int i;
685 	u16 last_used;
686 
687 	START_USE(vq);
688 
689 	if (unlikely(vq->broken)) {
690 		END_USE(vq);
691 		return NULL;
692 	}
693 
694 	if (!more_used_split(vq)) {
695 		pr_debug("No more buffers in queue\n");
696 		END_USE(vq);
697 		return NULL;
698 	}
699 
700 	/* Only get used array entries after they have been exposed by host. */
701 	virtio_rmb(vq->weak_barriers);
702 
703 	last_used = (vq->last_used_idx & (vq->split.vring.num - 1));
704 	i = virtio32_to_cpu(_vq->vdev,
705 			vq->split.vring.used->ring[last_used].id);
706 	*len = virtio32_to_cpu(_vq->vdev,
707 			vq->split.vring.used->ring[last_used].len);
708 
709 	if (unlikely(i >= vq->split.vring.num)) {
710 		BAD_RING(vq, "id %u out of range\n", i);
711 		return NULL;
712 	}
713 	if (unlikely(!vq->split.desc_state[i].data)) {
714 		BAD_RING(vq, "id %u is not a head!\n", i);
715 		return NULL;
716 	}
717 
718 	/* detach_buf_split clears data, so grab it now. */
719 	ret = vq->split.desc_state[i].data;
720 	detach_buf_split(vq, i, ctx);
721 	vq->last_used_idx++;
722 	/* If we expect an interrupt for the next entry, tell host
723 	 * by writing event index and flush out the write before
724 	 * the read in the next get_buf call. */
725 	if (!(vq->split.avail_flags_shadow & VRING_AVAIL_F_NO_INTERRUPT))
726 		virtio_store_mb(vq->weak_barriers,
727 				&vring_used_event(&vq->split.vring),
728 				cpu_to_virtio16(_vq->vdev, vq->last_used_idx));
729 
730 	LAST_ADD_TIME_INVALID(vq);
731 
732 	END_USE(vq);
733 	return ret;
734 }
735 
virtqueue_disable_cb_split(struct virtqueue * _vq)736 static void virtqueue_disable_cb_split(struct virtqueue *_vq)
737 {
738 	struct vring_virtqueue *vq = to_vvq(_vq);
739 
740 	if (!(vq->split.avail_flags_shadow & VRING_AVAIL_F_NO_INTERRUPT)) {
741 		vq->split.avail_flags_shadow |= VRING_AVAIL_F_NO_INTERRUPT;
742 		if (!vq->event)
743 			vq->split.vring.avail->flags =
744 				cpu_to_virtio16(_vq->vdev,
745 						vq->split.avail_flags_shadow);
746 	}
747 }
748 
virtqueue_enable_cb_prepare_split(struct virtqueue * _vq)749 static unsigned virtqueue_enable_cb_prepare_split(struct virtqueue *_vq)
750 {
751 	struct vring_virtqueue *vq = to_vvq(_vq);
752 	u16 last_used_idx;
753 
754 	START_USE(vq);
755 
756 	/* We optimistically turn back on interrupts, then check if there was
757 	 * more to do. */
758 	/* Depending on the VIRTIO_RING_F_EVENT_IDX feature, we need to
759 	 * either clear the flags bit or point the event index at the next
760 	 * entry. Always do both to keep code simple. */
761 	if (vq->split.avail_flags_shadow & VRING_AVAIL_F_NO_INTERRUPT) {
762 		vq->split.avail_flags_shadow &= ~VRING_AVAIL_F_NO_INTERRUPT;
763 		if (!vq->event)
764 			vq->split.vring.avail->flags =
765 				cpu_to_virtio16(_vq->vdev,
766 						vq->split.avail_flags_shadow);
767 	}
768 	vring_used_event(&vq->split.vring) = cpu_to_virtio16(_vq->vdev,
769 			last_used_idx = vq->last_used_idx);
770 	END_USE(vq);
771 	return last_used_idx;
772 }
773 
virtqueue_poll_split(struct virtqueue * _vq,unsigned last_used_idx)774 static bool virtqueue_poll_split(struct virtqueue *_vq, unsigned last_used_idx)
775 {
776 	struct vring_virtqueue *vq = to_vvq(_vq);
777 
778 	return (u16)last_used_idx != virtio16_to_cpu(_vq->vdev,
779 			vq->split.vring.used->idx);
780 }
781 
virtqueue_enable_cb_delayed_split(struct virtqueue * _vq)782 static bool virtqueue_enable_cb_delayed_split(struct virtqueue *_vq)
783 {
784 	struct vring_virtqueue *vq = to_vvq(_vq);
785 	u16 bufs;
786 
787 	START_USE(vq);
788 
789 	/* We optimistically turn back on interrupts, then check if there was
790 	 * more to do. */
791 	/* Depending on the VIRTIO_RING_F_USED_EVENT_IDX feature, we need to
792 	 * either clear the flags bit or point the event index at the next
793 	 * entry. Always update the event index to keep code simple. */
794 	if (vq->split.avail_flags_shadow & VRING_AVAIL_F_NO_INTERRUPT) {
795 		vq->split.avail_flags_shadow &= ~VRING_AVAIL_F_NO_INTERRUPT;
796 		if (!vq->event)
797 			vq->split.vring.avail->flags =
798 				cpu_to_virtio16(_vq->vdev,
799 						vq->split.avail_flags_shadow);
800 	}
801 	/* TODO: tune this threshold */
802 	bufs = (u16)(vq->split.avail_idx_shadow - vq->last_used_idx) * 3 / 4;
803 
804 	virtio_store_mb(vq->weak_barriers,
805 			&vring_used_event(&vq->split.vring),
806 			cpu_to_virtio16(_vq->vdev, vq->last_used_idx + bufs));
807 
808 	if (unlikely((u16)(virtio16_to_cpu(_vq->vdev, vq->split.vring.used->idx)
809 					- vq->last_used_idx) > bufs)) {
810 		END_USE(vq);
811 		return false;
812 	}
813 
814 	END_USE(vq);
815 	return true;
816 }
817 
virtqueue_detach_unused_buf_split(struct virtqueue * _vq)818 static void *virtqueue_detach_unused_buf_split(struct virtqueue *_vq)
819 {
820 	struct vring_virtqueue *vq = to_vvq(_vq);
821 	unsigned int i;
822 	void *buf;
823 
824 	START_USE(vq);
825 
826 	for (i = 0; i < vq->split.vring.num; i++) {
827 		if (!vq->split.desc_state[i].data)
828 			continue;
829 		/* detach_buf_split clears data, so grab it now. */
830 		buf = vq->split.desc_state[i].data;
831 		detach_buf_split(vq, i, NULL);
832 		vq->split.avail_idx_shadow--;
833 		vq->split.vring.avail->idx = cpu_to_virtio16(_vq->vdev,
834 				vq->split.avail_idx_shadow);
835 		END_USE(vq);
836 		return buf;
837 	}
838 	/* That should have freed everything. */
839 	BUG_ON(vq->vq.num_free != vq->split.vring.num);
840 
841 	END_USE(vq);
842 	return NULL;
843 }
844 
vring_create_virtqueue_split(unsigned int index,unsigned int num,unsigned int vring_align,struct virtio_device * vdev,bool weak_barriers,bool may_reduce_num,bool context,bool (* notify)(struct virtqueue *),void (* callback)(struct virtqueue *),const char * name)845 static struct virtqueue *vring_create_virtqueue_split(
846 	unsigned int index,
847 	unsigned int num,
848 	unsigned int vring_align,
849 	struct virtio_device *vdev,
850 	bool weak_barriers,
851 	bool may_reduce_num,
852 	bool context,
853 	bool (*notify)(struct virtqueue *),
854 	void (*callback)(struct virtqueue *),
855 	const char *name)
856 {
857 	struct virtqueue *vq;
858 	void *queue = NULL;
859 	dma_addr_t dma_addr;
860 	size_t queue_size_in_bytes;
861 	struct vring vring;
862 
863 	/* We assume num is a power of 2. */
864 	if (num & (num - 1)) {
865 		dev_warn(&vdev->dev, "Bad virtqueue length %u\n", num);
866 		return NULL;
867 	}
868 
869 	/* TODO: allocate each queue chunk individually */
870 	for (; num && vring_size(num, vring_align) > PAGE_SIZE; num /= 2) {
871 		queue = vring_alloc_queue(vdev, vring_size(num, vring_align),
872 					  &dma_addr,
873 					  GFP_KERNEL|__GFP_NOWARN|__GFP_ZERO);
874 		if (queue)
875 			break;
876 		if (!may_reduce_num)
877 			return NULL;
878 	}
879 
880 	if (!num)
881 		return NULL;
882 
883 	if (!queue) {
884 		/* Try to get a single page. You are my only hope! */
885 		queue = vring_alloc_queue(vdev, vring_size(num, vring_align),
886 					  &dma_addr, GFP_KERNEL|__GFP_ZERO);
887 	}
888 	if (!queue)
889 		return NULL;
890 
891 	queue_size_in_bytes = vring_size(num, vring_align);
892 	vring_init(&vring, num, queue, vring_align);
893 
894 	vq = __vring_new_virtqueue(index, vring, vdev, weak_barriers, context,
895 				   notify, callback, name);
896 	if (!vq) {
897 		vring_free_queue(vdev, queue_size_in_bytes, queue,
898 				 dma_addr);
899 		return NULL;
900 	}
901 
902 	to_vvq(vq)->split.queue_dma_addr = dma_addr;
903 	to_vvq(vq)->split.queue_size_in_bytes = queue_size_in_bytes;
904 	to_vvq(vq)->we_own_ring = true;
905 
906 	return vq;
907 }
908 
909 
910 /*
911  * Packed ring specific functions - *_packed().
912  */
913 
vring_unmap_state_packed(const struct vring_virtqueue * vq,struct vring_desc_extra_packed * state)914 static void vring_unmap_state_packed(const struct vring_virtqueue *vq,
915 				     struct vring_desc_extra_packed *state)
916 {
917 	u16 flags;
918 
919 	if (!vq->use_dma_api)
920 		return;
921 
922 	flags = state->flags;
923 
924 	if (flags & VRING_DESC_F_INDIRECT) {
925 		dma_unmap_single(vring_dma_dev(vq),
926 				 state->addr, state->len,
927 				 (flags & VRING_DESC_F_WRITE) ?
928 				 DMA_FROM_DEVICE : DMA_TO_DEVICE);
929 	} else {
930 		dma_unmap_page(vring_dma_dev(vq),
931 			       state->addr, state->len,
932 			       (flags & VRING_DESC_F_WRITE) ?
933 			       DMA_FROM_DEVICE : DMA_TO_DEVICE);
934 	}
935 }
936 
vring_unmap_desc_packed(const struct vring_virtqueue * vq,struct vring_packed_desc * desc)937 static void vring_unmap_desc_packed(const struct vring_virtqueue *vq,
938 				   struct vring_packed_desc *desc)
939 {
940 	u16 flags;
941 
942 	if (!vq->use_dma_api)
943 		return;
944 
945 	flags = le16_to_cpu(desc->flags);
946 
947 	if (flags & VRING_DESC_F_INDIRECT) {
948 		dma_unmap_single(vring_dma_dev(vq),
949 				 le64_to_cpu(desc->addr),
950 				 le32_to_cpu(desc->len),
951 				 (flags & VRING_DESC_F_WRITE) ?
952 				 DMA_FROM_DEVICE : DMA_TO_DEVICE);
953 	} else {
954 		dma_unmap_page(vring_dma_dev(vq),
955 			       le64_to_cpu(desc->addr),
956 			       le32_to_cpu(desc->len),
957 			       (flags & VRING_DESC_F_WRITE) ?
958 			       DMA_FROM_DEVICE : DMA_TO_DEVICE);
959 	}
960 }
961 
alloc_indirect_packed(unsigned int total_sg,gfp_t gfp)962 static struct vring_packed_desc *alloc_indirect_packed(unsigned int total_sg,
963 						       gfp_t gfp)
964 {
965 	struct vring_packed_desc *desc;
966 
967 	/*
968 	 * We require lowmem mappings for the descriptors because
969 	 * otherwise virt_to_phys will give us bogus addresses in the
970 	 * virtqueue.
971 	 */
972 	gfp &= ~__GFP_HIGHMEM;
973 
974 	desc = kmalloc_array(total_sg, sizeof(struct vring_packed_desc), gfp);
975 
976 	return desc;
977 }
978 
virtqueue_add_indirect_packed(struct vring_virtqueue * vq,struct scatterlist * sgs[],unsigned int total_sg,unsigned int out_sgs,unsigned int in_sgs,void * data,gfp_t gfp)979 static int virtqueue_add_indirect_packed(struct vring_virtqueue *vq,
980 				       struct scatterlist *sgs[],
981 				       unsigned int total_sg,
982 				       unsigned int out_sgs,
983 				       unsigned int in_sgs,
984 				       void *data,
985 				       gfp_t gfp)
986 {
987 	struct vring_packed_desc *desc;
988 	struct scatterlist *sg;
989 	unsigned int i, n, err_idx;
990 	u16 head, id;
991 	dma_addr_t addr;
992 
993 	head = vq->packed.next_avail_idx;
994 	desc = alloc_indirect_packed(total_sg, gfp);
995 	if (!desc)
996 		return -ENOMEM;
997 
998 	if (unlikely(vq->vq.num_free < 1)) {
999 		pr_debug("Can't add buf len 1 - avail = 0\n");
1000 		kfree(desc);
1001 		END_USE(vq);
1002 		return -ENOSPC;
1003 	}
1004 
1005 	i = 0;
1006 	id = vq->free_head;
1007 	BUG_ON(id == vq->packed.vring.num);
1008 
1009 	for (n = 0; n < out_sgs + in_sgs; n++) {
1010 		for (sg = sgs[n]; sg; sg = sg_next(sg)) {
1011 			addr = vring_map_one_sg(vq, sg, n < out_sgs ?
1012 					DMA_TO_DEVICE : DMA_FROM_DEVICE);
1013 			if (vring_mapping_error(vq, addr))
1014 				goto unmap_release;
1015 
1016 			desc[i].flags = cpu_to_le16(n < out_sgs ?
1017 						0 : VRING_DESC_F_WRITE);
1018 			desc[i].addr = cpu_to_le64(addr);
1019 			desc[i].len = cpu_to_le32(sg->length);
1020 			i++;
1021 		}
1022 	}
1023 
1024 	/* Now that the indirect table is filled in, map it. */
1025 	addr = vring_map_single(vq, desc,
1026 			total_sg * sizeof(struct vring_packed_desc),
1027 			DMA_TO_DEVICE);
1028 	if (vring_mapping_error(vq, addr))
1029 		goto unmap_release;
1030 
1031 	vq->packed.vring.desc[head].addr = cpu_to_le64(addr);
1032 	vq->packed.vring.desc[head].len = cpu_to_le32(total_sg *
1033 				sizeof(struct vring_packed_desc));
1034 	vq->packed.vring.desc[head].id = cpu_to_le16(id);
1035 
1036 	if (vq->use_dma_api) {
1037 		vq->packed.desc_extra[id].addr = addr;
1038 		vq->packed.desc_extra[id].len = total_sg *
1039 				sizeof(struct vring_packed_desc);
1040 		vq->packed.desc_extra[id].flags = VRING_DESC_F_INDIRECT |
1041 						  vq->packed.avail_used_flags;
1042 	}
1043 
1044 	/*
1045 	 * A driver MUST NOT make the first descriptor in the list
1046 	 * available before all subsequent descriptors comprising
1047 	 * the list are made available.
1048 	 */
1049 	virtio_wmb(vq->weak_barriers);
1050 	vq->packed.vring.desc[head].flags = cpu_to_le16(VRING_DESC_F_INDIRECT |
1051 						vq->packed.avail_used_flags);
1052 
1053 	/* We're using some buffers from the free list. */
1054 	vq->vq.num_free -= 1;
1055 
1056 	/* Update free pointer */
1057 	n = head + 1;
1058 	if (n >= vq->packed.vring.num) {
1059 		n = 0;
1060 		vq->packed.avail_wrap_counter ^= 1;
1061 		vq->packed.avail_used_flags ^=
1062 				1 << VRING_PACKED_DESC_F_AVAIL |
1063 				1 << VRING_PACKED_DESC_F_USED;
1064 	}
1065 	vq->packed.next_avail_idx = n;
1066 	vq->free_head = vq->packed.desc_state[id].next;
1067 
1068 	/* Store token and indirect buffer state. */
1069 	vq->packed.desc_state[id].num = 1;
1070 	vq->packed.desc_state[id].data = data;
1071 	vq->packed.desc_state[id].indir_desc = desc;
1072 	vq->packed.desc_state[id].last = id;
1073 
1074 	vq->num_added += 1;
1075 
1076 	pr_debug("Added buffer head %i to %p\n", head, vq);
1077 	END_USE(vq);
1078 
1079 	return 0;
1080 
1081 unmap_release:
1082 	err_idx = i;
1083 
1084 	for (i = 0; i < err_idx; i++)
1085 		vring_unmap_desc_packed(vq, &desc[i]);
1086 
1087 	kfree(desc);
1088 
1089 	END_USE(vq);
1090 	return -ENOMEM;
1091 }
1092 
virtqueue_add_packed(struct virtqueue * _vq,struct scatterlist * sgs[],unsigned int total_sg,unsigned int out_sgs,unsigned int in_sgs,void * data,void * ctx,gfp_t gfp)1093 static inline int virtqueue_add_packed(struct virtqueue *_vq,
1094 				       struct scatterlist *sgs[],
1095 				       unsigned int total_sg,
1096 				       unsigned int out_sgs,
1097 				       unsigned int in_sgs,
1098 				       void *data,
1099 				       void *ctx,
1100 				       gfp_t gfp)
1101 {
1102 	struct vring_virtqueue *vq = to_vvq(_vq);
1103 	struct vring_packed_desc *desc;
1104 	struct scatterlist *sg;
1105 	unsigned int i, n, c, descs_used, err_idx;
1106 	__le16 head_flags, flags;
1107 	u16 head, id, prev, curr, avail_used_flags;
1108 	int err;
1109 
1110 	START_USE(vq);
1111 
1112 	BUG_ON(data == NULL);
1113 	BUG_ON(ctx && vq->indirect);
1114 
1115 	if (unlikely(vq->broken)) {
1116 		END_USE(vq);
1117 		return -EIO;
1118 	}
1119 
1120 	LAST_ADD_TIME_UPDATE(vq);
1121 
1122 	BUG_ON(total_sg == 0);
1123 
1124 	if (virtqueue_use_indirect(_vq, total_sg)) {
1125 		err = virtqueue_add_indirect_packed(vq, sgs, total_sg, out_sgs,
1126 						    in_sgs, data, gfp);
1127 		if (err != -ENOMEM) {
1128 			END_USE(vq);
1129 			return err;
1130 		}
1131 
1132 		/* fall back on direct */
1133 	}
1134 
1135 	head = vq->packed.next_avail_idx;
1136 	avail_used_flags = vq->packed.avail_used_flags;
1137 
1138 	WARN_ON_ONCE(total_sg > vq->packed.vring.num && !vq->indirect);
1139 
1140 	desc = vq->packed.vring.desc;
1141 	i = head;
1142 	descs_used = total_sg;
1143 
1144 	if (unlikely(vq->vq.num_free < descs_used)) {
1145 		pr_debug("Can't add buf len %i - avail = %i\n",
1146 			 descs_used, vq->vq.num_free);
1147 		END_USE(vq);
1148 		return -ENOSPC;
1149 	}
1150 
1151 	id = vq->free_head;
1152 	BUG_ON(id == vq->packed.vring.num);
1153 
1154 	curr = id;
1155 	c = 0;
1156 	for (n = 0; n < out_sgs + in_sgs; n++) {
1157 		for (sg = sgs[n]; sg; sg = sg_next(sg)) {
1158 			dma_addr_t addr = vring_map_one_sg(vq, sg, n < out_sgs ?
1159 					DMA_TO_DEVICE : DMA_FROM_DEVICE);
1160 			if (vring_mapping_error(vq, addr))
1161 				goto unmap_release;
1162 
1163 			flags = cpu_to_le16(vq->packed.avail_used_flags |
1164 				    (++c == total_sg ? 0 : VRING_DESC_F_NEXT) |
1165 				    (n < out_sgs ? 0 : VRING_DESC_F_WRITE));
1166 			if (i == head)
1167 				head_flags = flags;
1168 			else
1169 				desc[i].flags = flags;
1170 
1171 			desc[i].addr = cpu_to_le64(addr);
1172 			desc[i].len = cpu_to_le32(sg->length);
1173 			desc[i].id = cpu_to_le16(id);
1174 
1175 			if (unlikely(vq->use_dma_api)) {
1176 				vq->packed.desc_extra[curr].addr = addr;
1177 				vq->packed.desc_extra[curr].len = sg->length;
1178 				vq->packed.desc_extra[curr].flags =
1179 					le16_to_cpu(flags);
1180 			}
1181 			prev = curr;
1182 			curr = vq->packed.desc_state[curr].next;
1183 
1184 			if ((unlikely(++i >= vq->packed.vring.num))) {
1185 				i = 0;
1186 				vq->packed.avail_used_flags ^=
1187 					1 << VRING_PACKED_DESC_F_AVAIL |
1188 					1 << VRING_PACKED_DESC_F_USED;
1189 			}
1190 		}
1191 	}
1192 
1193 	if (i <= head)
1194 		vq->packed.avail_wrap_counter ^= 1;
1195 
1196 	/* We're using some buffers from the free list. */
1197 	vq->vq.num_free -= descs_used;
1198 
1199 	/* Update free pointer */
1200 	vq->packed.next_avail_idx = i;
1201 	vq->free_head = curr;
1202 
1203 	/* Store token. */
1204 	vq->packed.desc_state[id].num = descs_used;
1205 	vq->packed.desc_state[id].data = data;
1206 	vq->packed.desc_state[id].indir_desc = ctx;
1207 	vq->packed.desc_state[id].last = prev;
1208 
1209 	/*
1210 	 * A driver MUST NOT make the first descriptor in the list
1211 	 * available before all subsequent descriptors comprising
1212 	 * the list are made available.
1213 	 */
1214 	virtio_wmb(vq->weak_barriers);
1215 	vq->packed.vring.desc[head].flags = head_flags;
1216 	vq->num_added += descs_used;
1217 
1218 	pr_debug("Added buffer head %i to %p\n", head, vq);
1219 	END_USE(vq);
1220 
1221 	return 0;
1222 
1223 unmap_release:
1224 	err_idx = i;
1225 	i = head;
1226 
1227 	vq->packed.avail_used_flags = avail_used_flags;
1228 
1229 	for (n = 0; n < total_sg; n++) {
1230 		if (i == err_idx)
1231 			break;
1232 		vring_unmap_desc_packed(vq, &desc[i]);
1233 		i++;
1234 		if (i >= vq->packed.vring.num)
1235 			i = 0;
1236 	}
1237 
1238 	END_USE(vq);
1239 	return -EIO;
1240 }
1241 
virtqueue_kick_prepare_packed(struct virtqueue * _vq)1242 static bool virtqueue_kick_prepare_packed(struct virtqueue *_vq)
1243 {
1244 	struct vring_virtqueue *vq = to_vvq(_vq);
1245 	u16 new, old, off_wrap, flags, wrap_counter, event_idx;
1246 	bool needs_kick;
1247 	union {
1248 		struct {
1249 			__le16 off_wrap;
1250 			__le16 flags;
1251 		};
1252 		u32 u32;
1253 	} snapshot;
1254 
1255 	START_USE(vq);
1256 
1257 	/*
1258 	 * We need to expose the new flags value before checking notification
1259 	 * suppressions.
1260 	 */
1261 	virtio_mb(vq->weak_barriers);
1262 
1263 	old = vq->packed.next_avail_idx - vq->num_added;
1264 	new = vq->packed.next_avail_idx;
1265 	vq->num_added = 0;
1266 
1267 	snapshot.u32 = *(u32 *)vq->packed.vring.device;
1268 	flags = le16_to_cpu(snapshot.flags);
1269 
1270 	LAST_ADD_TIME_CHECK(vq);
1271 	LAST_ADD_TIME_INVALID(vq);
1272 
1273 	if (flags != VRING_PACKED_EVENT_FLAG_DESC) {
1274 		needs_kick = (flags != VRING_PACKED_EVENT_FLAG_DISABLE);
1275 		goto out;
1276 	}
1277 
1278 	off_wrap = le16_to_cpu(snapshot.off_wrap);
1279 
1280 	wrap_counter = off_wrap >> VRING_PACKED_EVENT_F_WRAP_CTR;
1281 	event_idx = off_wrap & ~(1 << VRING_PACKED_EVENT_F_WRAP_CTR);
1282 	if (wrap_counter != vq->packed.avail_wrap_counter)
1283 		event_idx -= vq->packed.vring.num;
1284 
1285 	needs_kick = vring_need_event(event_idx, new, old);
1286 out:
1287 	END_USE(vq);
1288 	return needs_kick;
1289 }
1290 
detach_buf_packed(struct vring_virtqueue * vq,unsigned int id,void ** ctx)1291 static void detach_buf_packed(struct vring_virtqueue *vq,
1292 			      unsigned int id, void **ctx)
1293 {
1294 	struct vring_desc_state_packed *state = NULL;
1295 	struct vring_packed_desc *desc;
1296 	unsigned int i, curr;
1297 
1298 	state = &vq->packed.desc_state[id];
1299 
1300 	/* Clear data ptr. */
1301 	state->data = NULL;
1302 
1303 	vq->packed.desc_state[state->last].next = vq->free_head;
1304 	vq->free_head = id;
1305 	vq->vq.num_free += state->num;
1306 
1307 	if (unlikely(vq->use_dma_api)) {
1308 		curr = id;
1309 		for (i = 0; i < state->num; i++) {
1310 			vring_unmap_state_packed(vq,
1311 				&vq->packed.desc_extra[curr]);
1312 			curr = vq->packed.desc_state[curr].next;
1313 		}
1314 	}
1315 
1316 	if (vq->indirect) {
1317 		u32 len;
1318 
1319 		/* Free the indirect table, if any, now that it's unmapped. */
1320 		desc = state->indir_desc;
1321 		if (!desc)
1322 			return;
1323 
1324 		if (vq->use_dma_api) {
1325 			len = vq->packed.desc_extra[id].len;
1326 			for (i = 0; i < len / sizeof(struct vring_packed_desc);
1327 					i++)
1328 				vring_unmap_desc_packed(vq, &desc[i]);
1329 		}
1330 		kfree(desc);
1331 		state->indir_desc = NULL;
1332 	} else if (ctx) {
1333 		*ctx = state->indir_desc;
1334 	}
1335 }
1336 
is_used_desc_packed(const struct vring_virtqueue * vq,u16 idx,bool used_wrap_counter)1337 static inline bool is_used_desc_packed(const struct vring_virtqueue *vq,
1338 				       u16 idx, bool used_wrap_counter)
1339 {
1340 	bool avail, used;
1341 	u16 flags;
1342 
1343 	flags = le16_to_cpu(vq->packed.vring.desc[idx].flags);
1344 	avail = !!(flags & (1 << VRING_PACKED_DESC_F_AVAIL));
1345 	used = !!(flags & (1 << VRING_PACKED_DESC_F_USED));
1346 
1347 	return avail == used && used == used_wrap_counter;
1348 }
1349 
more_used_packed(const struct vring_virtqueue * vq)1350 static inline bool more_used_packed(const struct vring_virtqueue *vq)
1351 {
1352 	return is_used_desc_packed(vq, vq->last_used_idx,
1353 			vq->packed.used_wrap_counter);
1354 }
1355 
virtqueue_get_buf_ctx_packed(struct virtqueue * _vq,unsigned int * len,void ** ctx)1356 static void *virtqueue_get_buf_ctx_packed(struct virtqueue *_vq,
1357 					  unsigned int *len,
1358 					  void **ctx)
1359 {
1360 	struct vring_virtqueue *vq = to_vvq(_vq);
1361 	u16 last_used, id;
1362 	void *ret;
1363 
1364 	START_USE(vq);
1365 
1366 	if (unlikely(vq->broken)) {
1367 		END_USE(vq);
1368 		return NULL;
1369 	}
1370 
1371 	if (!more_used_packed(vq)) {
1372 		pr_debug("No more buffers in queue\n");
1373 		END_USE(vq);
1374 		return NULL;
1375 	}
1376 
1377 	/* Only get used elements after they have been exposed by host. */
1378 	virtio_rmb(vq->weak_barriers);
1379 
1380 	last_used = vq->last_used_idx;
1381 	id = le16_to_cpu(vq->packed.vring.desc[last_used].id);
1382 	*len = le32_to_cpu(vq->packed.vring.desc[last_used].len);
1383 
1384 	if (unlikely(id >= vq->packed.vring.num)) {
1385 		BAD_RING(vq, "id %u out of range\n", id);
1386 		return NULL;
1387 	}
1388 	if (unlikely(!vq->packed.desc_state[id].data)) {
1389 		BAD_RING(vq, "id %u is not a head!\n", id);
1390 		return NULL;
1391 	}
1392 
1393 	/* detach_buf_packed clears data, so grab it now. */
1394 	ret = vq->packed.desc_state[id].data;
1395 	detach_buf_packed(vq, id, ctx);
1396 
1397 	vq->last_used_idx += vq->packed.desc_state[id].num;
1398 	if (unlikely(vq->last_used_idx >= vq->packed.vring.num)) {
1399 		vq->last_used_idx -= vq->packed.vring.num;
1400 		vq->packed.used_wrap_counter ^= 1;
1401 	}
1402 
1403 	/*
1404 	 * If we expect an interrupt for the next entry, tell host
1405 	 * by writing event index and flush out the write before
1406 	 * the read in the next get_buf call.
1407 	 */
1408 	if (vq->packed.event_flags_shadow == VRING_PACKED_EVENT_FLAG_DESC)
1409 		virtio_store_mb(vq->weak_barriers,
1410 				&vq->packed.vring.driver->off_wrap,
1411 				cpu_to_le16(vq->last_used_idx |
1412 					(vq->packed.used_wrap_counter <<
1413 					 VRING_PACKED_EVENT_F_WRAP_CTR)));
1414 
1415 	LAST_ADD_TIME_INVALID(vq);
1416 
1417 	END_USE(vq);
1418 	return ret;
1419 }
1420 
virtqueue_disable_cb_packed(struct virtqueue * _vq)1421 static void virtqueue_disable_cb_packed(struct virtqueue *_vq)
1422 {
1423 	struct vring_virtqueue *vq = to_vvq(_vq);
1424 
1425 	if (vq->packed.event_flags_shadow != VRING_PACKED_EVENT_FLAG_DISABLE) {
1426 		vq->packed.event_flags_shadow = VRING_PACKED_EVENT_FLAG_DISABLE;
1427 		vq->packed.vring.driver->flags =
1428 			cpu_to_le16(vq->packed.event_flags_shadow);
1429 	}
1430 }
1431 
virtqueue_enable_cb_prepare_packed(struct virtqueue * _vq)1432 static unsigned virtqueue_enable_cb_prepare_packed(struct virtqueue *_vq)
1433 {
1434 	struct vring_virtqueue *vq = to_vvq(_vq);
1435 
1436 	START_USE(vq);
1437 
1438 	/*
1439 	 * We optimistically turn back on interrupts, then check if there was
1440 	 * more to do.
1441 	 */
1442 
1443 	if (vq->event) {
1444 		vq->packed.vring.driver->off_wrap =
1445 			cpu_to_le16(vq->last_used_idx |
1446 				(vq->packed.used_wrap_counter <<
1447 				 VRING_PACKED_EVENT_F_WRAP_CTR));
1448 		/*
1449 		 * We need to update event offset and event wrap
1450 		 * counter first before updating event flags.
1451 		 */
1452 		virtio_wmb(vq->weak_barriers);
1453 	}
1454 
1455 	if (vq->packed.event_flags_shadow == VRING_PACKED_EVENT_FLAG_DISABLE) {
1456 		vq->packed.event_flags_shadow = vq->event ?
1457 				VRING_PACKED_EVENT_FLAG_DESC :
1458 				VRING_PACKED_EVENT_FLAG_ENABLE;
1459 		vq->packed.vring.driver->flags =
1460 				cpu_to_le16(vq->packed.event_flags_shadow);
1461 	}
1462 
1463 	END_USE(vq);
1464 	return vq->last_used_idx | ((u16)vq->packed.used_wrap_counter <<
1465 			VRING_PACKED_EVENT_F_WRAP_CTR);
1466 }
1467 
virtqueue_poll_packed(struct virtqueue * _vq,u16 off_wrap)1468 static bool virtqueue_poll_packed(struct virtqueue *_vq, u16 off_wrap)
1469 {
1470 	struct vring_virtqueue *vq = to_vvq(_vq);
1471 	bool wrap_counter;
1472 	u16 used_idx;
1473 
1474 	wrap_counter = off_wrap >> VRING_PACKED_EVENT_F_WRAP_CTR;
1475 	used_idx = off_wrap & ~(1 << VRING_PACKED_EVENT_F_WRAP_CTR);
1476 
1477 	return is_used_desc_packed(vq, used_idx, wrap_counter);
1478 }
1479 
virtqueue_enable_cb_delayed_packed(struct virtqueue * _vq)1480 static bool virtqueue_enable_cb_delayed_packed(struct virtqueue *_vq)
1481 {
1482 	struct vring_virtqueue *vq = to_vvq(_vq);
1483 	u16 used_idx, wrap_counter;
1484 	u16 bufs;
1485 
1486 	START_USE(vq);
1487 
1488 	/*
1489 	 * We optimistically turn back on interrupts, then check if there was
1490 	 * more to do.
1491 	 */
1492 
1493 	if (vq->event) {
1494 		/* TODO: tune this threshold */
1495 		bufs = (vq->packed.vring.num - vq->vq.num_free) * 3 / 4;
1496 		wrap_counter = vq->packed.used_wrap_counter;
1497 
1498 		used_idx = vq->last_used_idx + bufs;
1499 		if (used_idx >= vq->packed.vring.num) {
1500 			used_idx -= vq->packed.vring.num;
1501 			wrap_counter ^= 1;
1502 		}
1503 
1504 		vq->packed.vring.driver->off_wrap = cpu_to_le16(used_idx |
1505 			(wrap_counter << VRING_PACKED_EVENT_F_WRAP_CTR));
1506 
1507 		/*
1508 		 * We need to update event offset and event wrap
1509 		 * counter first before updating event flags.
1510 		 */
1511 		virtio_wmb(vq->weak_barriers);
1512 	}
1513 
1514 	if (vq->packed.event_flags_shadow == VRING_PACKED_EVENT_FLAG_DISABLE) {
1515 		vq->packed.event_flags_shadow = vq->event ?
1516 				VRING_PACKED_EVENT_FLAG_DESC :
1517 				VRING_PACKED_EVENT_FLAG_ENABLE;
1518 		vq->packed.vring.driver->flags =
1519 				cpu_to_le16(vq->packed.event_flags_shadow);
1520 	}
1521 
1522 	/*
1523 	 * We need to update event suppression structure first
1524 	 * before re-checking for more used buffers.
1525 	 */
1526 	virtio_mb(vq->weak_barriers);
1527 
1528 	if (is_used_desc_packed(vq,
1529 				vq->last_used_idx,
1530 				vq->packed.used_wrap_counter)) {
1531 		END_USE(vq);
1532 		return false;
1533 	}
1534 
1535 	END_USE(vq);
1536 	return true;
1537 }
1538 
virtqueue_detach_unused_buf_packed(struct virtqueue * _vq)1539 static void *virtqueue_detach_unused_buf_packed(struct virtqueue *_vq)
1540 {
1541 	struct vring_virtqueue *vq = to_vvq(_vq);
1542 	unsigned int i;
1543 	void *buf;
1544 
1545 	START_USE(vq);
1546 
1547 	for (i = 0; i < vq->packed.vring.num; i++) {
1548 		if (!vq->packed.desc_state[i].data)
1549 			continue;
1550 		/* detach_buf clears data, so grab it now. */
1551 		buf = vq->packed.desc_state[i].data;
1552 		detach_buf_packed(vq, i, NULL);
1553 		END_USE(vq);
1554 		return buf;
1555 	}
1556 	/* That should have freed everything. */
1557 	BUG_ON(vq->vq.num_free != vq->packed.vring.num);
1558 
1559 	END_USE(vq);
1560 	return NULL;
1561 }
1562 
vring_create_virtqueue_packed(unsigned int index,unsigned int num,unsigned int vring_align,struct virtio_device * vdev,bool weak_barriers,bool may_reduce_num,bool context,bool (* notify)(struct virtqueue *),void (* callback)(struct virtqueue *),const char * name)1563 static struct virtqueue *vring_create_virtqueue_packed(
1564 	unsigned int index,
1565 	unsigned int num,
1566 	unsigned int vring_align,
1567 	struct virtio_device *vdev,
1568 	bool weak_barriers,
1569 	bool may_reduce_num,
1570 	bool context,
1571 	bool (*notify)(struct virtqueue *),
1572 	void (*callback)(struct virtqueue *),
1573 	const char *name)
1574 {
1575 	struct vring_virtqueue *vq;
1576 	struct vring_packed_desc *ring;
1577 	struct vring_packed_desc_event *driver, *device;
1578 	dma_addr_t ring_dma_addr, driver_event_dma_addr, device_event_dma_addr;
1579 	size_t ring_size_in_bytes, event_size_in_bytes;
1580 	unsigned int i;
1581 
1582 	ring_size_in_bytes = num * sizeof(struct vring_packed_desc);
1583 
1584 	ring = vring_alloc_queue(vdev, ring_size_in_bytes,
1585 				 &ring_dma_addr,
1586 				 GFP_KERNEL|__GFP_NOWARN|__GFP_ZERO);
1587 	if (!ring)
1588 		goto err_ring;
1589 
1590 	event_size_in_bytes = sizeof(struct vring_packed_desc_event);
1591 
1592 	driver = vring_alloc_queue(vdev, event_size_in_bytes,
1593 				   &driver_event_dma_addr,
1594 				   GFP_KERNEL|__GFP_NOWARN|__GFP_ZERO);
1595 	if (!driver)
1596 		goto err_driver;
1597 
1598 	device = vring_alloc_queue(vdev, event_size_in_bytes,
1599 				   &device_event_dma_addr,
1600 				   GFP_KERNEL|__GFP_NOWARN|__GFP_ZERO);
1601 	if (!device)
1602 		goto err_device;
1603 
1604 	vq = kmalloc(sizeof(*vq), GFP_KERNEL);
1605 	if (!vq)
1606 		goto err_vq;
1607 
1608 	vq->vq.callback = callback;
1609 	vq->vq.vdev = vdev;
1610 	vq->vq.name = name;
1611 	vq->vq.num_free = num;
1612 	vq->vq.index = index;
1613 	vq->we_own_ring = true;
1614 	vq->notify = notify;
1615 	vq->weak_barriers = weak_barriers;
1616 	vq->broken = false;
1617 	vq->last_used_idx = 0;
1618 	vq->num_added = 0;
1619 	vq->packed_ring = true;
1620 	vq->use_dma_api = vring_use_dma_api(vdev);
1621 #ifdef DEBUG
1622 	vq->in_use = false;
1623 	vq->last_add_time_valid = false;
1624 #endif
1625 
1626 	vq->indirect = virtio_has_feature(vdev, VIRTIO_RING_F_INDIRECT_DESC) &&
1627 		!context;
1628 	vq->event = virtio_has_feature(vdev, VIRTIO_RING_F_EVENT_IDX);
1629 
1630 	if (virtio_has_feature(vdev, VIRTIO_F_ORDER_PLATFORM))
1631 		vq->weak_barriers = false;
1632 
1633 	vq->packed.ring_dma_addr = ring_dma_addr;
1634 	vq->packed.driver_event_dma_addr = driver_event_dma_addr;
1635 	vq->packed.device_event_dma_addr = device_event_dma_addr;
1636 
1637 	vq->packed.ring_size_in_bytes = ring_size_in_bytes;
1638 	vq->packed.event_size_in_bytes = event_size_in_bytes;
1639 
1640 	vq->packed.vring.num = num;
1641 	vq->packed.vring.desc = ring;
1642 	vq->packed.vring.driver = driver;
1643 	vq->packed.vring.device = device;
1644 
1645 	vq->packed.next_avail_idx = 0;
1646 	vq->packed.avail_wrap_counter = 1;
1647 	vq->packed.used_wrap_counter = 1;
1648 	vq->packed.event_flags_shadow = 0;
1649 	vq->packed.avail_used_flags = 1 << VRING_PACKED_DESC_F_AVAIL;
1650 
1651 	vq->packed.desc_state = kmalloc_array(num,
1652 			sizeof(struct vring_desc_state_packed),
1653 			GFP_KERNEL);
1654 	if (!vq->packed.desc_state)
1655 		goto err_desc_state;
1656 
1657 	memset(vq->packed.desc_state, 0,
1658 		num * sizeof(struct vring_desc_state_packed));
1659 
1660 	/* Put everything in free lists. */
1661 	vq->free_head = 0;
1662 	for (i = 0; i < num-1; i++)
1663 		vq->packed.desc_state[i].next = i + 1;
1664 
1665 	vq->packed.desc_extra = kmalloc_array(num,
1666 			sizeof(struct vring_desc_extra_packed),
1667 			GFP_KERNEL);
1668 	if (!vq->packed.desc_extra)
1669 		goto err_desc_extra;
1670 
1671 	memset(vq->packed.desc_extra, 0,
1672 		num * sizeof(struct vring_desc_extra_packed));
1673 
1674 	/* No callback?  Tell other side not to bother us. */
1675 	if (!callback) {
1676 		vq->packed.event_flags_shadow = VRING_PACKED_EVENT_FLAG_DISABLE;
1677 		vq->packed.vring.driver->flags =
1678 			cpu_to_le16(vq->packed.event_flags_shadow);
1679 	}
1680 
1681 	list_add_tail(&vq->vq.list, &vdev->vqs);
1682 	return &vq->vq;
1683 
1684 err_desc_extra:
1685 	kfree(vq->packed.desc_state);
1686 err_desc_state:
1687 	kfree(vq);
1688 err_vq:
1689 	vring_free_queue(vdev, event_size_in_bytes, device, device_event_dma_addr);
1690 err_device:
1691 	vring_free_queue(vdev, event_size_in_bytes, driver, driver_event_dma_addr);
1692 err_driver:
1693 	vring_free_queue(vdev, ring_size_in_bytes, ring, ring_dma_addr);
1694 err_ring:
1695 	return NULL;
1696 }
1697 
1698 
1699 /*
1700  * Generic functions and exported symbols.
1701  */
1702 
virtqueue_add(struct virtqueue * _vq,struct scatterlist * sgs[],unsigned int total_sg,unsigned int out_sgs,unsigned int in_sgs,void * data,void * ctx,gfp_t gfp)1703 static inline int virtqueue_add(struct virtqueue *_vq,
1704 				struct scatterlist *sgs[],
1705 				unsigned int total_sg,
1706 				unsigned int out_sgs,
1707 				unsigned int in_sgs,
1708 				void *data,
1709 				void *ctx,
1710 				gfp_t gfp)
1711 {
1712 	struct vring_virtqueue *vq = to_vvq(_vq);
1713 
1714 	return vq->packed_ring ? virtqueue_add_packed(_vq, sgs, total_sg,
1715 					out_sgs, in_sgs, data, ctx, gfp) :
1716 				 virtqueue_add_split(_vq, sgs, total_sg,
1717 					out_sgs, in_sgs, data, ctx, gfp);
1718 }
1719 
1720 /**
1721  * virtqueue_add_sgs - expose buffers to other end
1722  * @_vq: the struct virtqueue we're talking about.
1723  * @sgs: array of terminated scatterlists.
1724  * @out_sgs: the number of scatterlists readable by other side
1725  * @in_sgs: the number of scatterlists which are writable (after readable ones)
1726  * @data: the token identifying the buffer.
1727  * @gfp: how to do memory allocations (if necessary).
1728  *
1729  * Caller must ensure we don't call this with other virtqueue operations
1730  * at the same time (except where noted).
1731  *
1732  * Returns zero or a negative error (ie. ENOSPC, ENOMEM, EIO).
1733  */
virtqueue_add_sgs(struct virtqueue * _vq,struct scatterlist * sgs[],unsigned int out_sgs,unsigned int in_sgs,void * data,gfp_t gfp)1734 int virtqueue_add_sgs(struct virtqueue *_vq,
1735 		      struct scatterlist *sgs[],
1736 		      unsigned int out_sgs,
1737 		      unsigned int in_sgs,
1738 		      void *data,
1739 		      gfp_t gfp)
1740 {
1741 	unsigned int i, total_sg = 0;
1742 
1743 	/* Count them first. */
1744 	for (i = 0; i < out_sgs + in_sgs; i++) {
1745 		struct scatterlist *sg;
1746 
1747 		for (sg = sgs[i]; sg; sg = sg_next(sg))
1748 			total_sg++;
1749 	}
1750 	return virtqueue_add(_vq, sgs, total_sg, out_sgs, in_sgs,
1751 			     data, NULL, gfp);
1752 }
1753 EXPORT_SYMBOL_GPL(virtqueue_add_sgs);
1754 
1755 /**
1756  * virtqueue_add_outbuf - expose output buffers to other end
1757  * @vq: the struct virtqueue we're talking about.
1758  * @sg: scatterlist (must be well-formed and terminated!)
1759  * @num: the number of entries in @sg readable by other side
1760  * @data: the token identifying the buffer.
1761  * @gfp: how to do memory allocations (if necessary).
1762  *
1763  * Caller must ensure we don't call this with other virtqueue operations
1764  * at the same time (except where noted).
1765  *
1766  * Returns zero or a negative error (ie. ENOSPC, ENOMEM, EIO).
1767  */
virtqueue_add_outbuf(struct virtqueue * vq,struct scatterlist * sg,unsigned int num,void * data,gfp_t gfp)1768 int virtqueue_add_outbuf(struct virtqueue *vq,
1769 			 struct scatterlist *sg, unsigned int num,
1770 			 void *data,
1771 			 gfp_t gfp)
1772 {
1773 	return virtqueue_add(vq, &sg, num, 1, 0, data, NULL, gfp);
1774 }
1775 EXPORT_SYMBOL_GPL(virtqueue_add_outbuf);
1776 
1777 /**
1778  * virtqueue_add_inbuf - expose input buffers to other end
1779  * @vq: the struct virtqueue we're talking about.
1780  * @sg: scatterlist (must be well-formed and terminated!)
1781  * @num: the number of entries in @sg writable by other side
1782  * @data: the token identifying the buffer.
1783  * @gfp: how to do memory allocations (if necessary).
1784  *
1785  * Caller must ensure we don't call this with other virtqueue operations
1786  * at the same time (except where noted).
1787  *
1788  * Returns zero or a negative error (ie. ENOSPC, ENOMEM, EIO).
1789  */
virtqueue_add_inbuf(struct virtqueue * vq,struct scatterlist * sg,unsigned int num,void * data,gfp_t gfp)1790 int virtqueue_add_inbuf(struct virtqueue *vq,
1791 			struct scatterlist *sg, unsigned int num,
1792 			void *data,
1793 			gfp_t gfp)
1794 {
1795 	return virtqueue_add(vq, &sg, num, 0, 1, data, NULL, gfp);
1796 }
1797 EXPORT_SYMBOL_GPL(virtqueue_add_inbuf);
1798 
1799 /**
1800  * virtqueue_add_inbuf_ctx - expose input buffers to other end
1801  * @vq: the struct virtqueue we're talking about.
1802  * @sg: scatterlist (must be well-formed and terminated!)
1803  * @num: the number of entries in @sg writable by other side
1804  * @data: the token identifying the buffer.
1805  * @ctx: extra context for the token
1806  * @gfp: how to do memory allocations (if necessary).
1807  *
1808  * Caller must ensure we don't call this with other virtqueue operations
1809  * at the same time (except where noted).
1810  *
1811  * Returns zero or a negative error (ie. ENOSPC, ENOMEM, EIO).
1812  */
virtqueue_add_inbuf_ctx(struct virtqueue * vq,struct scatterlist * sg,unsigned int num,void * data,void * ctx,gfp_t gfp)1813 int virtqueue_add_inbuf_ctx(struct virtqueue *vq,
1814 			struct scatterlist *sg, unsigned int num,
1815 			void *data,
1816 			void *ctx,
1817 			gfp_t gfp)
1818 {
1819 	return virtqueue_add(vq, &sg, num, 0, 1, data, ctx, gfp);
1820 }
1821 EXPORT_SYMBOL_GPL(virtqueue_add_inbuf_ctx);
1822 
1823 /**
1824  * virtqueue_kick_prepare - first half of split virtqueue_kick call.
1825  * @_vq: the struct virtqueue
1826  *
1827  * Instead of virtqueue_kick(), you can do:
1828  *	if (virtqueue_kick_prepare(vq))
1829  *		virtqueue_notify(vq);
1830  *
1831  * This is sometimes useful because the virtqueue_kick_prepare() needs
1832  * to be serialized, but the actual virtqueue_notify() call does not.
1833  */
virtqueue_kick_prepare(struct virtqueue * _vq)1834 bool virtqueue_kick_prepare(struct virtqueue *_vq)
1835 {
1836 	struct vring_virtqueue *vq = to_vvq(_vq);
1837 
1838 	return vq->packed_ring ? virtqueue_kick_prepare_packed(_vq) :
1839 				 virtqueue_kick_prepare_split(_vq);
1840 }
1841 EXPORT_SYMBOL_GPL(virtqueue_kick_prepare);
1842 
1843 /**
1844  * virtqueue_notify - second half of split virtqueue_kick call.
1845  * @_vq: the struct virtqueue
1846  *
1847  * This does not need to be serialized.
1848  *
1849  * Returns false if host notify failed or queue is broken, otherwise true.
1850  */
virtqueue_notify(struct virtqueue * _vq)1851 bool virtqueue_notify(struct virtqueue *_vq)
1852 {
1853 	struct vring_virtqueue *vq = to_vvq(_vq);
1854 
1855 	if (unlikely(vq->broken))
1856 		return false;
1857 
1858 	/* Prod other side to tell it about changes. */
1859 	if (!vq->notify(_vq)) {
1860 		vq->broken = true;
1861 		return false;
1862 	}
1863 	return true;
1864 }
1865 EXPORT_SYMBOL_GPL(virtqueue_notify);
1866 
1867 /**
1868  * virtqueue_kick - update after add_buf
1869  * @vq: the struct virtqueue
1870  *
1871  * After one or more virtqueue_add_* calls, invoke this to kick
1872  * the other side.
1873  *
1874  * Caller must ensure we don't call this with other virtqueue
1875  * operations at the same time (except where noted).
1876  *
1877  * Returns false if kick failed, otherwise true.
1878  */
virtqueue_kick(struct virtqueue * vq)1879 bool virtqueue_kick(struct virtqueue *vq)
1880 {
1881 	if (virtqueue_kick_prepare(vq))
1882 		return virtqueue_notify(vq);
1883 	return true;
1884 }
1885 EXPORT_SYMBOL_GPL(virtqueue_kick);
1886 
1887 /**
1888  * virtqueue_get_buf - get the next used buffer
1889  * @_vq: the struct virtqueue we're talking about.
1890  * @len: the length written into the buffer
1891  * @ctx: extra context for the token
1892  *
1893  * If the device wrote data into the buffer, @len will be set to the
1894  * amount written.  This means you don't need to clear the buffer
1895  * beforehand to ensure there's no data leakage in the case of short
1896  * writes.
1897  *
1898  * Caller must ensure we don't call this with other virtqueue
1899  * operations at the same time (except where noted).
1900  *
1901  * Returns NULL if there are no used buffers, or the "data" token
1902  * handed to virtqueue_add_*().
1903  */
virtqueue_get_buf_ctx(struct virtqueue * _vq,unsigned int * len,void ** ctx)1904 void *virtqueue_get_buf_ctx(struct virtqueue *_vq, unsigned int *len,
1905 			    void **ctx)
1906 {
1907 	struct vring_virtqueue *vq = to_vvq(_vq);
1908 
1909 	return vq->packed_ring ? virtqueue_get_buf_ctx_packed(_vq, len, ctx) :
1910 				 virtqueue_get_buf_ctx_split(_vq, len, ctx);
1911 }
1912 EXPORT_SYMBOL_GPL(virtqueue_get_buf_ctx);
1913 
virtqueue_get_buf(struct virtqueue * _vq,unsigned int * len)1914 void *virtqueue_get_buf(struct virtqueue *_vq, unsigned int *len)
1915 {
1916 	return virtqueue_get_buf_ctx(_vq, len, NULL);
1917 }
1918 EXPORT_SYMBOL_GPL(virtqueue_get_buf);
1919 /**
1920  * virtqueue_disable_cb - disable callbacks
1921  * @_vq: the struct virtqueue we're talking about.
1922  *
1923  * Note that this is not necessarily synchronous, hence unreliable and only
1924  * useful as an optimization.
1925  *
1926  * Unlike other operations, this need not be serialized.
1927  */
virtqueue_disable_cb(struct virtqueue * _vq)1928 void virtqueue_disable_cb(struct virtqueue *_vq)
1929 {
1930 	struct vring_virtqueue *vq = to_vvq(_vq);
1931 
1932 	if (vq->packed_ring)
1933 		virtqueue_disable_cb_packed(_vq);
1934 	else
1935 		virtqueue_disable_cb_split(_vq);
1936 }
1937 EXPORT_SYMBOL_GPL(virtqueue_disable_cb);
1938 
1939 /**
1940  * virtqueue_enable_cb_prepare - restart callbacks after disable_cb
1941  * @_vq: the struct virtqueue we're talking about.
1942  *
1943  * This re-enables callbacks; it returns current queue state
1944  * in an opaque unsigned value. This value should be later tested by
1945  * virtqueue_poll, to detect a possible race between the driver checking for
1946  * more work, and enabling callbacks.
1947  *
1948  * Caller must ensure we don't call this with other virtqueue
1949  * operations at the same time (except where noted).
1950  */
virtqueue_enable_cb_prepare(struct virtqueue * _vq)1951 unsigned virtqueue_enable_cb_prepare(struct virtqueue *_vq)
1952 {
1953 	struct vring_virtqueue *vq = to_vvq(_vq);
1954 
1955 	return vq->packed_ring ? virtqueue_enable_cb_prepare_packed(_vq) :
1956 				 virtqueue_enable_cb_prepare_split(_vq);
1957 }
1958 EXPORT_SYMBOL_GPL(virtqueue_enable_cb_prepare);
1959 
1960 /**
1961  * virtqueue_poll - query pending used buffers
1962  * @_vq: the struct virtqueue we're talking about.
1963  * @last_used_idx: virtqueue state (from call to virtqueue_enable_cb_prepare).
1964  *
1965  * Returns "true" if there are pending used buffers in the queue.
1966  *
1967  * This does not need to be serialized.
1968  */
virtqueue_poll(struct virtqueue * _vq,unsigned last_used_idx)1969 bool virtqueue_poll(struct virtqueue *_vq, unsigned last_used_idx)
1970 {
1971 	struct vring_virtqueue *vq = to_vvq(_vq);
1972 
1973 	if (unlikely(vq->broken))
1974 		return false;
1975 
1976 	virtio_mb(vq->weak_barriers);
1977 	return vq->packed_ring ? virtqueue_poll_packed(_vq, last_used_idx) :
1978 				 virtqueue_poll_split(_vq, last_used_idx);
1979 }
1980 EXPORT_SYMBOL_GPL(virtqueue_poll);
1981 
1982 /**
1983  * virtqueue_enable_cb - restart callbacks after disable_cb.
1984  * @_vq: the struct virtqueue we're talking about.
1985  *
1986  * This re-enables callbacks; it returns "false" if there are pending
1987  * buffers in the queue, to detect a possible race between the driver
1988  * checking for more work, and enabling callbacks.
1989  *
1990  * Caller must ensure we don't call this with other virtqueue
1991  * operations at the same time (except where noted).
1992  */
virtqueue_enable_cb(struct virtqueue * _vq)1993 bool virtqueue_enable_cb(struct virtqueue *_vq)
1994 {
1995 	unsigned last_used_idx = virtqueue_enable_cb_prepare(_vq);
1996 
1997 	return !virtqueue_poll(_vq, last_used_idx);
1998 }
1999 EXPORT_SYMBOL_GPL(virtqueue_enable_cb);
2000 
2001 /**
2002  * virtqueue_enable_cb_delayed - restart callbacks after disable_cb.
2003  * @_vq: the struct virtqueue we're talking about.
2004  *
2005  * This re-enables callbacks but hints to the other side to delay
2006  * interrupts until most of the available buffers have been processed;
2007  * it returns "false" if there are many pending buffers in the queue,
2008  * to detect a possible race between the driver checking for more work,
2009  * and enabling callbacks.
2010  *
2011  * Caller must ensure we don't call this with other virtqueue
2012  * operations at the same time (except where noted).
2013  */
virtqueue_enable_cb_delayed(struct virtqueue * _vq)2014 bool virtqueue_enable_cb_delayed(struct virtqueue *_vq)
2015 {
2016 	struct vring_virtqueue *vq = to_vvq(_vq);
2017 
2018 	return vq->packed_ring ? virtqueue_enable_cb_delayed_packed(_vq) :
2019 				 virtqueue_enable_cb_delayed_split(_vq);
2020 }
2021 EXPORT_SYMBOL_GPL(virtqueue_enable_cb_delayed);
2022 
2023 /**
2024  * virtqueue_detach_unused_buf - detach first unused buffer
2025  * @_vq: the struct virtqueue we're talking about.
2026  *
2027  * Returns NULL or the "data" token handed to virtqueue_add_*().
2028  * This is not valid on an active queue; it is useful only for device
2029  * shutdown.
2030  */
virtqueue_detach_unused_buf(struct virtqueue * _vq)2031 void *virtqueue_detach_unused_buf(struct virtqueue *_vq)
2032 {
2033 	struct vring_virtqueue *vq = to_vvq(_vq);
2034 
2035 	return vq->packed_ring ? virtqueue_detach_unused_buf_packed(_vq) :
2036 				 virtqueue_detach_unused_buf_split(_vq);
2037 }
2038 EXPORT_SYMBOL_GPL(virtqueue_detach_unused_buf);
2039 
more_used(const struct vring_virtqueue * vq)2040 static inline bool more_used(const struct vring_virtqueue *vq)
2041 {
2042 	return vq->packed_ring ? more_used_packed(vq) : more_used_split(vq);
2043 }
2044 
vring_interrupt(int irq,void * _vq)2045 irqreturn_t vring_interrupt(int irq, void *_vq)
2046 {
2047 	struct vring_virtqueue *vq = to_vvq(_vq);
2048 
2049 	if (!more_used(vq)) {
2050 		pr_debug("virtqueue interrupt with no work for %p\n", vq);
2051 		return IRQ_NONE;
2052 	}
2053 
2054 	if (unlikely(vq->broken))
2055 		return IRQ_HANDLED;
2056 
2057 	pr_debug("virtqueue callback for %p (%p)\n", vq, vq->vq.callback);
2058 	if (vq->vq.callback)
2059 		vq->vq.callback(&vq->vq);
2060 
2061 	return IRQ_HANDLED;
2062 }
2063 EXPORT_SYMBOL_GPL(vring_interrupt);
2064 
2065 /* Only available for split ring */
__vring_new_virtqueue(unsigned int index,struct vring vring,struct virtio_device * vdev,bool weak_barriers,bool context,bool (* notify)(struct virtqueue *),void (* callback)(struct virtqueue *),const char * name)2066 struct virtqueue *__vring_new_virtqueue(unsigned int index,
2067 					struct vring vring,
2068 					struct virtio_device *vdev,
2069 					bool weak_barriers,
2070 					bool context,
2071 					bool (*notify)(struct virtqueue *),
2072 					void (*callback)(struct virtqueue *),
2073 					const char *name)
2074 {
2075 	unsigned int i;
2076 	struct vring_virtqueue *vq;
2077 
2078 	if (virtio_has_feature(vdev, VIRTIO_F_RING_PACKED))
2079 		return NULL;
2080 
2081 	vq = kmalloc(sizeof(*vq), GFP_KERNEL);
2082 	if (!vq)
2083 		return NULL;
2084 
2085 	vq->packed_ring = false;
2086 	vq->vq.callback = callback;
2087 	vq->vq.vdev = vdev;
2088 	vq->vq.name = name;
2089 	vq->vq.num_free = vring.num;
2090 	vq->vq.index = index;
2091 	vq->we_own_ring = false;
2092 	vq->notify = notify;
2093 	vq->weak_barriers = weak_barriers;
2094 	vq->broken = false;
2095 	vq->last_used_idx = 0;
2096 	vq->num_added = 0;
2097 	vq->use_dma_api = vring_use_dma_api(vdev);
2098 #ifdef DEBUG
2099 	vq->in_use = false;
2100 	vq->last_add_time_valid = false;
2101 #endif
2102 
2103 	vq->indirect = virtio_has_feature(vdev, VIRTIO_RING_F_INDIRECT_DESC) &&
2104 		!context;
2105 	vq->event = virtio_has_feature(vdev, VIRTIO_RING_F_EVENT_IDX);
2106 
2107 	if (virtio_has_feature(vdev, VIRTIO_F_ORDER_PLATFORM))
2108 		vq->weak_barriers = false;
2109 
2110 	vq->split.queue_dma_addr = 0;
2111 	vq->split.queue_size_in_bytes = 0;
2112 
2113 	vq->split.vring = vring;
2114 	vq->split.avail_flags_shadow = 0;
2115 	vq->split.avail_idx_shadow = 0;
2116 
2117 	/* No callback?  Tell other side not to bother us. */
2118 	if (!callback) {
2119 		vq->split.avail_flags_shadow |= VRING_AVAIL_F_NO_INTERRUPT;
2120 		if (!vq->event)
2121 			vq->split.vring.avail->flags = cpu_to_virtio16(vdev,
2122 					vq->split.avail_flags_shadow);
2123 	}
2124 
2125 	vq->split.desc_state = kmalloc_array(vring.num,
2126 			sizeof(struct vring_desc_state_split), GFP_KERNEL);
2127 	if (!vq->split.desc_state) {
2128 		kfree(vq);
2129 		return NULL;
2130 	}
2131 
2132 	/* Put everything in free lists. */
2133 	vq->free_head = 0;
2134 	for (i = 0; i < vring.num-1; i++)
2135 		vq->split.vring.desc[i].next = cpu_to_virtio16(vdev, i + 1);
2136 	memset(vq->split.desc_state, 0, vring.num *
2137 			sizeof(struct vring_desc_state_split));
2138 
2139 	list_add_tail(&vq->vq.list, &vdev->vqs);
2140 	return &vq->vq;
2141 }
2142 EXPORT_SYMBOL_GPL(__vring_new_virtqueue);
2143 
vring_create_virtqueue(unsigned int index,unsigned int num,unsigned int vring_align,struct virtio_device * vdev,bool weak_barriers,bool may_reduce_num,bool context,bool (* notify)(struct virtqueue *),void (* callback)(struct virtqueue *),const char * name)2144 struct virtqueue *vring_create_virtqueue(
2145 	unsigned int index,
2146 	unsigned int num,
2147 	unsigned int vring_align,
2148 	struct virtio_device *vdev,
2149 	bool weak_barriers,
2150 	bool may_reduce_num,
2151 	bool context,
2152 	bool (*notify)(struct virtqueue *),
2153 	void (*callback)(struct virtqueue *),
2154 	const char *name)
2155 {
2156 
2157 	if (virtio_has_feature(vdev, VIRTIO_F_RING_PACKED))
2158 		return vring_create_virtqueue_packed(index, num, vring_align,
2159 				vdev, weak_barriers, may_reduce_num,
2160 				context, notify, callback, name);
2161 
2162 	return vring_create_virtqueue_split(index, num, vring_align,
2163 			vdev, weak_barriers, may_reduce_num,
2164 			context, notify, callback, name);
2165 }
2166 EXPORT_SYMBOL_GPL(vring_create_virtqueue);
2167 
2168 /* Only available for split ring */
vring_new_virtqueue(unsigned int index,unsigned int num,unsigned int vring_align,struct virtio_device * vdev,bool weak_barriers,bool context,void * pages,bool (* notify)(struct virtqueue * vq),void (* callback)(struct virtqueue * vq),const char * name)2169 struct virtqueue *vring_new_virtqueue(unsigned int index,
2170 				      unsigned int num,
2171 				      unsigned int vring_align,
2172 				      struct virtio_device *vdev,
2173 				      bool weak_barriers,
2174 				      bool context,
2175 				      void *pages,
2176 				      bool (*notify)(struct virtqueue *vq),
2177 				      void (*callback)(struct virtqueue *vq),
2178 				      const char *name)
2179 {
2180 	struct vring vring;
2181 
2182 	if (virtio_has_feature(vdev, VIRTIO_F_RING_PACKED))
2183 		return NULL;
2184 
2185 	vring_init(&vring, num, pages, vring_align);
2186 	return __vring_new_virtqueue(index, vring, vdev, weak_barriers, context,
2187 				     notify, callback, name);
2188 }
2189 EXPORT_SYMBOL_GPL(vring_new_virtqueue);
2190 
vring_del_virtqueue(struct virtqueue * _vq)2191 void vring_del_virtqueue(struct virtqueue *_vq)
2192 {
2193 	struct vring_virtqueue *vq = to_vvq(_vq);
2194 
2195 	if (vq->we_own_ring) {
2196 		if (vq->packed_ring) {
2197 			vring_free_queue(vq->vq.vdev,
2198 					 vq->packed.ring_size_in_bytes,
2199 					 vq->packed.vring.desc,
2200 					 vq->packed.ring_dma_addr);
2201 
2202 			vring_free_queue(vq->vq.vdev,
2203 					 vq->packed.event_size_in_bytes,
2204 					 vq->packed.vring.driver,
2205 					 vq->packed.driver_event_dma_addr);
2206 
2207 			vring_free_queue(vq->vq.vdev,
2208 					 vq->packed.event_size_in_bytes,
2209 					 vq->packed.vring.device,
2210 					 vq->packed.device_event_dma_addr);
2211 
2212 			kfree(vq->packed.desc_state);
2213 			kfree(vq->packed.desc_extra);
2214 		} else {
2215 			vring_free_queue(vq->vq.vdev,
2216 					 vq->split.queue_size_in_bytes,
2217 					 vq->split.vring.desc,
2218 					 vq->split.queue_dma_addr);
2219 		}
2220 	}
2221 	if (!vq->packed_ring)
2222 		kfree(vq->split.desc_state);
2223 	list_del(&_vq->list);
2224 	kfree(vq);
2225 }
2226 EXPORT_SYMBOL_GPL(vring_del_virtqueue);
2227 
2228 /* Manipulates transport-specific feature bits. */
vring_transport_features(struct virtio_device * vdev)2229 void vring_transport_features(struct virtio_device *vdev)
2230 {
2231 	unsigned int i;
2232 
2233 	for (i = VIRTIO_TRANSPORT_F_START; i < VIRTIO_TRANSPORT_F_END; i++) {
2234 		switch (i) {
2235 		case VIRTIO_RING_F_INDIRECT_DESC:
2236 			break;
2237 		case VIRTIO_RING_F_EVENT_IDX:
2238 			break;
2239 		case VIRTIO_F_VERSION_1:
2240 			break;
2241 		case VIRTIO_F_ACCESS_PLATFORM:
2242 			break;
2243 		case VIRTIO_F_RING_PACKED:
2244 			break;
2245 		case VIRTIO_F_ORDER_PLATFORM:
2246 			break;
2247 		default:
2248 			/* We don't understand this bit. */
2249 			__virtio_clear_bit(vdev, i);
2250 		}
2251 	}
2252 }
2253 EXPORT_SYMBOL_GPL(vring_transport_features);
2254 
2255 /**
2256  * virtqueue_get_vring_size - return the size of the virtqueue's vring
2257  * @_vq: the struct virtqueue containing the vring of interest.
2258  *
2259  * Returns the size of the vring.  This is mainly used for boasting to
2260  * userspace.  Unlike other operations, this need not be serialized.
2261  */
virtqueue_get_vring_size(struct virtqueue * _vq)2262 unsigned int virtqueue_get_vring_size(struct virtqueue *_vq)
2263 {
2264 
2265 	struct vring_virtqueue *vq = to_vvq(_vq);
2266 
2267 	return vq->packed_ring ? vq->packed.vring.num : vq->split.vring.num;
2268 }
2269 EXPORT_SYMBOL_GPL(virtqueue_get_vring_size);
2270 
virtqueue_is_broken(struct virtqueue * _vq)2271 bool virtqueue_is_broken(struct virtqueue *_vq)
2272 {
2273 	struct vring_virtqueue *vq = to_vvq(_vq);
2274 
2275 	return READ_ONCE(vq->broken);
2276 }
2277 EXPORT_SYMBOL_GPL(virtqueue_is_broken);
2278 
2279 /*
2280  * This should prevent the device from being used, allowing drivers to
2281  * recover.  You may need to grab appropriate locks to flush.
2282  */
virtio_break_device(struct virtio_device * dev)2283 void virtio_break_device(struct virtio_device *dev)
2284 {
2285 	struct virtqueue *_vq;
2286 
2287 	list_for_each_entry(_vq, &dev->vqs, list) {
2288 		struct vring_virtqueue *vq = to_vvq(_vq);
2289 
2290 		/* Pairs with READ_ONCE() in virtqueue_is_broken(). */
2291 		WRITE_ONCE(vq->broken, true);
2292 	}
2293 }
2294 EXPORT_SYMBOL_GPL(virtio_break_device);
2295 
virtqueue_get_desc_addr(struct virtqueue * _vq)2296 dma_addr_t virtqueue_get_desc_addr(struct virtqueue *_vq)
2297 {
2298 	struct vring_virtqueue *vq = to_vvq(_vq);
2299 
2300 	BUG_ON(!vq->we_own_ring);
2301 
2302 	if (vq->packed_ring)
2303 		return vq->packed.ring_dma_addr;
2304 
2305 	return vq->split.queue_dma_addr;
2306 }
2307 EXPORT_SYMBOL_GPL(virtqueue_get_desc_addr);
2308 
virtqueue_get_avail_addr(struct virtqueue * _vq)2309 dma_addr_t virtqueue_get_avail_addr(struct virtqueue *_vq)
2310 {
2311 	struct vring_virtqueue *vq = to_vvq(_vq);
2312 
2313 	BUG_ON(!vq->we_own_ring);
2314 
2315 	if (vq->packed_ring)
2316 		return vq->packed.driver_event_dma_addr;
2317 
2318 	return vq->split.queue_dma_addr +
2319 		((char *)vq->split.vring.avail - (char *)vq->split.vring.desc);
2320 }
2321 EXPORT_SYMBOL_GPL(virtqueue_get_avail_addr);
2322 
virtqueue_get_used_addr(struct virtqueue * _vq)2323 dma_addr_t virtqueue_get_used_addr(struct virtqueue *_vq)
2324 {
2325 	struct vring_virtqueue *vq = to_vvq(_vq);
2326 
2327 	BUG_ON(!vq->we_own_ring);
2328 
2329 	if (vq->packed_ring)
2330 		return vq->packed.device_event_dma_addr;
2331 
2332 	return vq->split.queue_dma_addr +
2333 		((char *)vq->split.vring.used - (char *)vq->split.vring.desc);
2334 }
2335 EXPORT_SYMBOL_GPL(virtqueue_get_used_addr);
2336 
2337 /* Only available for split ring */
virtqueue_get_vring(struct virtqueue * vq)2338 const struct vring *virtqueue_get_vring(struct virtqueue *vq)
2339 {
2340 	return &to_vvq(vq)->split.vring;
2341 }
2342 EXPORT_SYMBOL_GPL(virtqueue_get_vring);
2343 
2344 MODULE_LICENSE("GPL");
2345