xref: /linux/lib/kfifo.c (revision fd639726bf15fca8ee1a00dce8e0096d0ad9bd18)
1 /*
2  * A generic kernel FIFO implementation
3  *
4  * Copyright (C) 2009/2010 Stefani Seibold <stefani@seibold.net>
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19  *
20  */
21 
22 #include <linux/kernel.h>
23 #include <linux/export.h>
24 #include <linux/slab.h>
25 #include <linux/err.h>
26 #include <linux/log2.h>
27 #include <linux/uaccess.h>
28 #include <linux/kfifo.h>
29 
30 /*
31  * internal helper to calculate the unused elements in a fifo
32  */
33 static inline unsigned int kfifo_unused(struct __kfifo *fifo)
34 {
35 	return (fifo->mask + 1) - (fifo->in - fifo->out);
36 }
37 
38 int __kfifo_alloc(struct __kfifo *fifo, unsigned int size,
39 		size_t esize, gfp_t gfp_mask)
40 {
41 	/*
42 	 * round down to the next power of 2, since our 'let the indices
43 	 * wrap' technique works only in this case.
44 	 */
45 	size = roundup_pow_of_two(size);
46 
47 	fifo->in = 0;
48 	fifo->out = 0;
49 	fifo->esize = esize;
50 
51 	if (size < 2) {
52 		fifo->data = NULL;
53 		fifo->mask = 0;
54 		return -EINVAL;
55 	}
56 
57 	fifo->data = kmalloc(size * esize, gfp_mask);
58 
59 	if (!fifo->data) {
60 		fifo->mask = 0;
61 		return -ENOMEM;
62 	}
63 	fifo->mask = size - 1;
64 
65 	return 0;
66 }
67 EXPORT_SYMBOL(__kfifo_alloc);
68 
69 void __kfifo_free(struct __kfifo *fifo)
70 {
71 	kfree(fifo->data);
72 	fifo->in = 0;
73 	fifo->out = 0;
74 	fifo->esize = 0;
75 	fifo->data = NULL;
76 	fifo->mask = 0;
77 }
78 EXPORT_SYMBOL(__kfifo_free);
79 
80 int __kfifo_init(struct __kfifo *fifo, void *buffer,
81 		unsigned int size, size_t esize)
82 {
83 	size /= esize;
84 
85 	size = roundup_pow_of_two(size);
86 
87 	fifo->in = 0;
88 	fifo->out = 0;
89 	fifo->esize = esize;
90 	fifo->data = buffer;
91 
92 	if (size < 2) {
93 		fifo->mask = 0;
94 		return -EINVAL;
95 	}
96 	fifo->mask = size - 1;
97 
98 	return 0;
99 }
100 EXPORT_SYMBOL(__kfifo_init);
101 
102 static void kfifo_copy_in(struct __kfifo *fifo, const void *src,
103 		unsigned int len, unsigned int off)
104 {
105 	unsigned int size = fifo->mask + 1;
106 	unsigned int esize = fifo->esize;
107 	unsigned int l;
108 
109 	off &= fifo->mask;
110 	if (esize != 1) {
111 		off *= esize;
112 		size *= esize;
113 		len *= esize;
114 	}
115 	l = min(len, size - off);
116 
117 	memcpy(fifo->data + off, src, l);
118 	memcpy(fifo->data, src + l, len - l);
119 	/*
120 	 * make sure that the data in the fifo is up to date before
121 	 * incrementing the fifo->in index counter
122 	 */
123 	smp_wmb();
124 }
125 
126 unsigned int __kfifo_in(struct __kfifo *fifo,
127 		const void *buf, unsigned int len)
128 {
129 	unsigned int l;
130 
131 	l = kfifo_unused(fifo);
132 	if (len > l)
133 		len = l;
134 
135 	kfifo_copy_in(fifo, buf, len, fifo->in);
136 	fifo->in += len;
137 	return len;
138 }
139 EXPORT_SYMBOL(__kfifo_in);
140 
141 static void kfifo_copy_out(struct __kfifo *fifo, void *dst,
142 		unsigned int len, unsigned int off)
143 {
144 	unsigned int size = fifo->mask + 1;
145 	unsigned int esize = fifo->esize;
146 	unsigned int l;
147 
148 	off &= fifo->mask;
149 	if (esize != 1) {
150 		off *= esize;
151 		size *= esize;
152 		len *= esize;
153 	}
154 	l = min(len, size - off);
155 
156 	memcpy(dst, fifo->data + off, l);
157 	memcpy(dst + l, fifo->data, len - l);
158 	/*
159 	 * make sure that the data is copied before
160 	 * incrementing the fifo->out index counter
161 	 */
162 	smp_wmb();
163 }
164 
165 unsigned int __kfifo_out_peek(struct __kfifo *fifo,
166 		void *buf, unsigned int len)
167 {
168 	unsigned int l;
169 
170 	l = fifo->in - fifo->out;
171 	if (len > l)
172 		len = l;
173 
174 	kfifo_copy_out(fifo, buf, len, fifo->out);
175 	return len;
176 }
177 EXPORT_SYMBOL(__kfifo_out_peek);
178 
179 unsigned int __kfifo_out(struct __kfifo *fifo,
180 		void *buf, unsigned int len)
181 {
182 	len = __kfifo_out_peek(fifo, buf, len);
183 	fifo->out += len;
184 	return len;
185 }
186 EXPORT_SYMBOL(__kfifo_out);
187 
188 static unsigned long kfifo_copy_from_user(struct __kfifo *fifo,
189 	const void __user *from, unsigned int len, unsigned int off,
190 	unsigned int *copied)
191 {
192 	unsigned int size = fifo->mask + 1;
193 	unsigned int esize = fifo->esize;
194 	unsigned int l;
195 	unsigned long ret;
196 
197 	off &= fifo->mask;
198 	if (esize != 1) {
199 		off *= esize;
200 		size *= esize;
201 		len *= esize;
202 	}
203 	l = min(len, size - off);
204 
205 	ret = copy_from_user(fifo->data + off, from, l);
206 	if (unlikely(ret))
207 		ret = DIV_ROUND_UP(ret + len - l, esize);
208 	else {
209 		ret = copy_from_user(fifo->data, from + l, len - l);
210 		if (unlikely(ret))
211 			ret = DIV_ROUND_UP(ret, esize);
212 	}
213 	/*
214 	 * make sure that the data in the fifo is up to date before
215 	 * incrementing the fifo->in index counter
216 	 */
217 	smp_wmb();
218 	*copied = len - ret * esize;
219 	/* return the number of elements which are not copied */
220 	return ret;
221 }
222 
223 int __kfifo_from_user(struct __kfifo *fifo, const void __user *from,
224 		unsigned long len, unsigned int *copied)
225 {
226 	unsigned int l;
227 	unsigned long ret;
228 	unsigned int esize = fifo->esize;
229 	int err;
230 
231 	if (esize != 1)
232 		len /= esize;
233 
234 	l = kfifo_unused(fifo);
235 	if (len > l)
236 		len = l;
237 
238 	ret = kfifo_copy_from_user(fifo, from, len, fifo->in, copied);
239 	if (unlikely(ret)) {
240 		len -= ret;
241 		err = -EFAULT;
242 	} else
243 		err = 0;
244 	fifo->in += len;
245 	return err;
246 }
247 EXPORT_SYMBOL(__kfifo_from_user);
248 
249 static unsigned long kfifo_copy_to_user(struct __kfifo *fifo, void __user *to,
250 		unsigned int len, unsigned int off, unsigned int *copied)
251 {
252 	unsigned int l;
253 	unsigned long ret;
254 	unsigned int size = fifo->mask + 1;
255 	unsigned int esize = fifo->esize;
256 
257 	off &= fifo->mask;
258 	if (esize != 1) {
259 		off *= esize;
260 		size *= esize;
261 		len *= esize;
262 	}
263 	l = min(len, size - off);
264 
265 	ret = copy_to_user(to, fifo->data + off, l);
266 	if (unlikely(ret))
267 		ret = DIV_ROUND_UP(ret + len - l, esize);
268 	else {
269 		ret = copy_to_user(to + l, fifo->data, len - l);
270 		if (unlikely(ret))
271 			ret = DIV_ROUND_UP(ret, esize);
272 	}
273 	/*
274 	 * make sure that the data is copied before
275 	 * incrementing the fifo->out index counter
276 	 */
277 	smp_wmb();
278 	*copied = len - ret * esize;
279 	/* return the number of elements which are not copied */
280 	return ret;
281 }
282 
283 int __kfifo_to_user(struct __kfifo *fifo, void __user *to,
284 		unsigned long len, unsigned int *copied)
285 {
286 	unsigned int l;
287 	unsigned long ret;
288 	unsigned int esize = fifo->esize;
289 	int err;
290 
291 	if (esize != 1)
292 		len /= esize;
293 
294 	l = fifo->in - fifo->out;
295 	if (len > l)
296 		len = l;
297 	ret = kfifo_copy_to_user(fifo, to, len, fifo->out, copied);
298 	if (unlikely(ret)) {
299 		len -= ret;
300 		err = -EFAULT;
301 	} else
302 		err = 0;
303 	fifo->out += len;
304 	return err;
305 }
306 EXPORT_SYMBOL(__kfifo_to_user);
307 
308 static int setup_sgl_buf(struct scatterlist *sgl, void *buf,
309 		int nents, unsigned int len)
310 {
311 	int n;
312 	unsigned int l;
313 	unsigned int off;
314 	struct page *page;
315 
316 	if (!nents)
317 		return 0;
318 
319 	if (!len)
320 		return 0;
321 
322 	n = 0;
323 	page = virt_to_page(buf);
324 	off = offset_in_page(buf);
325 	l = 0;
326 
327 	while (len >= l + PAGE_SIZE - off) {
328 		struct page *npage;
329 
330 		l += PAGE_SIZE;
331 		buf += PAGE_SIZE;
332 		npage = virt_to_page(buf);
333 		if (page_to_phys(page) != page_to_phys(npage) - l) {
334 			sg_set_page(sgl, page, l - off, off);
335 			sgl = sg_next(sgl);
336 			if (++n == nents || sgl == NULL)
337 				return n;
338 			page = npage;
339 			len -= l - off;
340 			l = off = 0;
341 		}
342 	}
343 	sg_set_page(sgl, page, len, off);
344 	return n + 1;
345 }
346 
347 static unsigned int setup_sgl(struct __kfifo *fifo, struct scatterlist *sgl,
348 		int nents, unsigned int len, unsigned int off)
349 {
350 	unsigned int size = fifo->mask + 1;
351 	unsigned int esize = fifo->esize;
352 	unsigned int l;
353 	unsigned int n;
354 
355 	off &= fifo->mask;
356 	if (esize != 1) {
357 		off *= esize;
358 		size *= esize;
359 		len *= esize;
360 	}
361 	l = min(len, size - off);
362 
363 	n = setup_sgl_buf(sgl, fifo->data + off, nents, l);
364 	n += setup_sgl_buf(sgl + n, fifo->data, nents - n, len - l);
365 
366 	return n;
367 }
368 
369 unsigned int __kfifo_dma_in_prepare(struct __kfifo *fifo,
370 		struct scatterlist *sgl, int nents, unsigned int len)
371 {
372 	unsigned int l;
373 
374 	l = kfifo_unused(fifo);
375 	if (len > l)
376 		len = l;
377 
378 	return setup_sgl(fifo, sgl, nents, len, fifo->in);
379 }
380 EXPORT_SYMBOL(__kfifo_dma_in_prepare);
381 
382 unsigned int __kfifo_dma_out_prepare(struct __kfifo *fifo,
383 		struct scatterlist *sgl, int nents, unsigned int len)
384 {
385 	unsigned int l;
386 
387 	l = fifo->in - fifo->out;
388 	if (len > l)
389 		len = l;
390 
391 	return setup_sgl(fifo, sgl, nents, len, fifo->out);
392 }
393 EXPORT_SYMBOL(__kfifo_dma_out_prepare);
394 
395 unsigned int __kfifo_max_r(unsigned int len, size_t recsize)
396 {
397 	unsigned int max = (1 << (recsize << 3)) - 1;
398 
399 	if (len > max)
400 		return max;
401 	return len;
402 }
403 EXPORT_SYMBOL(__kfifo_max_r);
404 
405 #define	__KFIFO_PEEK(data, out, mask) \
406 	((data)[(out) & (mask)])
407 /*
408  * __kfifo_peek_n internal helper function for determinate the length of
409  * the next record in the fifo
410  */
411 static unsigned int __kfifo_peek_n(struct __kfifo *fifo, size_t recsize)
412 {
413 	unsigned int l;
414 	unsigned int mask = fifo->mask;
415 	unsigned char *data = fifo->data;
416 
417 	l = __KFIFO_PEEK(data, fifo->out, mask);
418 
419 	if (--recsize)
420 		l |= __KFIFO_PEEK(data, fifo->out + 1, mask) << 8;
421 
422 	return l;
423 }
424 
425 #define	__KFIFO_POKE(data, in, mask, val) \
426 	( \
427 	(data)[(in) & (mask)] = (unsigned char)(val) \
428 	)
429 
430 /*
431  * __kfifo_poke_n internal helper function for storeing the length of
432  * the record into the fifo
433  */
434 static void __kfifo_poke_n(struct __kfifo *fifo, unsigned int n, size_t recsize)
435 {
436 	unsigned int mask = fifo->mask;
437 	unsigned char *data = fifo->data;
438 
439 	__KFIFO_POKE(data, fifo->in, mask, n);
440 
441 	if (recsize > 1)
442 		__KFIFO_POKE(data, fifo->in + 1, mask, n >> 8);
443 }
444 
445 unsigned int __kfifo_len_r(struct __kfifo *fifo, size_t recsize)
446 {
447 	return __kfifo_peek_n(fifo, recsize);
448 }
449 EXPORT_SYMBOL(__kfifo_len_r);
450 
451 unsigned int __kfifo_in_r(struct __kfifo *fifo, const void *buf,
452 		unsigned int len, size_t recsize)
453 {
454 	if (len + recsize > kfifo_unused(fifo))
455 		return 0;
456 
457 	__kfifo_poke_n(fifo, len, recsize);
458 
459 	kfifo_copy_in(fifo, buf, len, fifo->in + recsize);
460 	fifo->in += len + recsize;
461 	return len;
462 }
463 EXPORT_SYMBOL(__kfifo_in_r);
464 
465 static unsigned int kfifo_out_copy_r(struct __kfifo *fifo,
466 	void *buf, unsigned int len, size_t recsize, unsigned int *n)
467 {
468 	*n = __kfifo_peek_n(fifo, recsize);
469 
470 	if (len > *n)
471 		len = *n;
472 
473 	kfifo_copy_out(fifo, buf, len, fifo->out + recsize);
474 	return len;
475 }
476 
477 unsigned int __kfifo_out_peek_r(struct __kfifo *fifo, void *buf,
478 		unsigned int len, size_t recsize)
479 {
480 	unsigned int n;
481 
482 	if (fifo->in == fifo->out)
483 		return 0;
484 
485 	return kfifo_out_copy_r(fifo, buf, len, recsize, &n);
486 }
487 EXPORT_SYMBOL(__kfifo_out_peek_r);
488 
489 unsigned int __kfifo_out_r(struct __kfifo *fifo, void *buf,
490 		unsigned int len, size_t recsize)
491 {
492 	unsigned int n;
493 
494 	if (fifo->in == fifo->out)
495 		return 0;
496 
497 	len = kfifo_out_copy_r(fifo, buf, len, recsize, &n);
498 	fifo->out += n + recsize;
499 	return len;
500 }
501 EXPORT_SYMBOL(__kfifo_out_r);
502 
503 void __kfifo_skip_r(struct __kfifo *fifo, size_t recsize)
504 {
505 	unsigned int n;
506 
507 	n = __kfifo_peek_n(fifo, recsize);
508 	fifo->out += n + recsize;
509 }
510 EXPORT_SYMBOL(__kfifo_skip_r);
511 
512 int __kfifo_from_user_r(struct __kfifo *fifo, const void __user *from,
513 	unsigned long len, unsigned int *copied, size_t recsize)
514 {
515 	unsigned long ret;
516 
517 	len = __kfifo_max_r(len, recsize);
518 
519 	if (len + recsize > kfifo_unused(fifo)) {
520 		*copied = 0;
521 		return 0;
522 	}
523 
524 	__kfifo_poke_n(fifo, len, recsize);
525 
526 	ret = kfifo_copy_from_user(fifo, from, len, fifo->in + recsize, copied);
527 	if (unlikely(ret)) {
528 		*copied = 0;
529 		return -EFAULT;
530 	}
531 	fifo->in += len + recsize;
532 	return 0;
533 }
534 EXPORT_SYMBOL(__kfifo_from_user_r);
535 
536 int __kfifo_to_user_r(struct __kfifo *fifo, void __user *to,
537 	unsigned long len, unsigned int *copied, size_t recsize)
538 {
539 	unsigned long ret;
540 	unsigned int n;
541 
542 	if (fifo->in == fifo->out) {
543 		*copied = 0;
544 		return 0;
545 	}
546 
547 	n = __kfifo_peek_n(fifo, recsize);
548 	if (len > n)
549 		len = n;
550 
551 	ret = kfifo_copy_to_user(fifo, to, len, fifo->out + recsize, copied);
552 	if (unlikely(ret)) {
553 		*copied = 0;
554 		return -EFAULT;
555 	}
556 	fifo->out += n + recsize;
557 	return 0;
558 }
559 EXPORT_SYMBOL(__kfifo_to_user_r);
560 
561 unsigned int __kfifo_dma_in_prepare_r(struct __kfifo *fifo,
562 	struct scatterlist *sgl, int nents, unsigned int len, size_t recsize)
563 {
564 	BUG_ON(!nents);
565 
566 	len = __kfifo_max_r(len, recsize);
567 
568 	if (len + recsize > kfifo_unused(fifo))
569 		return 0;
570 
571 	return setup_sgl(fifo, sgl, nents, len, fifo->in + recsize);
572 }
573 EXPORT_SYMBOL(__kfifo_dma_in_prepare_r);
574 
575 void __kfifo_dma_in_finish_r(struct __kfifo *fifo,
576 	unsigned int len, size_t recsize)
577 {
578 	len = __kfifo_max_r(len, recsize);
579 	__kfifo_poke_n(fifo, len, recsize);
580 	fifo->in += len + recsize;
581 }
582 EXPORT_SYMBOL(__kfifo_dma_in_finish_r);
583 
584 unsigned int __kfifo_dma_out_prepare_r(struct __kfifo *fifo,
585 	struct scatterlist *sgl, int nents, unsigned int len, size_t recsize)
586 {
587 	BUG_ON(!nents);
588 
589 	len = __kfifo_max_r(len, recsize);
590 
591 	if (len + recsize > fifo->in - fifo->out)
592 		return 0;
593 
594 	return setup_sgl(fifo, sgl, nents, len, fifo->out + recsize);
595 }
596 EXPORT_SYMBOL(__kfifo_dma_out_prepare_r);
597 
598 void __kfifo_dma_out_finish_r(struct __kfifo *fifo, size_t recsize)
599 {
600 	unsigned int len;
601 
602 	len = __kfifo_peek_n(fifo, recsize);
603 	fifo->out += len + recsize;
604 }
605 EXPORT_SYMBOL(__kfifo_dma_out_finish_r);
606